作者joyyoyo7288 (阳光宅哥)
看板Visual_Basic
标题[VBA ] 请问一下为什麽这样跑不出东西
时间Thu Mar 13 10:41:24 2008
目前正在学习VB~
有个作业是~
要我们把成绩分等级
Dim a As Double
Dim b As String
Dim c As String
Dim d As String
Dim f As String
Dim x As String
b = "优秀"
c = "不错"
f = "在加油"
d = "不及格"
x = "请数入正确数值"
If 100 < a > 90 Then
MessageBox.Show(b)
ElseIf 89 < a > 80 Then
MessageBox.Show(c)
ElseIf 79 < a > 70 Then
MessageBox.Show(f)
ElseIf 69 < a > 60 Then
MessageBox.Show(d)
ElseIf a = 100 Then
MessageBox.Show(b)
ElseIf 0 < a > 100 Then
MessageBox.Show(x)
End If
End Sub
End Class
为什麽messagebox没有跑出来??
谢罗....
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 140.130.36.177
1F：→ nobody1:If 100 < a > 90 Then 改成 If 100 < a and a> 90 Then 03/13 11:15
2F：→ nobody1:以下类推~ 03/13 11:15
3F：推 foxtien:If 100 < a > 90光这样debug就不会过了吧！？1F正解 03/13 16:24
4F：推 fumizuki:会过 ...假设100小於a得到true，再算true>90 为false 03/13 22:40
5F：→ fumizuki:数学逻辑也错 哪有a大於90大於100的假定条件的@@ 03/13 22:41
6F：推 fumizuki:程式逻辑就是多个关系运算(> = < >= <= <>)之间要用 and 03/13 22:42
7F：→ fumizuki:串接起来 才会得到正确的结果... 03/13 22:43
8F：→ joyyoyo7288:好...我懂了@@ 03/14 00:39