问答题

在名称为Form1的窗体上添加一个文本框(名称为Text1)和一个水平滚动条(名称为HScroll1)，如图1所示。在属性窗口中对滚动设置如下属性：
Min 500
Max 2000
LargeChange 50
SmallChange 20
编写适当的事件过程。程序运行后，通过改变滚动条上的刻度值，则可扩大或缩小文本框的高度，并使得文本框的宽度始终是其高度的1.2倍。程序运行后的窗体如图2所示。要求程序中不得使用任何变量。
注意：存盘时必须存放在考生文件夹下，工程文件名保存为sjt2.vbp，窗体文件名保存为sjt2. frm

【参考答案】

[解题思路] 通过调整滚动条滑块的位置即可改变其Value属性的值，滚动条的Max和Min属性为滚动条所能表示的最大值和......

(↓↓↓ 点击下方‘点击查看答案’看完整答案 ↓↓↓)
<上一题 目录 下一题>
热门 试题

问答题
在名称为Form1的窗体上添加一个标签(名称为Label1，标题为空白，BorderStyle属性为1，Visible属性为False)、一个文本框(名称为Text1，Text属性初始内容为空)和一个命令按钮(名称为Command1，标题为“显示”)，如图1所示。然后编写命令按钮的Click事件过程。程序运行后，在文本框中输入“计算机等级考试”，然后单击命令按钮，则文本框消失，并在标签内显示文本框中的内容。程序运行后的窗体如图2所示。要求程序中不得使用任何变量。 注意：存盘时必须放在考生文件夹下，工程文件名保存为sjt1. vbp，窗体文件名保存为sjt1. frm。
单项选择题
窗体上有一个名称为Picture1的图片框控件，一个名称为Label1的标签控件，如图所示。 现有如下程序： Public Sub display(x As Control) If TypeOf x is Label Then x Caption = 计算机等级考试 Else xPicture = LoadPicture ( pic. jpg ) End If End Sub Private Sub Label1_Click() Call display(Label1) End Sub Private Sub Picture1_Click() Call display(Picture1) End Sub 对以上程序，下列叙述中错误的是( )。
A) 程序运行时会出错
B) 单击图片框，在图片框中显示一幅图片
C) 过程中的x是控件变量
D) 单击标签，在标签中显示一串文字
相关试题