UC知道VB做计算器问题2
来源：百度知道 编辑：UC知道 时间：2024/06/11 16:19:44
Private Sub Command1_Click(index As Integer)
Command1(index).Caption = Trim(index）
TEXT1.TEXT= Command1(index).index '我只想输入“1”然后输出“1”。输入时“1”，“2”输出为“12”就是这样！
End Sub
Command1(index).Caption = Trim(index）
TEXT1.TEXT= Command1(index).index '我只想输入“1”然后输出“1”。输入时“1”，“2”输出为“12”就是这样！
End Sub
Private Sub Command1_Click(index As Integer)
TEXT1.TEXT=TEXT1.TEXT & index
End Sub
用slipt函数吧,自己查看一下这个函数的功能和方法,就可以解决了,不过我建议你要做的话,还是就做个和windows计算机差不多的,不要做了一个没有用处的,不知道你的需求分析做了没有,你做出来有什么用处呢??
同类的产品比你的好多了,你做出来的根本就没有什么用嘛!