高职考技能提升教程 listindex深入理解
Listbox控件
Listindex作用????
可以用它来观察到,当前选中了第几项,第1个位置用0来表示,第2个位置用1表示,类似数组
如果没有选中,那么就是List1.ListIndex返回-1
注意:List1.ListIndex = -1会触发一次click事件
List属性录入数据换行快捷键
Ctrl+enter
总结
1、必须要上机练习来证明
2、要学会代码调试,下断点
3、掌握listindex的功能
4、注重逻辑思维训练
软件界面设计:
源码分享:
Dim f As Boolean 'f表示是否可以选中,默写标记为可以选 Dim lastindex As Long Private Sub Form_Load() List1.FontSize = 20 End Sub Private Sub List1_Click() If List1.ListIndex = lastindex And List1.ListIndex <> -1 And f = True Then List1.ListIndex = -1 f = False Else f = True End If lastindex = List1.ListIndex End Sub