VB.net组合框笔记

来源:互联网 发布:ubuntu rc.local不存在 编辑:程序博客网 时间:2024/05/16 14:46

1、类名称:ComboBox

2、获取当前选中的元素下标:

Dim id As Integer
        id = Combo_net.SelectedIndex()

当组合框未选中任何内容是,id值为-1,否则为某个合法下标(大于等于0)

SelectedIndex还可以做属性用,可以对其赋值一个合法的下标值,这个下标一定要是组合框中能够找到的,否则将会报错。

3、向组合框添加新元素:

Combo_net.Items.Add("已经进入配网")
        Combo_net.Items.Add("已连接路由器")
        Combo_net.Items.Add("已连接服务器")
        Combo_net.Items.Add("收到解绑指令")
        Combo_net.Items.Add("产测成功回复")
        Combo_net.Items.Add("启动easyLink")
        Combo_net.Items.Add("解除绑定")

4、在组合框中获取某个特定元素的下标:

id = Combo_menu.Items.IndexOf("泡发")   

当组合框中有“泡发”这个元素时,id值大于等于0,否则为-1

可以用这个方法确定组合框中是否包含某个元素

5、获取当前选中的元素文本类容:

id = Combo_net.SelectedIndex()
        If id < 0 Then
            MsgBox("请选择配网指令!")
            Return
        End If
        strTmp = Combo_net.GetItemText(Combo_net.Items.Item(id))

运行以后如果有选中元素则strTmp保存的是选中元素的文本。


0 0
原创粉丝点击