(1)在名为Forml的窗体上绘制一个名为Cmdl的命令按钮,标题为“打开文件”,再绘制一个名为CDl的通用对话框。程序运行后,若单击命令按钮,则弹出“打开文件”对话框(如图13—1所示)。请按下列要求设置属性和编写代码。 ① 设置适当属性,使对话框的标

admin2009-03-26  13

问题 (1)在名为Forml的窗体上绘制一个名为Cmdl的命令按钮,标题为“打开文件”,再绘制一个名为CDl的通用对话框。程序运行后,若单击命令按钮,则弹出“打开文件”对话框(如图13—1所示)。请按下列要求设置属性和编写代码。

① 设置适当属性,使对话框的标题为“打开文件”。
②设置适当属性,使对话框的“文件类型”下拉式组合框中有两行:“文本文件”、“所有文件”(如图13—1所示),默认的类型是“所有文件”。
③编写命令按钮的事件过程,使得单击按钮可以弹出“打开文件”对话框。
    注意:程序中不得使用变量,事件过程中只能写一条语句;文件必须存放在考生文件夹中,工程文件名为sjl.vbp,窗体文件名为sjl.frm。
    (2)在名为Forml的窗体上绘制两个命令按钮,其名称分别为Cmdl和Cmd2。编写适当的事件过程,使程序运行后,若单击命令按钮Cmdl,则可使该按钮移到窗体的左上角(只允许通过修改属性的方式实现);如果单击命令按钮Cmd2,则可使该按钮在长度和宽度上各扩大到原来的3倍。程序的运行时的窗体界面如图13—2所示。
    注意:不得使用任何变量;文件必须存放在考生文件夹中,工程文件名为sj2.vbp,窗体文件名为sj2.frm。

选项

答案(1)①新建一个名为Form1的窗体。 ②选择“工程”菜单中的“部件”选项,弹出“部件”对话框或在“工具箱”上单击右键选择弹出菜单中的“部件”选项,弹出“部件对话框”,在对话框的“部件”列表中选择“MicroSoftCommonDialogControl6.0”项目,使它前边的方框为选中。 ③在窗体上添加一个通用对话框CDl,并将其DialogTitle属性设置为“打开文件”,其Filter属性设置为文本文件|*.txt|,所有文件|*.*|,其FilterIndex属性设置为2。 ④再添加一个命令按钮名称为Cmdl, Caption为“打开文件”; Private Sub Commandl_Click() CDl.ShowOpen End Sub ⑤最后按照题目要求保存文件即可。 (2)①新建一个名为Forml的窗体。 ②单击工具箱中的CommandButton控件图标,在窗体上拖拉出两个命令按钮,在属性窗口设置该命令按钮名称分别为Cmdl和Cmd2,Caption分别为Cmdl和Cmd2。 ③打开代码窗口输入如下代码: Private Sub Cmdl_Click() Cmdl.Left=0’将命令按钮放在最左方 Cmdl.Top=0’将命令按钮放在最上方 End Sub Private Sub Cmd2_Click() Cmd2.Height=Cmd2.Height*3’将Cmd2的高变为3倍 Cmd2.Width=Cmd2.Width*3’将Cmd2的宽变为3倍 End Sub ④按要求保存文件即完成本题。

解析
转载请注明原文地址:https://jikaoti.com/ti/eEq0FFFM
0

最新回复(0)