为丫从当前文件夹中读入文件File1．txt，某人编写了下面的程序：

Private Sub Command1_Click（　　）

Open"File1．txt"For Output As#20

Do While Not EOF(20)

Line Input#20，ch$

Print ch

Loop

Close#20

End Sub

程序调试时，发现有错误，下面的修改方案中正确的是（　　）。

在考生文件夹下有工程文件si5．vbp及窗体文件sj5．frm，该程序是不完整的。窗体Forml中有一命令按钮与一个水平滚动条。命令按钮的名称为Command1，标题为“移动”；水平滚动条的名称为HScroll1。单击“移动”按钮后，在弹出的对话框中输人数值。输入一个整数后，单击“移动”，滚动条中的滚动块移动到指定的刻度，如果超过了滚动条的最大刻度，则不再移动，并且在窗体上显示“输入的数值太大”，如果超过了滚动条的最小刻度，则不再移动，并且在窗体上显示“输入的数值太小”，如图1—5所示。

注意：请在有“?”的地方填入正确内容，然后删除“?”及代码前的所有注释符(即“¨’号)，但不能修改其他部分。存盘时不得改变文件名和文件夹。

在考生文件夹下有一个工程文件sj3．vbp，相应的窗体文件为sj3．{rm。其功能是在Text文本框中输入一个数N，单击命令按钮计算从0到N的所有素数的和，并在Text2中显示出来。运行程序如图7-3所示。

注意：去掉程序中的注释符“'”，把程序中的“?”改为正确的内容，使其实现上述功能，但不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。

在考生文件夹下有工程文件sj4．vbp及窗体文件sj4．frm，在窗体上有一个名称为HScroll1的水平滚动条(Min为400，Max为2000)和三个名称分别为Command1、Com

mand2和Command3，标题分别为“减200”、“显示”和“加200”的命令按钮。程序运行后，如果单击“减200”命令按钮，则滚动块向左滚动200单位；如果单击“显示”命令按钮，则显示当前滚动条的值；如果单击“加200”命令按钮，则滚动块向右滚动200单位。程序运行时效果如图5-4昕示。

注意：请在有“?”的地方正确内容，然后删除“?”及代码前的所有注释符(即“”’号)，但不能修改其他部分。编写程序使程序运行时满足下列的条件。存盘时不得改变文件名和文件夹。

在名称为Form1的窗体中绘制一个名称为Label1的标签，其标题为空，BorderStyle属性为1；再添加一个名称为Timer1的计时器。请设置适当的控件属性，并编写适当的事件过程，使得运行时，标签中的数字每隔1秒钟加2。程序运行效果如图1—1所示。

注意：存盘时必须存放在考生文件夹下，工程文件名为Sj1．vbp，窗体文件名为Sj1．frm。

在Form1的窗体上绘制一个命令按钮，名为Cmd1，标题为Display，按钮隐藏。编写适当的事件过程，使程序运行后，若单击窗体，则命令按钮出现；此时如果单击命令按钮，则在窗体上显示Visual Basic。程序运行情况如图3—2和图3-3所示。

注意：程序中不得使用任何变量；文件必须存放在考生文件夹中，工程文件名为sj2．vbp，窗体文件名为sj2．frm。

阅读程序：

Private Sub Form. Click（　）

下列可作为Visual Basic变量名的是（　　）。

同一概念在一处为实体而在另一处为属性或联系的冲突，在视图集成中称为（　　）。

把数学表达式表示为正确的VB表达式应该是（　　）。

以下关于KeyPress事件过程中参数KeyAscii的叙述正确的是（　　）。