有这样一个练习题：
[从键盘上输入4个数，编写程序，计算并输出这4个数的和及平均值。通过InputBox函数输入数据，在窗体上显示和及平均值]

Private Sub Form_Click()
Dim Be1 As String
Dim shu1 As Integer
Dim shu2 As Integer
Dim shu3 As Integer
Dim shu4 As Integer
FontName = "宋体"
FontSize = 30
Be1 = "请输入一个整数"
shu1 = InputBox(Be1, "请输入第一个整数")
shu2 = InputBox(Be1, "请输入第二个整数")
shu3 = InputBox(Be1, "请输入第三个整数")
shu4 = InputBox(Be1, "请输入第四个整数")
Print shu1 + shu2 + shu3 + shu4
Print
Print (shu1 + shu2 + shu3 + shu4) / 4
End Sub

上面这些是我改了以后的
但是我刚开始是这样写的：

Private Sub Form_Click()
FontName = "宋体"
FontSize = 30
Be1$ = "请输入一个整数"
shu1% = InputBox(Be1$, "请输入第一个整数")
shu2% = InputBox(Be1$, "请输入第二个整数")
shu3% = InputBox(Be1$, "请输入第三个整数")
shu4% = InputBox(Be1$, "请输入第四个整数")
Print shu1% + shu2% + shu3% + shu4%
Print
Print (shu1% + shu2% + shu3% + shu4%) / 4
End Sub

与上面不同的是就是没有声明变量数据类型，而是用类型说明符来规定的。但是试运行后提示说是变量未声明，这是怎么回事？请指点。见笑了

对了，还请你们写出一个比我上面更精简的代码/我学习学习/