1樓：匿名使用者
if a=1 and a=2 and a=3.. then 需要滿足所有條件則執行if
******************************====if a=1 or a=2 or a=3...then 滿足其中個一就執行if
******************************==if a=1 then按順序判斷條件，如滿足其中一條，則不執行下面的elseif
elseif a=2 then
elseif a=3 then
...(else)
endif
2樓：匿名使用者
用and連線「且」的條件，用or連線「或」的條件
用and,or,not等邏輯運算子和括號還可以構成更復雜的條件語句
如果你指的是超過一個分支的話應該用elseif語句
3樓：匿名使用者
if a>4 and b>6 then ..
if c>76 or d<623 then ..
if a>4 then
if b>6 then
..end if
..end if
4樓：無極尊
if 條件表示式 then
執行語句
else if 條件表示式 then
執行語句
以此類推。。。
end if
end if
vb中的if語句問題
5樓：
private sub command1_click()
dim a as integer, b as integer, c as boolean
text1.text = a
text2.text = b
text3.text = c
if a mod 3 = 0 and b mod 3 = 0 then
print c = true
else
print c = false
end if
end sub
改這個？
private sub command1_click()
dim a as integer, b as integer, c as boolean
text1.text = a
text2.text = b
text3.text = c
if a mod 3 = 0 and b mod 3 = 0 then
print c = true
'print c = true 如果你的變數"c"是true則輸出true,否則輸出false。
'如果你想輸出「c = true」這個表示式，就用這條語句：print "c = true"
'如果你想設定變數「c」為true則把print取消，直接用 c=true 這條語句就行了。
else
print "c = false"
'print c = false 如果你的變數"c"是false則輸出true,否則輸出false。
'如果你想輸出「c = false」這個表示式，就用這條語句：print "c = false"
'如果你想設定變數「c」為false則把print取消，直接用 c=false 這條語句就行了。
end if
end sub
'順便說一句，你的if語句不能再改了。
6樓：
if (a>5) and (b>5) then
7樓：匿名使用者
if a = c and b = c then
end if
8樓：丹溪藍終覓
因為fori=1
to3forj=1toi
m=m+j
next
j,i相當於
fori=1to
3for
j=1to
im=m+j
next
jnext
i每執行一次next
i變數i的值加1，然後判斷i的值是否大於
fori=1to
3to後面的3，如果是迴圈結束，如果不是迴圈繼續，當i=3時，i的值不大於3，繼續執行迴圈，然後執行next
i語句，i的值加1變為4，此時i大於3，迴圈結束，所以最終輸出的i是4
vb for 迴圈語句 問題
關於vb中if語句中的理解問題
9樓：匿名使用者
不妨把第1、2句改寫成如下形式:
if option1.value thenn = 60
endif
if option2.value thenn = 360
endif
第1行option1.value值為真時，執行第2行，否則順序執行if...endif結構後的那一行，即第4行
而現在的形式：if option1.value then n = 60，按語法規定不需要寫endif，意思同上：如果條件滿足執行then後面的語句，否則，執行if 結構後面的那句
10樓：匿名使用者
這個很好理解，一組option可以同時不被選中，但不會同時被選中，一般我們會在程式裡或控制元件屬性裡設定一組option裡的某個option預設是被選中的，這樣再來看你的程式，假如option1和option2預設設定為option1是預設選中的，你就應該明白這段程式的意思了。
11樓：匿名使用者
if then 寫成一行，可以不用end if第一句：option1.value 為真，則n=60;
。。。。
逐句執行，程式初始化常用這種方式。
vb的if語句中的問題
12樓：匿名使用者
這個就是正確的：
if text1.text = "" thenmsgbox "請輸入內容"
end if
if len(text1.text) > 0 and text1.text <> "正確內容" then
msgbox "請輸入一個正確內容"
end if
if text1.text = "正確內容" thenmsgbox "通過"
end if
在給你分析一下你的錯誤在哪，
if text1.text = "" thenmsgbox "請輸入內容"
else （在這裡，else的意思是隻要text1.text不為空，就執行下面的語句，所以包括你輸入「正確內容」，都會執行下面的語句）
msgbox "請輸入一個正確內容"
end if
if text1.text = "正確內容" thenmsgbox "通過"
end if
13樓：孤本輕狂
你所說的正確內容是什麼？比如數字？文字？沒有標準可沒辦法呀！
14樓：樹葉當作衣
正確的應該這樣寫：
if text1.text = "" thenmsgbox "請輸入內容"
else if text1.text = "正確內容" thenmsgbox "通過"
else
msgbox "請輸入一個正確內容"
end if
15樓：匿名使用者
樹葉當作衣
是正確的
vb中if語句問題 20
16樓：公子七哥
如果已經15級再點選就不能強化了唄？所以在強化之前先判斷是不是到了15級，如果是15級了就直接結束子程式。
private sub label1_click()
if cmdint =15
msgbox "當前已為最高階，暫時無法繼續強化哦！快拿起你的+15神器去擊敗黑暗大將吧！"
end sub
end if
cmdint = cmdint + 1
if cmdint = 1 then
msgbox "恭喜您強化成功！當前強化等級為+1，不愧是被龍神選中的人啊"
else
if cmdint <15
msgbox "恭喜您強化成功！當前強化等級為+" & str(cmdint) & "不愧是被龍神選中的人啊"
end if
if cmdint = 15 then
msgbox "當前已為最高階，暫時無法繼續強化哦！快拿起你的+15神器去擊敗黑暗大將吧！"
end if
end if
end sub
好像，不用判斷cmdlnt是不是等於1吧，如下：
private sub label1_click()
if cmdint =15
msgbox "當前已為最高階，暫時無法繼續強化哦！快拿起你的+15神器去擊敗黑暗大將吧！"
end sub
end if
cmdint = cmdint + 1
msgbox "恭喜您強化成功！當前強化等級為+" & str(cmdint) & "不愧是被龍神選中的人啊"
if cmdint = 15 then
msgbox "當前已為最高階，暫時無法繼續強化哦！快拿起你的+15神器去擊敗黑暗大將吧！"
end if
end sub
個人認為，後面第二處if cmdlnt = 15 then ... end if 這幾行可以不用的。如下：
private sub label1_click()
if cmdint =15
msgbox "當前已為最高階，暫時無法繼續強化哦！快拿起你的+15神器去擊敗黑暗大將吧！"
end sub
end if
cmdint = cmdint + 1
msgbox "恭喜您強化成功！當前強化等級為+" & str(cmdint) & "不愧是被龍神選中的人啊"
end sub
17樓：匿名使用者
dim cmdint
private sub label1_click()cmdint = cmdint + 1
if cmdint = 1 then
msgbox "恭喜您強化成功！當前強化等級為+1，不愧是被龍神選中的人啊"
else
if cmdint >= 15 then
msgbox "當前已為最高階，暫時無法繼續強化哦！快拿起你的+15神器去擊敗黑暗大將吧！"
else
msgbox "恭喜您強化成功！但前強化等級為+" & str(cmdint) & "不愧是被龍神選中的人啊"
end if
end if
end sub
18樓：
private sub label1_click()
cmdint = cmdint + 1
if cmdint = 1 then
msgbox "恭喜您強化成功！當前強化等級為+1，不愧是被龍神選中的人啊"
else
if cmdint <15
msgbox "恭喜您強化成功！但前強化等級為+" & str(cmdint) & "不愧是被龍神選中的人啊"
end if
if cmdint = 15 then
msgbox "當前已為最高階，暫時無法繼續強化哦！快拿起你的+15神器去擊敗黑暗大將吧！"
end if
if cmdint >15
msgbox "當前已為最高階，暫時無法繼續強化哦！快拿起你的+15神器去擊敗黑暗大將吧！"
end if
end if
end sub
19樓：介澤祕俊賢
private sub form_click()dim x
'此時，雖然沒有給x賦初值，但系統已經把它的值設為0if x then '非0為真，0為假
print x
else
'x=0，所以執行到這裡，此時x+1=1
print x + 1
end if
end sub
VB如何連續使用IF語句，VB if語句中怎麼迴圈啊
第二個 if 結束應該是 end if 第二個if 沒有endif啊 vb if語句中怎麼迴圈啊 定義n為全域性變數或區域性靜態變數。區域性表態變數如下寫 private sub timer1 timer static n as intger if label4.fontsize 100 thenl...
vb迴圈問題，VB迴圈語句問題 for i 1 to
在你的控制控制元件的click事件中編寫 要控制控制元件的名稱.enable trun false 你說的迴圈可以通過開關控制 即通過一個變數判斷應該執行什麼 如 private sub command1 click if command2.enabled false then command2.e...
tmp在vb中什麼意思,vb中這條語句的意思是什麼tmpak
首先這是來個變數名，名字 自本身並不bai具有實際意義，完全由du程式設計者根據自己zhi的喜好設定 當然要dao符合vb的命名規則 就好比問 姚明是什麼意思 一樣。其次，英文的 臨時 是 temporary 所以通常用tmp或temp來作為臨時變數名。vb中這條語句的意思是什麼 tmp a k t...