当前位置:编程学习 > VB >>

MSHFlexGrid获取TextBox的问题

额 大牛们我又来问问题 了。。。。。。。
现在想去做一个类似红绿灯的东西,在一个网格 MSHFlexGrid,当我输入一个红灯(目前不会用图片,用汉字表示),在 MSHFlexGrid的表格中显示出一个“红灯“的字样,绿灯和黄灯也是如此,但是我发现当我用MSFlexGrid1.Text = Text1.Text的时候我他只在一个格子里面,但是我想的是一个格子只显示一个汉字。比如:
我在textbox中输入“红黄绿” 
就会在MSHFlexGrid竖着输出


绿
麻烦大家帮忙给点示例代码 谢谢 --------------------编程问答-------------------- for idx = 1 to len(text1)
grid.additem mid(text1,idx,1)
next --------------------编程问答--------------------


Private Sub Command1_Click()
    Dim i As Integer
    
    With MSHFlexGrid1
        .FixedCols = 0
        .FixedRows = 0
        .Cols = 1
        .Rows = Len(Text1.Text)
         For i = 0 To .Rows - 1
             .TextMatrix(i, 0) = Mid(Text1.Text, i + 1, 1)
         Next
         
    End With
   
End Sub


--------------------编程问答-------------------- --------------------编程问答-------------------- 学习了,VB比VBA难多了! --------------------编程问答--------------------
引用 4 楼 jsenchina 的回复:
学习了,VB比VBA难多了!


——!
补充:VB ,  控件
CopyRight © 2012 站长网 编程知识问答 www.zzzyk.com All Rights Reserved
部份技术文章来自网络,