vb等級考試題目與評析49-閱讀頁
2024-09-24 10:04本頁面
【正文】 第 1小題 列表框的 ListIndex屬性 用來設(shè)置或返回列表框中當(dāng)前選中的列表項(xiàng)。 打開代碼窗口，補(bǔ)充如下的代碼： Private Sub Form_MouseDown(Button As Integer, _ Shift As Integer, X As Single, Y As Single) If Button = 1 Then = InputBox(請輸入要添加的項(xiàng)目 ) End If If Button = 2 Then = InputBox(請輸入要?jiǎng)h除的項(xiàng)目 ) For i = 0 To 1 If (i) = Then i End If Next i End If End Sub 按要求保存文件即完成本題。 M End Sub 按要求保存文件即完成本題。程序 運(yùn)行后，如果執(zhí)行“讀入數(shù)據(jù)”命令，則讀入 100個(gè)整 數(shù)， 放入一個(gè)數(shù)組中，數(shù)組的下界為 1；如果單擊“計(jì)算并輸出”按鈕，則 把該數(shù)組中下標(biāo)為偶數(shù)的元素在文本框中顯示出來，求出它們的和，并把所 求得的和在窗體上顯示出來；如果單擊“存盤”按鈕，則把所求得的和存入 考生文件夾下的 。窗體文件 中的 ReadData過程可以把 100個(gè)整數(shù)讀入 Arr數(shù)組中； 而 WriteData過程可以把指定的整數(shù)值寫到考生文件夾下指定的文件中（整 數(shù)值通過計(jì)算求得，文件名為 ）。存盤時(shí)，工程文件名仍為 ，窗體文件名仍為 。 Random 隨機(jī)存取方式，也是默認(rèn)存取方式。在這種方式下，可以用 Get和 Put語句對文件中任意字節(jié)位置的信息進(jìn)行讀寫。鎖定類型包括： Lock Shared 允許機(jī)器上任何進(jìn)程讀寫該文件 Lock Read 不允許其他進(jìn)程讀該文件 Lock Write 不允許其他進(jìn)程寫該文件 Lock Read Write 不允許其他進(jìn)程讀寫該文件 “文件號(hào)”是 1到 511之間的某個(gè)整數(shù)，對打開文件的各種操作要靠文件號(hào)來與文件發(fā)生關(guān)系。 Input 語句 用來讀取順序文件的數(shù)據(jù)。語法為： Print 文件號(hào)， [[Spc（ n)|Tab（ n)] [表達(dá)式列表 ] [。 分號(hào)表示后續(xù)寫入的數(shù)據(jù)將接著當(dāng)前的數(shù)據(jù)尾部寫入；逗號(hào)表示在當(dāng)前寫入的數(shù)據(jù)后換行。語法為： Close 文件號(hào) 解題方法： 打開工程文件 ，點(diǎn)擊工具里的菜單編輯器，建立三個(gè)菜單分別為 Read、 Calc和 Save，標(biāo)題分別為“讀入數(shù)據(jù)”、“計(jì)算并輸出”和“存盤”。 Arr(i) amp。
公司管理相關(guān)推薦
鄂ICP備17016276號(hào)-1