[單項(xiàng)選擇題] 在窗體上畫—個(gè)命令按鈕，然后編寫如下事件過(guò)程： Private Sub Command1_Click() Dim I, Num Randomize Do For I=1 To 1000 Num=Int(Rnd*100) Print Num； Select Case NumCase 12 Exit ForCase 58 Exit DoCase 65,68,92 End End Select Next I Loop End Sub 上述事件過(guò)程執(zhí)行后，下列描述中正確的是______。

A．Do循環(huán)執(zhí)行的次數(shù)為1000次

B．在For循環(huán)中產(chǎn)生的隨機(jī)數(shù)小于或等于100

C．當(dāng)所產(chǎn)生的隨機(jī)數(shù)為12時(shí)結(jié)束所有循環(huán)

D．當(dāng)所產(chǎn)生的隨機(jī)數(shù)為65、68或92時(shí)窗體關(guān)閉、程序結(jié)束

D

[知識(shí)點(diǎn)] 循環(huán)語(yǔ)句和分支語(yǔ)句[評(píng)析] 首先有一個(gè)Do循環(huán)作為外層循環(huán)：Do[語(yǔ)句塊]Loop。在這種情況下，程序?qū)⒉煌５貓?zhí)行Do和Loop之間的“語(yǔ)句塊”。接著是一個(gè)內(nèi)循環(huán)，即For循環(huán)，并且變量的初值為1，終值為1000，步長(zhǎng)為1，每執(zhí)行一次循環(huán)，變量的值自動(dòng)加1，接著生成一個(gè)100之內(nèi)的隨機(jī)數(shù)賦給變量Num。輸出變量Num的值，最后是一個(gè)多分支控制結(jié)構(gòu)，多分支語(yǔ)句的格式為： Select Case測(cè)試表達(dá)式 Case表達(dá)式表列1 語(yǔ)句塊1 [case表達(dá)式表列2 語(yǔ)句塊2… [Case Else[語(yǔ)句塊n]] End Select多分支語(yǔ)句通過(guò)情況語(yǔ)句來(lái)實(shí)現(xiàn)，以Select Case開頭，以End Select結(jié)束。功能是，根據(jù)“測(cè)試表達(dá)式”的值，從多個(gè)語(yǔ)句塊中選擇符合條件的一個(gè)語(yǔ)句塊執(zhí)行。隨機(jī)數(shù)的公式為：Int((upperbound—lowerbound+1)*Rnd+lowerbound)，由題目中的Int(Rnd*100)可知，隨機(jī)數(shù)的取值范圍為0～99，所以隨機(jī)數(shù)不可能取到100，選項(xiàng)B不正確。根據(jù)題意，通過(guò)Num變量的值來(lái)控制程序的走向。第一種情況：如果產(chǎn)生的隨機(jī)數(shù)的值為12，則結(jié)束For循環(huán)，即內(nèi)循環(huán)停止執(zhí)行，但是外循環(huán)還繼續(xù)執(zhí)行，所以選項(xiàng)C不正確，隨機(jī)數(shù)為12時(shí)不會(huì)結(jié)束所有循環(huán)，只是結(jié)束了內(nèi)循環(huán)。第二種情況：如果產(chǎn)生的隨機(jī)數(shù)為58則結(jié)束Do循環(huán)，同時(shí)內(nèi)循環(huán)也停止，所以Do循環(huán)不一定執(zhí)行1000次，選項(xiàng)A不正確。第三種情況：如果產(chǎn)生的隨機(jī)數(shù)的值是65、68或92，則執(zhí)行End方法，End是VB中關(guān)閉表單的方法，所以當(dāng)所產(chǎn)生的隨機(jī)數(shù)為65、68或92時(shí)窗體關(guān)閉、程序結(jié)束。本題答案為D。