vb練習(xí)題二含答案(參考版)
2025-06-10 13:38本頁(yè)面
【正文】 。 End Sub以上程序的功能是：用Array函數(shù)建立一個(gè)含有8個(gè)元素的數(shù)組，然后查找并輸出該數(shù)組中各元素的最小值。 Minarr1(1) For i=2 To ___(19)____l 設(shè)有如下程序： Option Base 1 Private Sub Command1_Click() Dim arr1 Dim Min As Integer, i As Integer arr1=Array(12,435,76,24,78,54,866,43) Min=____(18)____ Close 1 End Sub以上程序的功能是：。EOF(1) Line Input 1,aspect$ whole$=whole$+aspect$+Chr$(13)+Chr$(10) Loop =whole$ Close 1 Open d:＼test＼ For Output As1 Print 1, ____(17)____ a(1)=XEnd Subl 在名稱為Form1的窗體上畫一個(gè)文本框，其名稱為Text1，在屬性窗口中把該文本框的MultiLine屬性設(shè)置為True，然后編寫如下的事件過程： Private Sub Form_Click() Open d:＼test＼ For Input As1 Do While Not ____(16)____Next i____(14)____ IfFor i = n To 1 ____(12)____ Step 1x = InputBox(輸入一個(gè)整數(shù)x：)____(11)____ As Integer, j ___
教學(xué)教案相關(guān)推薦
鄂ICP備17016276號(hào)-1