请指教else:label1.caption=...哪里错了?
Private Sub Command1_Click()
a = Val(Text1): b = Val(Text2): c = Val(Text3)
p = b * b - 4 * a * c
If p < 0 Then
MsgBox ""b*b-4*a*c<0",请重新输入!", vbCritical '错误:缺少语句结束
Else: Label1.Caption = 1 / 2 * (-b + Sqr(p)) / a & "," & 1 / 2 * (-b - Sqr(p)) / a  '当 _
输入为空或全为零时出现溢出错误
End If
End Sub

[[it] 本帖最后由 yi157 于 2008-6-5 17:30 编辑 [/it]]

[[it] 本帖最后由 yi157 于 2008-6-6 14:39 编辑 [/it]]

先说一声谢谢
但是太简单了啊,还请高手告诉我为什么是这样?而且下面还有个小问题

哦,和c语言里%差不多啊谢谢啦

谢谢

看样子这题目是没谁能做出来了,可是我都觉得不是很难呀,只是暂时还不知道

有道理,也只能这样了.谢谢