回 帖 发 新 帖 刷新版面

主题:求高手帮忙

是这样的,我想编一个程序,创建三个文本框,在每个文本框中输入数字,格式为:如文本框一为(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个回复)

沙发

第一个问题:
  可以使用字符串数组,代码如下:

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,由此类推

板凳

按纽的名称可均为Command,再在Private Sub Command_Click(Index As Integer)过程中添加代码,例如:

Private Sub Command_Click(Index As Integer)
text1=text1 & "0"& index & ","
End Sub

我来回复

您尚未登录,请登录后再回复。点此登录或注册