Private Sub Form_Load()
Show
'求总评成绩程序
x = Val(InputBox("平时"))
y = Val(InputBox("期中"))
z = Val(InputBox("期末"))
x = Val(x): y = Val(y): z = Val(z)
'print
p = 0.3 * x + 0.3 * y + 0.4 * z
Print "总评"; p
End Sub
没什么错误。
就是你把代码写在 Form_Load 里面是看不到结果的。
你在 Print 前面加一行 Me.Show 试试。
孩子。。。。vb里面没有let一说的。。。。