(1)在名称为Forml的窗体上绘制一个文本框,其名称为Textl,然后通过“属性”窗口设置窗体和文本框的属性,实现如下功能:在文本框中可以显示多行文本,显示垂直滚动条,显示的初始信息为“模拟考试”,显示的字体为四号、黑体;窗体的标题为“设置文本框属性”,

admin2009-03-26  13

问题 (1)在名称为Forml的窗体上绘制一个文本框,其名称为Textl,然后通过“属性”窗口设置窗体和文本框的属性,实现如下功能:在文本框中可以显示多行文本,显示垂直滚动条,显示的初始信息为“模拟考试”,显示的字体为四号、黑体;窗体的标题为“设置文本框属性”,如图33—1所示。

    注意:存盘时必须存放在考生文件夹下,工程文件名为sjl.vbp,窗体文件名为sjl.frm。
    (2)在名称为Forml的窗体上绘制两个命令按钮,其名称分别为Commandl和Command2,编写适当的事件过程。程序运行界面如图33—2所示,如果单击命令按钮Commandl,则可使该按钮移到顶部;如果单击命令按钮Command2,则可使该按钮在高度和宽度上各扩大到原来的2和3倍。程序的运行时的窗体界面如图33—3所示。

    注意:不得使用任何变量,存盘时必须存放在考生文件夹下,工程文件名为sj2.vbp,窗体文件名为sj2.frm。

选项

答案(1)根据题意,新建“标准EXE”工程,将一个文本框控件添加到窗体中,名称为Textl、MultiLine属性为True、Text属性为“模拟考试”、ScrollBar属性为2、Font中字体为宋体,字型为黑体、大小为四号,设置完成后,单击按钮运行程序,并按原文件名保存。 (2)根据题意,新建“标准EXE”工程,将两个命令按钮添加到窗体中,名称分别为Commandl和Command2,Caption属性分别为“Commandl”和“Command2”,双击Commandl进入代码窗口,编写如下代码: Private Sub Commandl_Click() Commandl.Top=0’Commandl置顶 End Sub Private Sub Command2_Click() Command2.Width=Command2.Width*3’Command2的宽度扩大3倍 Command2.Height=Command2.Height*2’Command2的高度扩大2倍 End Sub 单击[*]按钮运行程序,并按要求保存。

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

最新回复(0)