初学者，参照例子学做一个计算器程序，运行错误，帮忙修正，谢谢。

看一下，没兴趣去改。
1、所有按钮的 index 属性一律删掉。
你是复制按钮，有一个提示，是否创建控件数组，你可能没注意，直接选择了是。然后去改了控件名，没有删index 属性了。

2、自己命名的 控件，变量名，过程名，函数名，窗体名，模块名 等等标识符，都不能与 VB6 的关键字重名。
并且这个名字在相同的作用域中互相之间也不能重名。

你对照这二点去改吧，标识符不会起，你可以使用中文来命名。
控件有约定成俗的命名规则。如 加号按钮，可以命名为：Cmd_Add

的确，按钮不是一个控件数组，不知道index有什么意义，并且按钮控件的名称也不是规范的名称，有的使用VB的保留名称，大忌！！！
最好使用按钮数组控件，例如：

Private Sub cmd1_Click(Index As Integer)
Dim AA As Integer
AA = Index
Select Case AA
    Case 0      '单击数字键0
    Case 1        '单击数字键1
    Case 2        '单击数字键2
    Case 3      '单击数字键3
    Case 4      '单击数字键4
    Case 5       '单击数字键5
    Case 6       '单击数字键6
    Case 7       '单击数字键7
    Case 8       '单击数字键8
    Case 9        '单击数字键9
End Select
Text1.Text = Text1.Text & CStr(AA)
End Sub

其他自己琢磨吧。

[此贴子已经被作者于2017-9-29 15:22编辑过]

按钮使用控件数组即可
Private Sub Command1_Click(Index As Integer)
  Text1.Text = Text1.Text & Index
End Sub