用左键点击msflexgrid时,点击哪行则msflexgrid.row的值即为哪行,但是用右键点击时则msflexgrid.row的值为1,请问怎么样在右键点击时也得到行值呢?问题解决马上给分

解决方案 »

  1.   

    Private Sub Form_Load()
    Dim I As Integer, J As Integer
    MSFlexGrid1.Rows = 20
    MSFlexGrid1.Cols = 5
    For I = 0 To 19
    For J = 0 To 4
    MSFlexGrid1.TextMatrix(I, J) = I & " 行 " & J & " 列"
    Next
    Next
    End SubPrivate Sub MSFlexGrid1_MouseDown(Button As Integer, Shift As Integer, x As Single, y As Single)
    If Button = 2 Then MsgBox MSFlexGrid1.MouseRow & " 行 " & MSFlexGrid1.MouseCol & " 列"
    End Sub
      

  2.   

    用 mouse_event  模擬左鍵按下也可
      

  3.   

    谢谢狼行天下,用mouserow就可以得到需要的行值