关于MSHFlexGrid控件显示问题
界面中有一MSHFlexGrid控件、一个textbox控件和一个cmd按钮，我想在textbox中输入文字，然后在mshflexgrid中历遍所有单元格，若单元格中的值包含textbox内容的，则变色显示。
我现在只做了单元格内容与textbox完全相同才会变色显示，以下是代码，请个位大神帮忙出出点子，在此谢过了。
Private Sub Command2_Click()
Dim a, b As Integer
For a = 0 To msgtest2.Rows - 1
For b = 0 To msgtest2.Cols - 1

If msgtest2.TextMatrix(a, b) = Text1.Text Then
msgtest2.Row = a
msgtest2.Col = b
msgtest2.CellBackColor = vbRed
End If
Next
Next


End Sub

[解决办法]
if instr(text1.text,msgtest2.textmatrix(a,b)>0 then