谁能帮我看看这个问题如何解决（在线等你回答）

Question

去掉Private Sub MSFlexGrid1_Click()事件及其代码。
加上：
Private Sub MSFlexGrid1_RowColChange()
If MSFlexGrid1.Col = 0 Or MSFlexGrid1.Row = 0 Then Exit Sub
    Text1.Text = ""
    Text1.Visible = True
    Text1.Text = MSFlexGrid1.TextMatrix(MSFlexGrid1.RowSel, MSFlexGrid1.ColSel)
    i = MSFlexGrid1.RowSel
    j = MSFlexGrid1.ColSel
    If MSFlexGrid1.RowSel = 1 Then
        Call MSFlexGrid1_EnterCell
    End If
    Text1.BackColor = &H80000001
    Text1.Visible = True
    Text1.SetFocus
    Text1.SelStart = 0
    Text1.SelLength = Len(Text1.Text)
End Sub

Answer 1

呵呵，带星的就是不一样，散分了