vb等級考試題目與評析43-wenkub
2022-09-16 20:42:58 本頁面
【正文】 3）程序運行后，單擊滾動條兩端的箭頭時，滾動框移動的增量值為 2 4）程序運行后，單擊滾動框前面或后面的部位時，滾動框移動的增量值 為 10 5）滾動框的初始位置為 100 程序的運行情況如圖所示。 要求： 不要編寫任何代碼。 程序的運行情況如圖 2所示。再選中窗體，設置其 Caption屬性為“設置滾動條屬性”。 其功能是產(chǎn)生 20個 0～ 1000的隨機整數(shù)，放入一個數(shù)組中，然后輸出這 20 個整數(shù)中大于 500的所有整數(shù)之和。最后把修改后的文件按原文件名 存盤。 要求： 請勿改動程序中的任何內(nèi)容，只在 Function Fun()和 End Function之間 填入你編寫的若干語句。打開工程文件 體文件名為 ，在代碼窗口中補充如下代碼： Function Fun() Dim i As Integer Dim temp As Integer For i = 0 To 100 If i Mod 7 0 Then temp = temp + i End If Next i Fun = temp End Function 按要求保存文件即完成本題。 最后把修改后的文件按原文件名存 盤。在這種方式下，可以用 Get和 Put語句對文件中任意字節(jié)位置的信息進行讀寫。 Input 語句 用來讀取順序文件的數(shù)據(jù)。 分號表示后續(xù)寫入的數(shù)據(jù)將接著當前的數(shù)據(jù)尾部寫入；逗號表示在當前寫入的數(shù)據(jù)后換行。 For Input As 1 For i = 1 To N For j = 1 To M Input 1, Mat(i, j) Next j Next i Close 1 Print Print 初始矩陣為 ： Print For i = 1 To N For j = 1 To M
公司管理相關推薦
鄂ICP備17016276號-1