vb等級考試題目與評析66(編輯修改稿)
2024-10-10 13:01 本頁面
【文章內容簡介】 ****************************** （ 2）在考生文件夾下有一個工程文件 ，相應的窗體文件為 。在窗體上有兩個命令按鈕，其名稱分別為 Command1和 Command2，標題 分別為 開始 和 停止 ；有兩個水平滾動條，其名稱分別為 HScroll1和 HScroll2， Min屬性均為 0， Max屬性均為 100；此外還有一個計時器，其名稱為 Timer1，如圖 1所示。程序的功能是，程序運行后，如果單擊 開始 命令按鈕，則滾動條HScroll1中的滾動框從左向右移動（每次移動一個刻度），移到最右端后，自動回到最左端，再重新向右移動；同時滾動條 HScroll2中的滾動框從右向左移動（每次移動一個刻度），移到最左端后，自動回到最右端，再重新向左移動。如果單擊 停止 按鈕，則兩個滾動條中的 滾動框停止移動，如圖 2所示。 該程序不完整，請把它補充完整。 要求： 去掉程序中的注釋符，把程序中的 ？改為正確的內容，使其能正確運行，但不能修改程序中的其他部分。最后用原來的文件名保存工程文件和窗體文件。 第 1小題： 本題考查的是數(shù)組和隨機函數(shù)的用法，打開工程文件 ，雙擊窗體在代碼窗口中補充如下代碼： Private Sub Form_Click() Dim Mat(4, 4) As Integer Dim N As Integer, M As Integer Dim S As String, T As String N = 4 M = 4 Randomize S = 初始矩陣為： For i = 1 To N S = S amp。 vbCrLf For j = 1 To M Mat(i, j) = Int(Rnd * 100) S = S amp
公司管理相關推薦
鄂ICP備17016276號-1