[VBA ] 請問一下為什麼這樣跑不出東西
目前正在學習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
→
03/13 11:15, , 1F
03/13 11:15, 1F
→
03/13 11:15, , 2F
03/13 11:15, 2F
推
03/13 16:24, , 3F
03/13 16:24, 3F
推
03/13 22:40, , 4F
03/13 22:40, 4F
→
03/13 22:41, , 5F
03/13 22:41, 5F
推
03/13 22:42, , 6F
03/13 22:42, 6F
→
03/13 22:43, , 7F
03/13 22:43, 7F
→
03/14 00:39, , 8F
03/14 00:39, 8F
討論串 (同標題文章)