在窗体上画一个名称为CD1的通用对话框,并设置属性使得在打开文件对话框时,其标题为“文件操作”,默认路径为c盘根目录;再画2个命令按钮,名称分别为Command1、Command2,标题分别为“读文件”、“选择颜色”。 请编写适当的事件过程,使得程

admin2020-08-10  29

问题 在窗体上画一个名称为CD1的通用对话框,并设置属性使得在打开文件对话框时,其标题为“文件操作”,默认路径为c盘根目录;再画2个命令按钮,名称分别为Command1、Command2,标题分别为“读文件”、“选择颜色”。
    请编写适当的事件过程,使得程序运行时,单击“读文件”按钮后,可以利用CD1弹出打开文件对话框。单击“选择颜色”按钮,可以弹出颜色对话框。设计模式下的窗体外观如图所示。

    存盘时,工程文件名为sjt2.vbp,窗体文件名为sjt2.frm。
    注意:要求程序中不得使用变量,每个事件过程中只能写一条语句。

选项

答案新建一个窗体,在窗体上添加一个通用对话框控件,设置该控件的DialogTitle属性和lnitDir属性;再在窗体上添加两个按钮控件,分别设置按钮控件的Caption属性;最后分别在两个按钮的Click事件中编写代码实现题目要求。 通用对话框是一种Active控件,在一般情况下,启动VB 后,在工具箱中没有通用对话框控件。把通用对话框控件加到工具箱中的步骤为:执行“工程”菜单中的“部件”命令,打开“部件”对话框;在对话框中选择“控件”选项卡,然后在控件列表框中勾选“Microsoft Common DialcogContml 6.0”,单击“确定”按钮。通用对话框的属性可以在属性窗口中直接设置。 步骤1:新建一个窗体。 步骤2:在窗体上添加一个通用对话框控件,根据表3设置控件的相关属性。 [*] 步骤3:在窗体上添加两个按钮控件,根据表4分别设置两个控件的Caption属性。 [*] 步骤4:双击“读文件”按钮,在Command1的Click事件中根据题目要求编写代码。 Private Sub Command1_Click( ) GDI.ShowOpen End Sub 步骤5:双击“选择颜色”按钮,在Command2的Click事件中根据题目要求编写代码。 Private Sub Command2_Click( ) GDI.ShowColor End Sub 步骤6:调试并运行程序,关闭程序后按题目要求存量。

解析
转载请注明原文地址:https://kaotiyun.com/show/XvHp777K
0

最新回复(0)