求助，运行出现实时错误424要求对象

代码如下：
Private Sub Command1_Click ()
Dim x As Single, y As Single
x=Val(Text1.Text)
y=((x+52.8) * 5 - 3.9343) / 0.5–x * 10
Text2.Text=”我要对你说：”+ Str(y)

End Sub

你的窗体上有文本框吗？

不能只复制代码，还需要把代码中的控件搞上去。

请确定 Text1, Text2 对象存在。

下载贴吧APP
看高清直播、视频！

分享到: