1樓：匿名使用者
private sub command1_click()if text1 = "潘安" then
msgbox "當然"
elseif text1 = "劉德華" thenmsgbox "當然"
else
msgbox "扯蛋吧你"
end if
end sub
'如果可選項比較多的時候，建議使用 select case 語句。當你水平再高一點要學會 or 和 and ，會更方便
private sub command2_click()select case text1
case "潘安"
msgbox "當然"
case "劉德華"
msgbox "當然"
case "某某某"
msgbox "當然"
case else
msgbox "扯蛋吧你"
end select
end sub
2樓：匿名使用者
if text1="潘安" or text1="劉德華" thenmsgbox "當然"
else
msgbox "扯淡吧你"
end if
你要加多少，就用or 然後加上判斷的就可以了
一道VB基礎題目，一道VB題目
private sub c1 click dim temp as string temp c2.caption c2.caption text1 text1 temp end sub c1按鈕click dim str as string str c2.caption c2.caption text...
求教VB問題，求教乙個VB問題
你用超級計算機 執行你的程式估計就幾分鐘的事情了 呵呵 用數學演算法 33 32 31 30 29 28 6 5 4 3 2 1 1107568 如果用迴圈，那就是 dim s as long for i1 1 to 28 for i2 i1 1 to 29 for i3 i2 1 to 30 fo...
vb的語法問題，VB的語法問題
你上面寫的語句可以理解為 if 方法 then 方法 通常在vb語法大全中的 方法 也就是我們理解的乙個可執行的動作.所以應該可以理解為 if 執行乙個叫close的動作 then 執行乙個叫open的動作很明顯,上面的語句有點不順,呵呵,認該這樣寫 if 狀態 true then 執行動作所以,在...
vb程式設計問題，關於VB程式設計的小問題
這個問題你問的比較到位。在vb裡面，子窗體和父窗體之間有乙個選單是否重疊的設定。你可以進行選擇當子窗體最大化是，子窗體的選單是否和父窗體的重疊。焦點，就是當前的活動物件，也就是說，如果有3個文字框，當你把滑鼠點到第二個上時 你輸入的內容就會在第二個顯示，而其他兩個不會有反應，這個時候其實就是第二個是...
VB程式設計新手問題，VB程式設計中的迴圈問題
隨便畫乙個按鈕叫command1，option explicit private q x private sub command1 click command1.caption q int x rnd end sub private sub form load q array 你好 你今年多大 喂 ...