0

我有 2 个组合框。,..,cbocourse 和 cboyearandsection

如果我在 cbocurse 上单击 BSIT,则 cboyearandsection 将自动填写,无需单击任何按钮,除了选择 cbocourse 的索引

 Dim BSIT() As String = {"1A", "1B", "1C", "2A", "2B", "2C", "3A", _
           "3B", "3C", "4A", "4B"}

 If cbocourse.SelectedIndex = "BSIS" Then
      cboyear.Items.AddRange(BSIT)
4

2 回答 2

1

对于初学者,If cbocourse.SelectedIndex指的是所选项目的 INDEX,它将是一个Integer值。您可以将组合框中的项目视为数组。

如果要与String所选项目的值进行比较,则需要

If cbocourse.SelectedItem.toString()
于 2013-10-14T14:41:39.103 回答
0

模块级别:

    Dim BSIT() As String = {"1A", "1B", "1C", "2A", "2B", "2C", "3A", _
       "3B", "3C", "4A", "4B"}

假设cboCourse包含“ABC”、“DEF”、“BSIT”等字符串,则:

 Private Sub cboCourse_SelectedIndexChanged(ByVal sender As System.Object, _
         ByVal e As System.EventArgs) Handles cboCourse.SelectedIndex

    If cboCourse.SelectedItem.ToString = "BSIS" Then
        ' dont want to add 2ce
        cboyear.Items.Clear()
        cboyear.Items.AddRange(BSIT)
    End If

End Sub

注意事项:

我们不知道里面有什么cboCourse,它看起来像字符串。如果它是其他事物的对象或索引,则必须解决。在阅读完 events 和 cbo Selected... 属性后,弄清楚如何开始接受你得到的一些答案。

于 2013-10-14T15:26:58.873 回答