vb 编写简单计算器

来源：百度知道编辑：UC知道时间：2024/05/28 14:20:56

用鼠标点击数字控件，在TEXT中显示数字串怎么实现，求教下代码

0~9按钮设置成控件数组
Private Sub Command1_Click(Index As Integer)
text1 = text1 & Index

End Sub

假如你的数字控件用的是按钮那程序如下：
Private Sub Command1_Click(Index As Integer)
text1.text=text1.text & command1.text

End Sub

要原程序吗?