【正文】
觀是A) B)C) D)(19)設(shè)在窗體中有一個(gè)名稱為L(zhǎng)ist1的列表框,其中有若干個(gè)項(xiàng)目(如圖)。要求選中某一項(xiàng)后單擊Command1按鈕,就刪除選中的項(xiàng),則正確的事件過(guò)程是A)Private Sub Command1_Click() End Sub B)Private Sub Command1_Click() End SubC)Private Sub Command1_Click() End SubD)Private Sub Command1_Click() End Sub(20)某人設(shè)計(jì)了如下程序用于計(jì)算并輸出 7!(7的階乘)Private Sub Command1_Click() t = 0 For k = 7 To 2 Step 1 t = t * k Next Print tEnd Sub執(zhí)行程序時(shí),發(fā)現(xiàn)結(jié)果是錯(cuò)誤的。下面的修改方案中能夠得到正確結(jié)果的是A)把 t=0 改為 t=1B)把 For k = 7 To 2 Step –1 改為 For k = 7 To 1 Step –1C)把 For k = 7 To 2 Step –1 改為 For k=1 To 7D)把 Next 改為 Next k(21)若窗體中已經(jīng)有若干個(gè)不同的單選按鈕,要把它們改為一個(gè)單選按鈕數(shù)組,在屬性窗口中需要且只需要進(jìn)行的操作是A)把所有單選按鈕的Index屬性改為相同值B)把所有單選按鈕的Index屬性改為連續(xù)的不同值C)把所有單選按鈕的Caption屬性值改為相同D)把所有單選按鈕的名稱改為相同,且把它們的Index屬性改為連續(xù)的不同值(22)窗體上有文本框Text1和一個(gè)菜單,菜單標(biāo)題、名稱如表,結(jié)構(gòu)見(jiàn)圖。要求程序執(zhí)行時(shí)單擊“保存”菜單項(xiàng),則把其標(biāo)題顯示在Text1文本框中。下面可實(shí)現(xiàn)此功能的事件過(guò)程是標(biāo)題名稱文件file新建new保存saveA)Private Sub save_Click() B)Private Sub save_Click() = = End Sub End SubC)Private Sub file_Click() D)Private Sub file_Click() = = End Sub End Sub(23)某人在窗體上畫了一個(gè)名稱為Timer1的計(jì)時(shí)器和一個(gè)名稱為L(zhǎng)abel1的標(biāo)簽,計(jì)時(shí)器的屬性設(shè)置為Enabled = True ,Interval = 0 ,并編程如下。希望在程序運(yùn)行時(shí),可以每2秒在標(biāo)簽上顯示一次系統(tǒng)當(dāng)前時(shí)間。Private Sub Timer1_Timer() = Time$End Sub在程序執(zhí)行時(shí)發(fā)現(xiàn)未能實(shí)現(xiàn)上述目的,那么,他應(yīng)做的修改是A)通過(guò)屬性窗口把計(jì)時(shí)器的Interval屬性設(shè)置為2000B)通過(guò)屬性窗口把計(jì)時(shí)器的Enabled屬性設(shè)置為FalseC) = Time$ = Time$D) = Time$ = (24)形狀控件的Shape屬性有6種取值,分別代表6種幾何圖形。下列不屬于這6種幾何圖形的是A) B) C) D)(25)下面關(guān)于文件的敘述中錯(cuò)誤的是A)隨機(jī)文件中各條記錄的長(zhǎng)度是相同的B)打開(kāi)隨機(jī)文件時(shí)采用的文件存取方式應(yīng)該是RandomC)向隨機(jī)文件中寫數(shù)據(jù)應(yīng)使用語(yǔ)句 Print 文件號(hào)D)打開(kāi)隨機(jī)文件與打開(kāi)順文件一樣,都使用Open語(yǔ)句(26)設(shè)窗體上有一個(gè)圖片框Picture1,能實(shí)現(xiàn)此功能的語(yǔ)句是A) = B) = LoadPicture()C)LoadPicture() D)Call LoadPicture()(27)下面程序執(zhí)行時(shí),在窗體上顯示的是Private Sub Command1_Click() Dim a(10) For k = 1 To 10 a(k) = 11 k Next k Print a(a(3) \ a(7) Mod a(5))End SubA)3 B)5 C)7 D)9(28)為達(dá)到把a(bǔ)、b中的值交換后輸出的目的,某人編程如下:Private Sub Command1_Click() a% = 10: b% = 20 Call swap(a, b) Print a, bEnd SubPrivate Sub swap(ByVal a As Integer, ByVal b As Integer) c = a: a = b: b = cEnd Sub在運(yùn)行時(shí)發(fā)現(xiàn)輸出結(jié)果錯(cuò)了,需要修改。下面列出的錯(cuò)誤原因和修改方案中正確的是A)調(diào)用swap過(guò)程的語(yǔ)句錯(cuò)誤,應(yīng)改為:Ca