现在有两个窗体，form1上有一个msflexgrid;form2上有七个文本框。
要求是：把form2上各文本框中的数据，传递到form1上的msflexgrid中各个相对应的单元格，并使之立即显示出来。
目的：通过form2实现数据更新。

Form1.MsHFlexgrid1.TextMatrix(Form1.MsHFlexgrid1.Row,1)=Form2.Text1.Text
Form1.MsHFlexgrid1.TextMatrix(Form1.MsHFlexgrid1.Row,2)=Form2.Text2.Text
Form1.MsHFlexgrid1.TextMatrix(Form1.MsHFlexgrid1.Row,3)=Form2.Text3.Text
Form1.MsHFlexgrid1.TextMatrix(Form1.MsHFlexgrid1.Row,4)=Form2.Text4.Text
Form1.MsHFlexgrid1.TextMatrix(Form1.MsHFlexgrid1.Row,5)=Form2.Text5.Text
Form1.MsHFlexgrid1.TextMatrix(Form1.MsHFlexgrid1.Row,6)=Form2.Text6.Text
Form1.MsHFlexgrid1.TextMatrix(Form1.MsHFlexgrid1.Row,7)=Form2.Text7.Text

我也是用的这种方法，自己觉得有点啰唆。
有没有更好的方法。
谢谢楼上的。

Dim i as Integer
for i = 1 to 7
Form1.MsHFlexgrid1.TextMatrix(Form1.MsHFlexgrid1.Row,i)=Form2.Text1(i).Text
next

做成控件数组就不啰唆了.

呵呵,代码少了,并没有减少计算机的工作

计算机一秒能执行几十亿次加减运算.
难道就在乎这7次循环?

哈哈,当然是不在乎啦.
我不是那个意思,我的意思是用最简短的代码来指挥计算机跟多的事情.

[此贴子已经被作者于2007-9-22 15:54:20编辑过]

就是说这两种方法本质上是一样的，计算机执行效率基本一样。

谢谢热情的版主。

呵呵,purana这位版主很热情的,她要是有空的话,准热心帮你解决问题.