vb等級考試題目與評析52(參考版)
2024-09-08 16:52本頁面
【正文】 Next j Print Next i End Sub 按要求進行操作并保存文件即完成本題。 Next j Print Next i For i = 1 To N t = Mat(i, 2) Mat(i, 2) = Mat(i, 4) Mat(i, 4) = t Next i Print Print 交換第二列和第四列后的矩陣為 ： Print For i = 1 To N For j = 1 To M Print Tab(5 * 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 Print Tab(5 * j)。語法為： Close 文件號 解題方法： 打開工程文件 ，輸入如下的代碼： Option Base 1 Private Sub Form_Click() Const N = 5 Const M = 5 Dim Mat(1 To N, 1 To M) As Integer Dim i, j, t Open amp。 分號表示后續(xù)寫入的數(shù)據(jù)將接著當前的 數(shù)據(jù)尾部寫入；逗號表示在當前寫入的數(shù)據(jù)后換行。語法為： Print 文件號， [[Spc（ n)|Tab（ n)] [表達式列表 ] [。 Input 語句 用來讀取順序文件的數(shù)據(jù)。鎖定類型包括： Lock Shared 允許機器上任何進程讀寫該文件 Lock Read 不允許其他進程讀該文件 Lock Write 不允許其他進程寫該文件 Lock Read Write 不允許其他進程讀寫該文件 “文件號”是 1到 511之間的某個整數(shù)，對打開文件的各種操作要靠文件號來與文件發(fā)生關(guān)系。 在這種方式下，可以用 Get和 Put語句對文件中任意字節(jié)位置的信息進行讀寫。 Random 隨機存取方式，也是默認存取方式
公司管理相關(guān)推薦
鄂ICP備17016276號-1