编程论坛 → VB6论坛

msflexgrid的一些问题

芝诺发布于 2014-12-19 11:39， 552 次点击

首先我先建立起msflexgrid，使之可以编辑。其次界面上还有4个text控件。
问题：1.想将4个text中的文字输入到msflexgrid中的第一列，也就是说msflexgrid.grid(I,0)=text1.text+text2.text+text3.text+text4.text,想实时显示。即输入text1， msflexgrid.grid(I,0)也就即使显示text1的内容。怎样实现？
2.msflexgrid多行为什么只显示第一行，是要设置什么才能满足吗？
3.有一个text的内容是数字，随机输入，格式例子： 2/3/4,想实现msflexgrid.grid(I,2)=text1.text*2，怎样在程序里面体现？

5 回复

#2

芝诺2014-12-19 11:58

第一个问题已经实现了，采用& 就可以了

#3

芝诺2014-12-24 10:20

第二个问题，设置一下行高即可。MSFlexGrid1.RowHeight(z) = 12 * 20 * 3
第三个问题，采用字符串函数：Dim res1, res3, res As String
Dim w, g As Integer
res = Text4.Text
w = Len(res)
g = InStr(res, "/")
res1 = Left(res, g - 1)
res3 = Right(res, w - g)
中间函数采用mid即可。

#4

芝诺2014-12-24 10:21

我这算是自问自答了嘻嘻每天进步一点点

#5

pel465852014-12-24 13:10

MSFlexGrid1是什么控件？
textbox,有个属性是MultiLine，改为true,就可以多行了。
实在不行，MSFlexGrid1的text=var1 & vbCrLf & var2用它换行试试

#6

芝诺2014-12-26 16:04

回复 5楼 pel46585

是控件msflexgrid。嘻嘻，在工程--部件--控件里面点击 microsoft flexgrid control 6.0。是制作表格的一个控件。

1