msflexgrid的使用,默认选中第一行
我想实现在有数据的时候默认选中第一行,使用 fg检查记录.TopRow = 1或者fg检查记录.Row =1都用过了,可是程序启动起来后,选中的哪行没有变色,然后鼠标点了就变色了,我想启动后 默认选中并变色 控件
[解决办法]
Private Sub Command1_Click()
Dim i&, j&
i = MSFlexGrid1.FixedRows
If (MSFlexGrid1.Rows > i) Then
j = MSFlexGrid1.FixedCols
MSFlexGrid1.Row = i
MSFlexGrid1.Col = j
MSFlexGrid1.ColSel = MSFlexGrid1.Cols - j
End If
End Sub