Thanks for helping me guys.
according to ridoy suggestion i got this solution, but with MSHFlexGrid not datagrid and its working fine.
<pre lang="vb">
Dim intRow As Integer
MSHFlexGrid1.Rows = MSHFlexGrid1.Rows + 1 ' If you need to increase the number of rows
With MSHFlexGrid1
.TextMatrix(intRow + 1, 1) = Text1.Text
.TextMatrix(intRow + 1, 2) = Text2.Text
.TextMatrix(intRow + 1, 3) = Text3.Text
end with
intRow = intRow + 1
</pre>