vb等級考試題目與評析27-閱讀頁
2024-09-24 16:53本頁面
【正文】 10并截尾取整后相乘，其結(jié)果放入第三個數(shù)組中（即：把第一個數(shù) 組的第 n個元素除以 10截尾取整，再把第二個數(shù)組的第 n元素除以 10 截尾 取整，兩者相乘后的結(jié)果作為第三個數(shù)組的第 n個元素。 在考生文件夾下有一個工程文件 ，考生可以裝入該文件。 注意： 考生不得修改窗體文件中已經(jīng)存在的程序。 Open語句 Open語句用來打開或建立一個文件，其語法為： Open 文件名 [for 存取方式 ] [Access 操作方式 ] [鎖定 ] As []文件號 [Len=記錄長度 ] 參數(shù)說明： “存取方式”指文件的輸入輸出方式，可以是以下操作之一： Output 指定順序輸出方式 Input 指定順序輸入方式 Append 指定順序輸出方式 ,與 Output不同的是，用 Append方式打開文件時，文件指針定位于文件尾部，如對文件執(zhí)行寫操作，則寫入數(shù)據(jù)附加到原來文件的后面。 Binary 指定二進(jìn)制方式文件。 “操作方式”用來指定訪問文件類型，可以是下列類型之一： Read 打開只讀文件 Write 打開只寫文件 Read Write 打開讀寫文件 “鎖定”用來限制其他用戶或進(jìn)程對打開的文件進(jìn)行讀 寫操作。 “記錄長度”對于隨機(jī)方式打開的文件，指記錄長度；對于順序文件，指緩沖字符數(shù)。語法為： Input 文件號，變量列表 Print 語句 用來把 數(shù)據(jù)寫入順序文件。|,]] Spc（ n)函數(shù)用來在當(dāng)前的輸出位置加入 n個空白； Tab（ n)函數(shù)用來設(shè)置在第 n個位置寫入數(shù)據(jù)。 Close語句 用來關(guān)閉一個被打開的文件。 打開代碼窗口，輸入如下的代碼： Private Sub C1_Click（ ) ReadData1 ReadData2 End Sub Private Sub C2_Click（ ) Dim arr3（ 20) As Integer Sum = 0 For i = 1 To 20 arr3（ i) = Int（ Arr1（ i) / 10) * Int（ Arr2（ i) / 10) Sum = Sum + arr3（ i) Next Print Sum End Sub 在上面的程序段中，通過循環(huán)將數(shù)組 Arr1和 Arr2的值訪問一遍，通過 arr3（ i) = Int（ Arr1（ i) / 10) * Int（ Arr2（ i) / 10)一句將數(shù)組 Arr1和 Arr2中下標(biāo)相同的元素分別除以 10，然后取整，再把兩個取整后的數(shù)的乘積賦值給 arr3（ i)；通過 Sum = Sum + arr3（ i)一句累加出數(shù)組 arr（ 3)中所有元素的和。 Private Sub C3_Click（ ) WriteData , Sum End Sub
公司管理相關(guān)推薦
鄂ICP備17016276號-1