7,788
社区成员
发帖
与我相关
我的任务
分享如果将一个窗口中的MSFLEXGRID中的内容完全快速的赋给别一个窗口中的MSFLEXGRID。
如Form1.Grid1 与 Form2.Grid1
想将Form2.Grid1 设成与Form1.Grid1 完全相同。
注：不能过单格赋值的方式完成。如不能能过用Form1.Grid1.Text 或grid1.TextMatrix 或 grid1.TextArray 三种方式来完成此要求。
想将Form2.Grid1 设成与Form1.Grid1 完全相同。
注：不能过单格赋值的方式完成。如不能能过用Form1.Grid1.Text 或grid1.TextMatrix 或 grid1.TextArray 三种方式来完成此要求。
...全文
请发表友善的回复…
发表回复
netfor2000 2005-02-15
- 打赏
- 举报
自己顶
netfor2000 2005-01-14
- 打赏
- 举报
danielinbiti(金)
请具体一下
请具体一下
netfor2000 2005-01-14
- 打赏
- 举报
wumylove1234(毁于随) 你的方法只能给GRID传一个单元格的值，而不能传整个表
wumylove1234 2004-12-31
- 打赏
- 举报
Form1中:
Private Sub Command1_Click()
Me.MSHFlexGrid1.TextMatrix(1, 1) = "sss"
Form2.Show
End Sub
Form2中:
Private Sub Command1_Click()
Me.grid = Form1.MSHFlexGrid1
grid.Visible = True
End Sub
Form1与Form2都放一个Command和一个MSHFlexgrid,其中Form2中的MSHflexgrid的Name为Grid
Private Sub Command1_Click()
Me.MSHFlexGrid1.TextMatrix(1, 1) = "sss"
Form2.Show
End Sub
Form2中:
Private Sub Command1_Click()
Me.grid = Form1.MSHFlexGrid1
grid.Visible = True
End Sub
Form1与Form2都放一个Command和一个MSHFlexgrid,其中Form2中的MSHflexgrid的Name为Grid
danielinbiti 2004-12-31
- 打赏
- 举报
按地址传送就可以了吧
byref grid as meflexgrid
byref grid as meflexgrid
featherfly 2004-12-31
- 打赏
- 举报
关注一下
netfor2000 2004-12-29
- 打赏
- 举报
??
CatchWind 2004-12-25
- 打赏
- 举报
包括格式嗎? 這個問題我以前也想過,還沒有找到解決辦法,幫你頂.
pweixing 2004-12-25
- 打赏
- 举报
关注！
lovegu 2004-12-25
- 打赏
- 举报
呵呵，最简单的方法就是利用数据库作为第三者，你可以将第一个Form1.Grid1里的内容全部存入一张表里面，然后关闭form1，然后再form2.show，在show之前将在表里读出所有的记录全部写在form2.grid1表格里。
