主题:求高手帮忙
chatmouse
[专家分:0] 发布于 2008-09-18 08:44:00
是这样的,我想编一个程序,创建三个文本框,在每个文本框中输入数字,格式为:如文本框一为(01,02,03),文本框二为(04,05,06),文本框三为(07,08,09),然后输出显示到列表框中或文本文件中,显示为01,04,07;01 04 08;01 04 09;01 05,07……等,不一一例举了。如何编程。还有输入文本框中的数字时,用数字按钮输入,然后显示成01,02,03,又如何实现。请求高手帮忙!
回复列表 (共2个回复)
沙发
一江秋水 [专家分:9680] 发布于 2008-09-18 12:09:00
第一个问题:
可以使用字符串数组,代码如下:
Dim x() As String, y() As String, z() As String
x = Split(Text1, ",")
y = Split(Text2, ",")
z = Split(Text3, ",")
这样,你就可以任意将数组元素进行组合了,比如:st=x(0)&y(0)&z(0)
第二个问题:
将数字按纽设置为控件数组,标题为0的按纽其index=0,标题为1的按纽其index=1,由此类推
板凳
一江秋水 [专家分:9680] 发布于 2008-09-18 12:19:00
按纽的名称可均为Command,再在Private Sub Command_Click(Index As Integer)过程中添加代码,例如:
Private Sub Command_Click(Index As Integer)
text1=text1 & "0"& index & ","
End Sub
我来回复