(1)在名称为Forml的窗体上画两个标签(名称分别为Labell和Label2,标题分别显示为“姓名”和“年龄”)、两个文本框(名称分别为Textl和Text2,初使内容均为空)和一个命令按钮(名称为Commandl,标题为“显示”)。然后编写命令按钮的

admin2012-10-09  36

问题 (1)在名称为Forml的窗体上画两个标签(名称分别为Labell和Label2,标题分别显示为“姓名”和“年龄”)、两个文本框(名称分别为Textl和Text2,初使内容均为空)和一个命令按钮(名称为Commandl,标题为“显示”)。然后编写命令按钮的Click事件过程。程序运行后,在两个文本框中分别输入姓名和年龄,然后单击“显示”按钮,则在窗体上显示两个文本框中的内容,如图42—1所示。

    注意:要求程序中不得使用任何变量。存盘时必须存放在考生文件夹下,工程文件名保存为sil.vbp,窗体文件名保存为sjl.frm。
    (2)在名称为Forml的窗体上画一个图片框(其名称为Picturel)、一个水平滚动条(名称为HScrooll1)和一个命令按钮(名称为Commandl),标题为“设置属性”,通过属性窗口在图片框中装入一个图形(文件名为picl.jpg,位于考生目录下),图片框的高度与图形的高度相同,图片框的宽度任意(如图42—2所示)。编写适当的事件过程,程序运行后,如果单击命令按钮,则设置水平滚动条的如下属性:之后就可以通过移动滚动条上的滚动块来放大或缩小图片框。程序运行后的窗体如图42—3所示。

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

选项

答案(1)根据题意,新建“标准EXE”工程,将2个标签控件、2个文本框控件、1个命令按钮控件添加到窗体中,2个标签控件名称分别为Labell和Label2,Caption属性分别为“姓名”和“年龄”,2个文本框控件名称分别为Textl和Text2,Text属性都为空,命令按钮Caption属性为“显示”。双击进入代码窗口,编写如下代码: Private Sub Commandl_Click() Forml.Print Textl.Text&",现年"&Text2.Text&"岁" End Sub 单击[*]按钮运行程序,并按要求保存。 (2)根据题意,新建“标准EXE”工程,将一个图片框控件、水平滚动条控件和命令按钮添加到窗体中,图片框控件名称为Picturel,AutoSize属性为“True”,Picture设置为picl.jpg,水平滚动条控件名称为HScrolll,命令按钮控件名称为Commandl,Caption属性为“设置属性”。双击进入代码窗口,编写如下代码: Private Sub Commandl_Click() HScrolll.Max=1500 HScrolll.Min=100 HScrolll.LargeChange=100 HScrolll.SmallChange=10 End Sub Private Sub HScrolll_Change() Picturel.Width=HScrolll.Value End Sub 单击[*]按钮运行程序,并按要求保存。

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

最新回复(0)