上海計(jì)算機(jī)二級vb試題-資料下載頁
2025-03-24 05:46本頁面
【正文】 Print ______(1)________= InputBox(請輸入右移位數(shù)：) For i = 1 To m Print 第 amp。 i amp。 次右移后：。 Call________(2)__________ Next iEnd SubSub RightShift(ByRef s()) Dim Last$, i%, n% n =________(3)__________ Last = s(n) For i = n To 1 Step 1 ‘ 逐位右移 s(i) = ________(4)__________ Next i s(0) = ________(5)__________ For i = 0 To n ‘ 顯示右移后的結(jié)果 Print s(i) amp。 。 Next i PrintEnd Sub答案：（1）m （2）RightShift(a) （3）UBound(s) （4）s(i 1) （5）Last四、編程題（35分）1．參見樣例，在Form1窗體上放置2個(gè)列表框。建立如下菜單：菜單項(xiàng)菜單名備注應(yīng)用Menu1一級菜單…產(chǎn)生Menu11二級菜單…計(jì)算Menu12二級菜單bar分隔線…結(jié)束Menu13二級菜單繪圖Menu2一級菜單在Form2上，放置“繪圖”和“返回”2個(gè)命令按鈕。2．單擊“產(chǎn)生”菜單項(xiàng)，在列表框List1中隨機(jī)生成10個(gè)3位正整數(shù)。單擊“計(jì)算”菜單項(xiàng)，在列表框List2中顯示List1各數(shù)據(jù)項(xiàng)每位數(shù)之和。3．單擊“繪圖”菜單項(xiàng)時(shí)，顯示窗體2，并隱藏窗體1；單擊結(jié)束菜單項(xiàng)時(shí)，結(jié)束程序的運(yùn)行。4．在窗體2上單擊“繪圖”命令按鈕，定義窗體坐標(biāo)系(1, 60)(20, 60)，繪制坐標(biāo)軸線；按公式y(tǒng) = (3 * Sin(x) + Cos(5 * x)) * 20繪制直線（0≤ x ≤20）。單擊“返回”命令按鈕則關(guān)閉窗體2，顯示窗體1。5．在C:\KS 、Form 。 整理分享
范文總結(jié)相關(guān)推薦
鄂ICP備17016276號-1