垂直升降式電梯里的顯示屏?xí)?dòng)態(tài)顯示朝上或者朝下的箭頭。小鄭編寫了一個(gè) VB 程序,模擬箭頭往上、往下的移動(dòng),以及箭頭方向的調(diào)轉(zhuǎn)。運(yùn)行程序時(shí),數(shù)組元素 a(1)到 a(64)存儲(chǔ) 0 或 1(如圖 1),分別表示空字符和星號(hào),并在列表框 List1 中顯示相應(yīng)的圖形(如圖 2)。單擊“上移”按鈕,箭頭向上移動(dòng)一個(gè)位置,超出上邊界的圖形則繼續(xù)從下邊界往上移(如圖 3);單擊“下移”按鈕,箭頭向下移動(dòng)一個(gè)位置;單擊“調(diào)頭”按鈕,則切換箭頭的上下朝向。
請(qǐng)回答下列問題:
(1)List1.AddItem 中的 AddItem 是對(duì)象 List1 的 CC(單選,填字母:A.對(duì)象名/B.屬性名
/C.方法名/D.事件名)。
(2)實(shí)現(xiàn)上述功能的 VB 程序如下,請(qǐng)?jiān)跈M線處填入合適的代碼。
(3)程序執(zhí)行到加框處代碼時(shí),會(huì)彈出錯(cuò)誤提示 BB(單選,填字母:A.溢出/B.下標(biāo)越界/C.類型不匹配)。為了使程序能正常實(shí)現(xiàn)圖形的上移和顯示功能,加框處的代碼改為 s=s+b(a(i))s=s+b(a(i))。
Dim a(1 To 64)As Integer
Dim b(0 to 1)As String Private Sub Form_Load ( ?。?br />b(0)=““:b(1)=“*“
'給數(shù)組 a 賦初值,并在列表框 List1 顯示箭頭圖形,代碼略
End Sub
Private Sub up_Click ( )
Dim i As Integer,j As Integer,s As String,tmp As Integer List1.Clear
For i=1 To 8'將第i 列數(shù)據(jù)向上平移一個(gè)位置
tmp=①a(i)a(i)
For j=2 To 8
a((j-2)*8+i)=a(②(j-1)*8+i(j-1)*8+i)
Next j
a(7*8+i)=tmp Next i
s=““
s=s+b(i)
For i=1 To 64
If i Mod 8=0 Then List1.AddItem s:s=““Next i
End Sub
Private Sub turn_Click ( ?。?br />‘調(diào)轉(zhuǎn)箭頭方向(朝上的變?yōu)槌?,朝下的變?yōu)槌希?,代碼略 End Sub
Private Sub down_Click ( )
‘圖形向下移動(dòng)一個(gè)位置,代碼略End Sub
【考點(diǎn)】應(yīng)用程序的試運(yùn)行和保存.
【答案】C;B;s=s+b(a(i));a(i);(j-1)*8+i
【解答】
【點(diǎn)評(píng)】
聲明:本試題解析著作權(quán)屬菁優(yōu)網(wǎng)所有,未經(jīng)書面同意,不得復(fù)制發(fā)布。
發(fā)布:2024/4/20 14:35:0組卷:1引用:1難度:0.5
相似題
-
1.有如下VB程序段:
執(zhí)行該程序段后,變量c的值是( ?。?/h2>發(fā)布:2024/12/16 5:0:1組卷:1引用:2難度:0.3 -
2.由大寫字母組成的長(zhǎng)度相同的兩個(gè)字符串s1和s2,檢測(cè)各字母的數(shù)量,如“ABDAC”與“AABCD”所含字母數(shù)量一樣,與“AABBC”所含字母數(shù)量不一樣。實(shí)現(xiàn)該功能的VB程序段如下:
填空處的代碼可以由以下部分組成:
①Text2.Text ②val(Text2.Text) ③b(a)=b(a)+1 ④b(a)=b(a)-1 ⑤b(i)<>0⑥b(i)=0
代碼順序正確的是( ?。?/h2>發(fā)布:2024/12/16 9:30:1組卷:3引用:3難度:0.4 -
3.小明用python語言中對(duì)大小為100*100像素的圖像“上.jpg”(如圖所示)進(jìn)行簡(jiǎn)單處理,部分代碼如圖:
程序執(zhí)行后的圖像效果是( ?。?/h2>發(fā)布:2024/12/20 9:30:2組卷:3引用:5難度:0.4
把好題分享給你的好友吧~~