组合框没有被填充

时间:2012-05-09 08:01:07

标签: vb.net winforms

我有一个带有主窗体的Windows窗体项目。有一个文本框离开事件可以打开一个新表单。在新的表单加载事件中,我有一个组合框项目循环,用于填充组合框项目。如果在主窗体上运行但在第二个窗体上不起作用,它的工作原理非常好。当通过主窗体中的textbox_leave事件打开该窗体时,为什么不填充辅助窗体上的组合框? 这是离开事件

 Private Sub tbChartTitle_Leave(sender As Object, e As System.EventArgs) Handles tbChartTitle.Leave
    If Not tbChartTitle.Text = Nothing Then
        frmTitleAttributes.Show()
    End If
End Sub

这是填充第二个表单上的一个组合框的代码(如果在主窗体上的组合框上运行,它可以工作)

 Private Sub frmTitleAttributes_Load(sender As Object, e As System.EventArgs) Handles Me.Load
    InitializeComponent()
    AddFonts()
End Sub
Private Sub AddFonts()
    ' Get the installed fonts collection.
    Dim allFonts As New Drawing.Text.InstalledFontCollection
    ' Get an array of the system's font familiies.
    Dim fontFamilies() As FontFamily = allFonts.Families

    ' Display the font families.
    For i As Integer = 0 To fontFamilies.Length - 1
        cbxTitleFonts.Items.Add(fontFamilies(i).Name)
    Next
End Sub

1 个答案:

答案 0 :(得分:0)

确保在您显示表单后使用Load处理程序(使用断点)

您也可以尝试在Shown事件

中调用它
Private Sub frmTitleAttributes_Shown(sender as Object, e as EventArgs) _ 
     Handles frmTitleAttributes.Shown

   AddFonts()

End Sub