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

矩陣斜線排序是指按斜線方向從小到大實現(xiàn)排序,如5*5矩陣斜線排序效果如圖所示。
菁優(yōu)網(wǎng)
小明使用VB實現(xiàn)該排序,設(shè)計功能如下:隨機生成兩位正整數(shù)并顯示在List1中,單擊按鈕“Command1”后將排序完成的數(shù)據(jù)顯示在List2中。界面如圖所示。
請回答以下問題:
(1)更改窗體按鈕Command1顯示為“開始排序”,則需要設(shè)置它的
B
B
屬性。(單選,填寫字母:A.Text/B.Caption/C.Name)
(2)請完善程序代碼。Constn=5'矩陣大小
Dima(1Ton*n)AsIntegerPrivateSubForm_Load ( ?。?br />'隨機生成n*n的矩陣數(shù)據(jù),并依次保存在數(shù)組a(1)~a(n*n)中'以n*n矩陣形式在list1中顯示數(shù)據(jù),代碼略
EndSub
PrivateSubCommand1_Click ( ?。?br />DimiAsInteger,jAsInteger,kAsInteger,tAsInteger
DimstartposAsInteger,endposAsInteger,sAsString
Fori=2To2*n-2
Ifi<=nThen
startpos=(i-1)*n+1
endpos=i
Else
startpos=
endpos=(i-n+1)*n
EndIf
DoWhilestartpos>endpos

j=startpos-n+1
DoWhilej>=endpos
Ifa(j)<a(k)Thenk=j
j=j-n+1
Loop
Ifk<>startposThen
t=a(k):a(k)=a(startpos):a(startpos)=t
EndIf
startpos=startpos-n+1
Loop
Nexti
Fori=1Ton
s=““
Forj=1Ton
s=s+
Nextj
List2.AddItems
NextiEndSub

【答案】B
【解答】
【點評】
聲明:本試題解析著作權(quán)屬菁優(yōu)網(wǎng)所有,未經(jīng)書面同意,不得復(fù)制發(fā)布。
發(fā)布:2024/6/27 10:35:59組卷:2引用:1難度:0.5
相似題
  • 1.在Visual Basic中,語句TName.Caption=“2012倫敦”中的TName是( ?。?/h2>

    發(fā)布:2024/5/27 14:0:0組卷:7引用:6難度:0.7
  • 2.對象是由一組表示對象狀態(tài)的數(shù)據(jù)和一組描述處理對象屬性的方法(行為)的代碼構(gòu)成;
     
    (判斷對錯)

    發(fā)布:2024/5/27 14:0:0組卷:6引用:2難度:0.9
  • 菁優(yōu)網(wǎng)3.編號分別為1~n(n為偶數(shù))的學(xué)生分成兩組進行投籃比賽,奇數(shù)編號的為第一組,偶數(shù)編號的為第二組。對每個分組的成績按從高到低排序,先比較處于分組第1位的兩個隊員成績,成績高的得1分,低的扣1分,相等均不得分,再依次比較處于分組相同位置的隊員成績,最后得到每組得分。
        如10名運動員1號到10號的成績分別是“13,6,9,8,10,11,10,14,16,13”,從高到低排序后,第一組的成績依次是“16,13,10,10,9”,第二組的成績依次是“14,13,11,8,6”。第1位的成績分別是16和14,則第一組獲勝得1分,第二組扣1分,再比較兩個分組第2位的成績13和13,則兩組均不得分。依次處理,比較完剩余隊員的成績,可得第一組得分為2,第二組得分為-2。
        編寫一個VB程序,實現(xiàn)如下功能:在文本框Text l中依次輸入成績(偶數(shù)個整數(shù),用逗號分隔并以逗號結(jié)尾),單擊“確定”按鈕Command1后,在列表框Listl中顯示對陣編號、對陣成績及兩個分組的最后得分。程序運行界面如圖所示。
    (1)下列對象不具有Caption屬性的是
     
    (單選,填字母:A.Command1/B.Form1C.Text1/D.Labell)。
    (2)實現(xiàn)上述功能的VB程序如圖,請在橫線處填入合適代碼。
    (3)程序代碼中的加框處代碼有誤,請改正。
    菁優(yōu)網(wǎng)菁優(yōu)網(wǎng)
    菁優(yōu)網(wǎng)

    發(fā)布:2024/6/27 10:35:59組卷:0引用:1難度:0.6
小程序二維碼
把好題分享給你的好友吧~~
APP開發(fā)者:深圳市菁優(yōu)智慧教育股份有限公司 | 應(yīng)用名稱:菁優(yōu)網(wǎng) | 應(yīng)用版本:4.8.2  |  隱私協(xié)議      第三方SDK     用戶服務(wù)條款廣播電視節(jié)目制作經(jīng)營許可證出版物經(jīng)營許可證網(wǎng)站地圖本網(wǎng)部分資源來源于會員上傳,除本網(wǎng)組織的資源外,版權(quán)歸原作者所有,如有侵犯版權(quán),請立刻和本網(wǎng)聯(lián)系并提供證據(jù),本網(wǎng)將在三個工作日內(nèi)改正