VB高手编写一个防错软件
发布网友
发布时间:2022-04-25 04:12
我来回答
共3个回答
热心网友
时间:2023-10-25 05:30
Command1_Click()
如果Kong1 = 0
??= Kong2 / Kong3
?Jieguo1.Caption = S
其他
如果Kong2 * Kong2 - 4 * Kong1 * Kong3> = 0,然后?
??S = Kong2 * Kong2 - 4 * Kong1 * Kong3
??一个的=(Kong2 + Kong3)/(2 * Kong1)
??B =(-Kong2 - Kong3)/(2 * Kong1)
??Jieguo1.Caption = A
??Jieguo2.Caption = B
?其他
??Jieguo1.Caption =“方程没有实根
?结束如果
结束如果
END SUB
之后到下一行的声明
否则,VB认为,如果声明已经结束,否则系统会提示回来,如果
热心网友
时间:2023-10-25 05:30
防什么错?没写清楚。
热心网友
时间:2023-10-25 05:31
这个问题提的真精彩~