vb中如何让一个按钮调用另一个按钮中的数组

Posted 2023-03-28

我要在文本框中一次只输入一个数，单击按钮后，把在文本框中输入的那些数据存在一个数组中，当按另一个按钮时会重新调用数组进行加法运算，请高手指点，最好有vb代码，非常感谢，回答完后将追加所有我的分数！！！！，谢谢。万分感激！！！

窗体上有两个command 一个text
运行程序时在文本框输入一个数,然后单击command1,此时数据已存入数组. 注意输入数据后,只能在单击command1后这个数才能存入数组. 其实一楼已回答了,只是有点不足,稍作修改,如果要求text 对非数字不响应的话,还需要调用个函数. 这里为了省事,就没写出来,如有需要再HI
代码如下
Dim a()
Private Sub Command1_Click()
Static i As Integer
i = i + 1
ReDim Preserve a(i)
a(i) = Val(Text1)
Text1 = ""
Text1.SetFocus
End Sub
Private Sub Command2_Click()
For i = 0 To UBound(a)
Sum = Sum + Val(a(i))
Next i
MsgBox Sum
End Sub
Private Sub Form_Load()
Me.Show
Text1 = ""
Text1.SetFocus
End Sub 参考技术A dim a()
dim i as integer
dim sum as integer
i=0

'==========按钮一代码
i=i+1
a(i)=val(text1.text)‘========text1是你文本框的名称

'==========按钮二代码
for j=1 to i 'i就是点击按钮一的次数，就是输入了多少个数
sum=sum+a(j)
print sum'在程序界面输出结果 参考技术B 定义一个模块级的数组不就行了。追问

想请教高手能否在另一个窗体2中用一个命令按钮调用窗体1中command建立的数组来绘图，横坐标为数组（1 2 3 4 5 6 7 8 9 ），纵坐标为

追答

那你就定义一个全局数组变量呀。在一个公共模块里面用public 你的数组（）来定义一个全局的数组，然后窗体一的command点击就把数据写入这个数组。然后在另外个窗体直接调用这个数组不就成了。这是最简单的方法，但是每次点击窗体一的按钮的时候你要从新清空数组。这就要用到动态数组的概念，我认为，首先你要弄清楚不同作用域的变量使用范围的概念。然后在弄清如何动态的定义数组，修改数组。就能解决你的问题了。具体的方法你可以百度，或者看教科书。直接写答案对你的帮助不大，人都是有惰性的，有现成的答案肯定就直接照抄了，还是自己多摸索，多尝试，失败几次反而加深印象，对你的进步也有好处。

参考技术C Dim a()
Private Sub Command1_Click()
Static i As Integer
i = i + 1
ReDim Preserve a(i)
a(i) = Text1
End Sub

Private Sub Command2_Click()
For i = 0 To UBound(a)
Sum = Sum + Val(a(i))
Next
MsgBox Sum
End Sub

VC++从一个窗体中调用显示另一窗体

谁能告诉我 VC++从一个窗体中调用显示另一窗体怎么做?

比如现在主窗体上有个按钮,我想点这个按钮就出现另外一个窗体

其实这个不难，要是你是用window API编程的话，那就新创建一个窗口类，然后在WM_COMMAND里面，对应你那个按钮的ID号添加消息，也就是调用另一个窗口。要是用MFC编写的话，也是需要一个类，通过VC++向导添加就可以了，然后在主窗口里面（CMainFram）添加消息映射和消息处理函数就行了。 参考技术A delphi中是这样的，在那个按钮的程序上写 新窗体的名字.show，就可以显示了。我大胆认为vc也一样吧。有些东西真差不多。 参考技术B 可以参考一下 比较早前整理的一篇
http://hi.baidu.com/gzjstc/blog/item/adf032f81d6b1d04d9f9fd83.html