我有一个有3列的Flexgrid(VSFlexGrid 8)
grid name = Main_Window.form_seg_carrier_grid
Select | Name | ID
x | abc | 1
| cdf | 2
x | dfs | 3
select列被定义为布尔数据类型,由用户选择哪些行为true / false .
我需要的是一种获取所有行的方法,并将ID设置为数组 .
目前我唯一可以得到的是向我显示选择了哪一行,或者它是否为true / false,对于false为0,对于true为-1 .
可以通过单击按钮或更改来构建阵列 .
编辑1
这是我能得到的,这将触发一个msgbox(快速测试变量的方式)来显示它何时设置为true
Private Sub form_seg_carrier_grid_Click()
Dim test As String
test = Main_Window.form_seg_carrier_grid.Value
If test = -1 Then
MsgBox test
End If
结束子
编辑2
我觉得我很接近这样的事情,只是不能让它做我想做的事情..
Dim i As Integer
Dim test As String
For i = 0 To Main_Window.form_seg_carrier_grid.Rows - 1
If Main_Window.form_seg_carrier_grid.IsSelected(i) Then
If test <> vbNullString Then test = test & ", "
test = test & "'"
test = test & Main_Window.form_seg_carrier_grid.ValueMatrix(i, 1)
test = test & "'"
End If
Next i