【正文】
1),如圖 1所示。 在考生文件夾下的工程文件 (相應(yīng)的窗體文件名為 ), 可以實(shí)現(xiàn)上述功能。 圖 1 圖 2 ********************************************************************** ( 2)在考生文件夾下有一個(gè)工程文件 (相應(yīng)的窗體文件名為 ),其功能是通過調(diào)用過程 Sort將數(shù)組按升序排序。最后把修改后的文件按原文件名存 盤。打開代碼窗口,補(bǔ)充如下的代碼: Private Sub Add_Click() = InputBox(請(qǐng)輸入要添加的項(xiàng)目 ) End Sub Private Sub Delete_Click() = InputBox(請(qǐng)輸入要?jiǎng)h除的項(xiàng)目 ) For i = 0 To If (i) = Then i End If Next i End Sub 按要求保存文件即完成本題。 在考生文件夾下有一個(gè)工程文件 ,考生可以裝入該文件。 Open語句 Open語句用來打開或建立一個(gè)文件,其語法為: Open 文件名 [for 存取方式 ] [Access 操作方式 ] [鎖定 ] As []文件號(hào) [Len=記錄長度 ] 參數(shù)說明: “存取方式”指文件的輸入輸出方式,可以是以下操作之一: Output 指定順序輸出方式 Input 指定順序輸入方式 Append 指定順序輸出方式 ,與 Output不同的是,用 Append方式打開文件時(shí),文件指針定位于文件尾部,如對(duì)文件執(zhí)行寫操作,則寫入數(shù)據(jù)附加到原來文件的后面。 “操作方式”用來指定訪問文件類型,可以是下列類 型之一: Read 打開只讀文件 Write 打開只寫文件 Read Write 打開讀寫文件 “鎖定”用來限制其他用戶或進(jìn)程對(duì)打開的文件進(jìn)行讀寫操作。語法為: Input 文件號(hào),變量列表 Print 語句 用來把數(shù)據(jù)寫入順序文件。 Close語句 用來關(guān)閉一個(gè)被打開的文件。打開代碼窗口,輸入如下的代碼: Dim temp As Integer Private Sub Calc_Click() = For i = 1 To 100 If Arr(i) = 50 Then = a