basic程序設(shè)計(jì)期末復(fù)習(xí)一-免費(fèi)閱讀
【正文】 Private Sub Text1_KeyPress( [1] ) If KeyAscii = [2] Then If Text1 Then [3] Text1 = Else MsgBox 請先輸入姓名 !, vbOKOnly, 信息提示 End If End If End Sub Private Sub Command1_Click() If = [4] Then [5] Else MsgBox 請先選擇一個項(xiàng)目 !, vbOKOnly, 信息提示 End If End Sub Private Sub Command2_Click() Unload Me End Sub 10 五、編寫程序題 ，要求單擊“開始”按鈕 (Command1)，在列表框 (List1)中輸出 1~100之間偶數(shù)，單擊清除按鈕 (Command2)，清除文本框中的全部內(nèi)容。 [5] If [6] Then Text2 = (學(xué)號 ) Text3 = (姓名 ) Text4 = (籍貫 ) Else MsgBox 要查詢的學(xué)號不存在，請重新輸入 !, vbOKOnly, 信息提示 Text1 = [7] End If End Sub Private Sub Command2_Click() UnLoad Me End 8 2．使用順序文件讀寫方式編寫一個簡單的記事本應(yīng)用程序，其運(yùn)行界面如圖 3 所示。 7． Sub Change(ByVal x As Integer, ByVal y As Integer) Dim t As Integer t = x x = y y = t Print x, y End Sub Private Sub Form_Click() Dim a As Integer, b As Integer a = 10: b = 20 Change a, b Print a, b End Sub 寫出程序運(yùn)行時單擊窗體后， Form1上的輸出結(jié)果。 19． ADO 模型中一般可通過 對象的 Execute 方法執(zhí)行增加、刪除、修改 4 SQL 語句。 12． Vb 應(yīng)用程序與數(shù)據(jù)庫進(jìn)行通信的主要機(jī)制稱為 。 4． 執(zhí)行指令 Line(200,200)(600,600)后， CurrentX 等于 。 A． Load B． Unload C． Click D． LostFocus 4．下列 4 項(xiàng)中合法的變量名是（ ）。 A． 2xyz B． Integer C． xyz D． x_yz 5．表達(dá)式 24 / 2 2 ^ 3 *4 / 4 Mod 5 \ 3（ ） A． 12 B． 16 C． 20 D． 32 6．要清除 List 列表框控件中的所有項(xiàng) 目，可采用的方法是（ ） A． Erase B． Clear C． Click D． Delete 7．下列正確的賦值語句是（ ） A． x+y=z B． 2=x+y C． z=x+y D． x=Integer+2 8．可通過 下列 何種屬性 來設(shè)置或返回 List 列表框控件 中當(dāng)前選定項(xiàng)目的索引 （
環(huán)評公示相關(guān)推薦
鄂ICP備17016276號-1