試卷征集
加入會員
操作視頻

垂直升降式電梯里的顯示屏會動態(tài)顯示朝上或者朝下的箭頭。小鄭編寫了一個 VB 程序,模擬箭頭往上、往下的移動,以及箭頭方向的調(diào)轉(zhuǎn)。運行程序時,數(shù)組元素 a(1)到 a(64)存儲 0 或 1(如圖 1),分別表示空字符和星號,并在列表框 List1 中顯示相應的圖形(如圖 2)。單擊“上移”按鈕,箭頭向上移動一個位置,超出上邊界的圖形則繼續(xù)從下邊界往上移(如圖 3);單擊“下移”按鈕,箭頭向下移動一個位置;單擊“調(diào)頭”按鈕,則切換箭頭的上下朝向。
菁優(yōu)網(wǎng)
請回答下列問題:
(1)List1.AddItem 中的 AddItem 是對象 List1 的
C
C
(單選,填字母:A.對象名/B.屬性名
/C.方法名/D.事件名)。
(2)實現(xiàn)上述功能的 VB 程序如下,請在橫線處填入合適的代碼。
(3)程序執(zhí)行到加框處代碼時,會彈出錯誤提示
B
B
(單選,填字母:A.溢出/B.下標越界/C.類型不匹配)。為了使程序能正常實現(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ù)向上平移一個位置
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 (  )
‘圖形向下移動一個位置,代碼略End Sub

【答案】C;B;s=s+b(a(i));a(i);(j-1)*8+i
【解答】
【點評】
聲明:本試題解析著作權屬菁優(yōu)網(wǎng)所有,未經(jīng)書面同意,不得復制發(fā)布。
發(fā)布:2024/4/20 14:35:0組卷:1引用:1難度:0.5
相似題
  • 1.有如下VB程序段:
    菁優(yōu)網(wǎng)
    執(zhí)行該程序段后,變量c的值是( ?。?/h2>

    發(fā)布:2024/12/16 5:0:1組卷:1引用:2難度:0.3
  • 2.由大寫字母組成的長度相同的兩個字符串s1和s2,檢測各字母的數(shù)量,如“ABDAC”與“AABCD”所含字母數(shù)量一樣,與“AABBC”所含字母數(shù)量不一樣。實現(xiàn)該功能的VB程序段如下:
    菁優(yōu)網(wǎng)
    填空處的代碼可以由以下部分組成:
    ①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
  • 菁優(yōu)網(wǎng)3.小明用python語言中對大小為100*100像素的圖像“上.jpg”(如圖所示)進行簡單處理,部分代碼如圖:
    菁優(yōu)網(wǎng)
    程序執(zhí)行后的圖像效果是( ?。?/h2>

    發(fā)布:2024/12/20 9:30:2組卷:3引用:5難度:0.4
小程序二維碼
把好題分享給你的好友吧~~
APP開發(fā)者:深圳市菁優(yōu)智慧教育股份有限公司| 應用名稱:菁優(yōu)網(wǎng) | 應用版本:5.0.7 |隱私協(xié)議|第三方SDK|用戶服務條款
本網(wǎng)部分資源來源于會員上傳,除本網(wǎng)組織的資源外,版權歸原作者所有,如有侵犯版權,請立刻和本網(wǎng)聯(lián)系并提供證據(jù),本網(wǎng)將在三個工作日內(nèi)改正