(1)在名称为Forml的窗体上画一个名称为Textl的文本框,其高、宽分别为600、1 800。请在属性框中设置适当的属性满足以下要求: Text1的字体为“隶书”,字号为“三号”;窗体的标题为“字体大小”,不显示最大化按钮和最小化 按钮,如图4

admin2009-08-26  26

问题 (1)在名称为Forml的窗体上画一个名称为Textl的文本框,其高、宽分别为600、1 800。请在属性框中设置适当的属性满足以下要求:
    Text1的字体为“隶书”,字号为“三号”;窗体的标题为“字体大小”,不显示最大化按钮和最小化
按钮,如图49—1所示。

    注意:存盘时必须存放在考生文件夹下,工程文件名为sjl.vbp,窗体文件名为sjl.frm。
    (2)在Forml的窗体上画一个文本框,其名称为Textl;再画两个命令按钮,其名称分别为Commandl和Command2、标题分别为“显示”和“清空”,编写适当的事件过程。程序运行后,如果单击“显示”按钮,则在文本框中显示“模拟考试”,并使“清空”按钮可用。此时如果单击“清空”按钮,则清空文本框,同时该按钮变为不可用。程序中不得使用任何变量。程序运行时的窗体界面如图49—2和图49—3所示。

    注意:保存时必须存放在考生文件夹下,窗体文件名为sj2.frm,工程文件名为sj2.vbp。

选项

答案(1)根据题意,新建“标准EXE”工程,将一个文本框控件添加到窗体中,其名称为Textl、Caption属性为“模拟考试”,Fonl属性为“隶书”、“三号”,Forml的MaxButton和MinButton属性为“False”,Caption属性为“字体大小”。单击[*]按钮运行程序,并按要求保存。 (2)根据题意,新建“标准EXE”工程,将一个文本框控件和两个命令按钮添加到窗体中,文本框的名称为Textl、Text属性为“模拟考试”,命令按钮的名称分别为Commandl和Command2、Caption属性分别为“显示”和“清空”。双击Commandl进入代码窗口,编写如下代码: Private Sub Commandl_Click() Textl.Text="模拟考试" ’在Textl中显示"模拟考试" Command2.Enabled=True’将“清空”按钮变为可用 End Sub Private Sub Command2_Click() Textl.Text="" ’单击“清空”,则清空Textl中的文本 Command2.Enabled=False’将“清空”按钮变为不可用 End Sub 单击[*]按钮运行程序,并按要求保存。

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

最新回复(0)