关于MSFlexGrid的问题

Question

For i = 0 To MSFlexGrid1.Col - 1
        For j = 1 To MSFlexGrid1.Rows - 1
        If InStr(MSFlexGrid1.TextMatrix(j, i), Text1.Text) Then
以上的语句是在MSFlexGrid1中寻找和text1中的文本相一致的内容，如找到则执行then后面的语句，请问我找到后怎么样才能显示找到的文本所在行的所有内容，我用以下语句是过，好象没用，请问那里出了问题？
        n = j
        MSFlexGrid1.Clear
        For i = 0 To col_num - 1
        MSFlexGrid1.Col = i   ''设定目前保存格行数
        If Not IsNull(re1.Fields(i)) Then MSFlexGrid1.Text = re1.Field(i)Else MSFlexGrid1.Text = ""    '读取目前数据库记录至对应的数组
        grid(n, i) = re1.Fields(i)   '读取目前数据库记录至对应的数组
        Next i

Answer 1

If InStr(MSFlexGrid1.TextMatrix(j, i), Text1.Text)<>0 Then

Answer 2

Instr()函数返回指定字符串在目标字符串中的位置,如果没有匹配的字符串,则返回0