[計(jì)算機(jī)軟件及應(yīng)用]vb第4章教案-預(yù)覽頁(yè)
【正文】 ：對(duì)條件進(jìn)行測(cè)試，若條件成立 (為真值 )，則取第一個(gè) 值 (即 “ 條件為真時(shí)的值 ” )，否則取第二個(gè)值 (即 “ 條件為假時(shí)的值 ” ) 如：將 a、 b中的小數(shù)，放入 Min Min=IIf(a＜ b,a,b) 條件語(yǔ)句的嵌套 Then和 Else后面的語(yǔ)句塊包含另一個(gè)條件語(yǔ)句。取系統(tǒng)的時(shí)間 FontSize = 30 : ForeColor = RGB(255, 0, 0) BackColor = RGB(255, 255, 0) If h 12 Then Print 早上好！ Else If h 18 Then Print 下午好！ Else Print 晚上好！ End If End If End Sub 例 根據(jù)不同的時(shí)間段發(fā)出問(wèn)候語(yǔ) 例 If 條件 1 Then 語(yǔ)句塊 1 ElseIf 條件 2 Then 語(yǔ)句塊 2 ElseIf 條件 3 Then 語(yǔ)句塊 3 …… ［ Else 語(yǔ)句塊 n］ End If 先測(cè)試條件 1，如果為假，就依次測(cè)試條件 2，依此類推，直到找到為真的條件。 Select Case 測(cè)試表達(dá)式 Case 表達(dá)式表 1 語(yǔ)句塊 1 ［ Case 表達(dá)式表 2 語(yǔ)句塊 2］ . . . ［ Case Else 語(yǔ)句塊 n End Select 先計(jì)算表達(dá)式的值，然后將該值依次與結(jié)構(gòu)中的每個(gè) Case的值進(jìn)行比較，如果該值符合某個(gè) Case指定的值條件時(shí)，就執(zhí)行該Case的語(yǔ)句塊，然后跳到 End Select，從 End Select出口。 1. 單選按鈕的用途 單選按鈕 (OptionButton)控件由一個(gè)圓圈“○”及緊挨它的文 字組成，能提供“選中”和“未選中”兩種可選項(xiàng)。復(fù)選框控件與單選按鈕控 件區(qū)別在于：前者可同時(shí)選中多個(gè)選項(xiàng)。判復(fù)選框 2是否選中 = True Else = False End If End Sub Private Sub Check3_Click() If = 1 Then 39。其 在設(shè)計(jì)時(shí)顯示為一時(shí)鐘圖標(biāo)，運(yùn)行時(shí)計(jì)時(shí)器不顯示。也就是說(shuō)，計(jì)時(shí)器控件 對(duì)象在間隔了一個(gè) Interval設(shè)定時(shí)間后，便觸發(fā)一次 Timer事件。Time是時(shí)間函數(shù) End Sub 例 運(yùn)行界面 設(shè)計(jì)界面 計(jì)時(shí)器 (Timer)每隔一定的時(shí)間間隔自動(dòng)產(chǎn)生一次 Timer事件和執(zhí)行 Timer事件過(guò)程 這個(gè)時(shí)間間隔由 Interval屬性設(shè)定 利用這個(gè)特性來(lái)定時(shí)控制某些操作 例 電子倒計(jì)時(shí)器。關(guān)閉計(jì)時(shí)器 End Sub Private Sub Command1_Click() 39。打開計(jì)時(shí)器 End Sub Private Sub Timer1_Timer() If s 0 Then s = s 1 Else If m 0 Then m = m 1 s = 59 End If End If = Format(m, 00) = Format(s, 00) If s = 0 And m = 0 Then Beep 39。取數(shù)據(jù) c If a = 0 Then 39。D0 X1 = (b + Sqr(D)) / (2 * a) X2 = (b Sqr(D)) / (2 * a) = X1 = X2 Else 39。 i = R a
教學(xué)課件相關(guān)推薦
鄂ICP備17016276號(hào)-1