VB基本操作题4/150

(1)在名称为Form1的窗体上添加一个名称为Command1的命令按钮，标题为”打开文件”，再添加一个名称为CD1的通用对话框。程序运行后，如果单击命令按钮，则弹出打开文件对话框，请按下列要求设置属性和编写代码：

①设置适当属性，使对话框的标题为”打开文件”；

②设置适当属性，使对话框的”文件类型”下拉式组合框中有两项可供选择：”文本文件”、”所有文件”(如图所示)，默认的类型是”所有文件”；

③编写命令按钮的事件过程，使得单击按钮可以弹出打开文件对话框。要求：程序中不得使用变量，事件过程中只能写一条语句。注意：存盘时必须存放在考生文件夹下，工程文件名保存为sjt1.vbp，窗体文件名保存为sjt1.frm。

(2)在名称为Form1的窗体上添加一个名称为Command1的命令按钮，其标题为”移动本按钮”，，如图所示。

要求编写适当的事件过程，使得程序运行时，每单击按钮一次，按钮向左移动100。要求：程序中不得使用变量，事件过程中只能写一条语句。

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

(1)【解题思路】在窗体上建立好控件后，先设置控件属性，再编写事件过程。

通用对话框是一种ActiveX控件，在一般情况下，启动VB后，在工具箱中没有通用对话框控件。为了把通用对话框控件加到工具箱中，其操作步骤如下：执行”工程”菜单中的”部件”命令，打开”部件”对话框。在对话框中选择”控件”选项卡，然后在控件列表框中，选择”MicrosoftCommon

DialogControl6.0”。单击”确定”按钮，通用对话框立即被加到工具箱中，通用对话框的属性可以在属性窗口中直接设置。

当通用对话框显示为”打开”或”另存为”类型时，其FileName属性用于返回或设置所选的文件的路径和文件名。Filter(过滤器)属性用于指定在对话框的文件列表中显示文件的类型。例如，过滤器为*.txt，表示显示所有的文本文件。语法为”对象名.Filter=”描述|文件扩展名”O

打开顺序文件的基本格式为”Open

FileName For Mode As #FileNumber”.

FileName表示要打开的文件的路径；Mode为打开模式，OutPut用于输出、Append用于追加写入、Input用于读取；FileNumber为打开文件时指定的句柄。

【操作步骤】

步骤1：新建一个窗体，在窗体中设置一个命令按钮和一个通用对话框。

在属性窗口中设置控件的属性，控件的属性见表3.14和3.15。

表3.14

控件命令按钮

1 Name Caption

设置值Command1打开文件

表35

线 通对琵

Nm： DahgTteFniz

文本文中出文件

步骤2：编写程序代码。

参考答案

Private Sub Command1_Click()

CD1.ShowOpen

End Sub

步骤3：调试并运行程序，保存工程，，设置工程文件名为sjt1.vbp，设置窗体文件名为 sjt1.frm.

【举一反三】可以通过第14套第一大题第二小题来进行同类知识点的练习。

(2) 【解题思路】在VisualBasic中，按钮的标题由Caption属性设置。通过代码要使命令按钮向左移动100，须用到按钮的Left属性，使其值在每单击一次按钮时减去

100.

操作步骤】

步骤1：新建一个窗体，在窗体中添加一个命令按钮。命令按钮的属性见表3.16。

步骤2：编写程序代码。

参考答案

Private Sub Command1_Click()

Command1.Left = Command1.Left - 100 End Sub

步骤3：调试并运行程序，保存工程，，设置工程文件名为sjt2.vbp，设置窗体文件名为 sjt2.frm.

【举一反三】可以通过第31套第一大题第二小题来进行同类知识点的练习。