VB点击命令按钮(控件数组)立刻在文本框中显示命令按钮的Caption。

就是做了个计算器,命令按钮用的是控件数组,用来输入数据,怎样使得点一下任意控件内的命令按钮,文本框立刻现实命令框的Caption,比如按1显示1,按2显示2,按下一个的时候上一次的不消失,可以继续添加,最后要计算的表达式要完全显示在文本框中。点=就显示结果。

100%你的要求
很简单啊。创10个command数组。。0-9 然后创个 TEXT1 复制代码就可以看到效果了

Private Sub Command1_Click(Index As Integer) '把0-9按钮弄成一个数组,简化代码
If Text1.Text = 0 Then Text1.Text = ""
Text1.Text = Text1.Text & Index '数字0-9'
End Sub

不懂的M我
温馨提示:内容为网友见解,仅供参考
第1个回答  2011-07-18
首先得把每一个command的caption分别设为1,2,3,。。。
然后在command中加代码:
text1.text=text1.text & command1(index).caption '控件名字随你
要显示表达式不难,但要显示表达式再计算结果,就和卡西欧学生计算器一样就难了,
不过vb里有这样的控件。你可以考虑只设置+-*/,这样比较好做,不要带括号根号之类的。
相似回答
大家正在搜