→ MOONRAKER:(1)個別加入else部份就好了(2)e已經在上面被用掉了 11/16 23:10
我要寫一個可以讓這些參數都是True時
然後印出我要的結果
Dim b, c, d, f As Integer
Dim a As String
a = (TextBox1.Text)
b = Val(TextBox2.Text)
c = Val(TextBox3.Text)
d = Val(TextBox4.Text)
f = Val(TextBox5.Text)
If a = "參數一" Then
If b >= 參數二 And b <= 參數三 Then
If c >= 參數四 And c <= 參數五 Then
If d >= 參數五 And d <= 參數七 Then
If f >= 參數八 Then
Label1.Text = "結果"
End If
End If
End If
End If
End If
測試過以後是可以跑出我要的
但是現在我要讓這些 參數如果為Flase時
一一跳出哪個部份錯誤的結果
例如參數一如果為false時要讓label1印出 "參數一是錯誤的"
然後是可以連結所有參數的錯誤資訊
ex. 參數一、三、五、七是錯誤的讓label1印出 "參數一、三、五、七是錯誤的這樣"
想很久不知道該怎麼寫出來....
拜託幫忙解答了....
還有
為什麼dim e as integer時
e的下面會出現錯誤的波浪
因為剛好a. b, c, d, e 到 e 的時候就會發生這樣
f就不會？ 很奇怪
我是使用 VB 2005 express 版本
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 59.117.189.156