2013年3月全国计算机等级考试二级VB无纸化上机题题库及答案解析((9)

件过程。

参考代码：

Private Sub cmdDisplay_Click() Dim pers As PalType

Open \ Get #1, 3, pers

txtName.Text = pers.Name txtTel.Text = pers.Tel txtPost.Text = pers.Post Close #1 End Sub

步骤3：按要求将文件保存至考生文件夹中。

步骤4：按键运行程序，先单击\显示第三个记录\按钮，再单击\保存\按钮。

—41—