某Visual Basic程序如下：
Private Sub Command1_Click（　?。?br />Dim a（1To 10）As Integer
Dim i As Integer
a（1）=1
For i=2To 10
a（i）=a（i-1）+i
List1AddItem Str（a（i））
Next i
End Sub
運(yùn)行程序，單擊命令按鈕Command1后，出現(xiàn)的錯(cuò)誤提示為（　?。?/h1>

A．下標(biāo)越界	B．子程序或函數(shù)未定義
C．溢出	D．類型不匹配

【答案】B

【解答】

【點(diǎn)評(píng)】

聲明：本試題解析著作權(quán)屬菁優(yōu)網(wǎng)所有，未經(jīng)書面同意，不得復(fù)制發(fā)布。

發(fā)布：2024/6/27 10:35:59組卷：3引用：1難度：0.1

相似題

1．《孫子算經(jīng)》中提出“物不知其數(shù)”的問題，此數(shù)以3除余2，以5除余3，以7除余2．以下程序段是求指定范圍內(nèi)滿足該問題條件的自然數(shù)及其個(gè)數(shù)。
k=0'用來計(jì)數(shù)
Max=Val（Text1．Text）'指定范圍
n=9'①
Do While n＜=Max
If n Mod 3=2And n Mod 5=3Then'②
List1．AddItem Str（n）
End If
n=n+7'③
k=k+1 ④
Loop
Label1．Caption=Str（Max） &“范圍內(nèi)滿足問題的數(shù)有“& Str（k） &“個(gè)“
運(yùn)行程序，在文本框中輸入自然數(shù)600，結(jié)果統(tǒng)計(jì)的個(gè)數(shù)與列表框中輸出的個(gè)數(shù)不相符，如圖所示：請(qǐng)問出現(xiàn)此問題的原因是（　?。?/h2>

A．語句①錯(cuò)，應(yīng)改為n=0

B．語句②應(yīng)改為n Mod 3=2 And n Mod 5=3 and n Mod 7=2

C．語句③錯(cuò)，應(yīng)改為n=n+1

D．語句④的位置不正確，應(yīng)該移到語句②的下一行

發(fā)布：2024/10/26 17:0:2組卷：4引用：1難度：0.4

A．語句①不正確，應(yīng)改為n=0

B．語句②不正確，應(yīng)改為n Mod 3=2 And n Mod 5=3 and n Mod 7=2

C．語句③的位置不正確，應(yīng)移至語句②的上一行

D．語句④的位置不正確，應(yīng)移至語句②的下一行

發(fā)布：2024/10/26 17:0:2組卷：9引用：1難度：0.5

把好題分享給你的好友吧~~