请教MSFlexGrid控件事件代码

Question

在窗体中有一个MSFlexGrid控件.里面有些格子是"0".在新建一个Command1控件后.想要点击事件把MSFlexGrid控件的格子里那些"0"的改成"1".老鸟们帮帮下.

Answer 1

Private Sub Command1_Click()
    Dim i As Integer, j As Integer, R As Long, C As Long
    R = MSFlexGrid1.Rows
    C = MSFlexGrid1.Cols
    
    For i = 0 To R - 1
        For j = 0 To C - 1
            If MSFlexGrid1.TextMatrix(i, j) = "0" Then MSFlexGrid1.TextMatrix(i, j) = "1"
        Next j
    Next iEnd Sub

Answer 2

这问题也浪费100分天狼工作室
http://www.j2soft.cn/