Private Sub MSFlexGrid1_MouseDown(Button As Integer, Shift As Integer, x As Single, y As Single) With MSFlexGrid1 If y < .FixedRows * .RowHeight(0) Then MsgBox "单击了固定行" End If If x < .FixedCols * .ColWidth(0) Then MsgBox "单击了固定列" End If End With End Sub
Private Sub MSFlexGrid1_Click() With MSFlexGrid1 If .MouseRow = 0 Then MsgBox "单击了固定行" End If If .MouseCol = 0 Then MsgBox "单击了固定列" End If End With End Sub
With MSFlexGrid1
If y < .FixedRows * .RowHeight(0) Then
MsgBox "单击了固定行"
End If
If x < .FixedCols * .ColWidth(0) Then
MsgBox "单击了固定列"
End If
End With
End Sub
With MSFlexGrid1
If .MouseRow = 0 Then
MsgBox "单击了固定行"
End If
If .MouseCol = 0 Then
MsgBox "单击了固定列"
End If
End With
End Sub