我想在一个有网格的控件上实现这么一种操作：单击一行数据，选中本行，再单击另外一行，选中另一行；如果单击一个已经选中的行，则选中的行就可以取消选中。其实就是不用按住ctrl键实现按住ctrl键的效果。
本来在listBox中可以实现这种操作，但是listBox中没有网格的形状，所以只好考虑其它的方法了（这个实现的方法是在单击listBox时，使用sendKeys发送ctr键）
---------------------------------------------------------------
可以用LISTVIEW控件
Option Explicit
Dim bolFlag As Boolean, lngRow As Long
Private Sub Form_Load()
'设置ListView1控件的查看方式为:3
'设置整行选择属性
'设置网络行
Dim i As Long
Dim lvItem As ListItem
For i = 1 To 5
Set lvI[1] [2] 下一页
|
|
