(1)在名称为Form1的窗体上画两个标签(名称分别为Label1和Labe12,标题分别为“姓名”和“年龄”)、两个文本框(名称分别为Text1和Text2,初始内容均为空)和一个命令按钮(名称为Command1,标题为“显示”)。然后编写命令按钮的Cl

admin2018-03-20  31

问题 (1)在名称为Form1的窗体上画两个标签(名称分别为Label1和Labe12,标题分别为“姓名”和“年龄”)、两个文本框(名称分别为Text1和Text2,初始内容均为空)和一个命令按钮(名称为Command1,标题为“显示”)。然后编写命令按钮的Click事件过程。程序运行后,在两个文本框中分别输入姓名和年龄,然后单击“显示”按钮,则在窗体上显示两个文本框中的内容,如图所示。要求程序中不得使用任何变量。
    注意:存盘时必须存放在考生文件夹下,工程文件名保存为sjt1.vbp,窗体文件名保存为sjt1.frm。

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

选项

答案(1)【操作步骤】 步骤1:新建一个窗体,按照题目要求建立控件并设置相应属性,程序中用到的控件及属性如表3.16所示。 [*] 步骤2:打开代码编辑窗口,在指定位置编写如下代码。 参考答案 Private Sub Command1_Click() Form1.Print Text1.Text &",现年" & Text2.Text & "岁" End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。 (2)【操作步骤】 步骤1:新建一个窗体,添加控件并设置相应的属性。程序中用到的控件及其属性见表3.17。 [*] 步骤2:打开代码编辑窗口,在指定位置编写如下代码。 参考答案 Private Sub Command1_Click() HScro111.Max=1500 ’设置滚动条的最大值、最小值、最大改变值、最小改变值 HScro111.Min=100 HScro111.LarqeChanqe=100 HScro111.SmaliChange=10 End Sub Private Sub HScro111 Change() Picturel.Width=HScro111.Value ’将图片的width与滚动条的Value保持一致 End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。

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

最新回复(0)