(1)在名称为Form1的窗体上添加一个标签(名称为Label1,标题为空白,BorderStyle属性为1,Visible属性为False)、一个文本框(名称为Text1,Text属性初始内容为空)和一个命令按钮(名称为Commandl,标题为“显示”)

admin2015-06-30  26

问题  (1)在名称为Form1的窗体上添加一个标签(名称为Label1,标题为空白,BorderStyle属性为1,Visible属性为False)、一个文本框(名称为Text1,Text属性初始内容为空)和一个命令按钮(名称为Commandl,标题为“显示”),如图1所示。然后编写命令按钮的Click事件过程。程序运行后,在文本框中输入“计算机等级考试”,然后单击命令按钮,则文本框消失,并在标签内显示文本框中的内容。程序运行后的窗体如图2所示。要求程序中不得使用任何变量。
    注意:存盘时必须放在考生文件夹下,工程文件名保存为sjt1.vbp,窗体文件名保存为sjt1.frm。

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

选项

答案(1)【操作步骤】 步骤1:建立界面,并设置控件的属性。程序中涉及的控件及属性见表3.104和表3.105。 [*345] 步骤2:编写程序代码。 参考答案 Private Sub Command1_Click() Label1.Visible = True Label1.Caption = Text1.Text Text1.Visible = False End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。 (2)【操作步骤】 步骤1:建立界面,并设置控件的属性。程序中用到的控件及属性见表3.106。 [*346] 步骤2:编写程序代码。 参考答案 Private Sub HScroll1_Change() Text1.Height = HScroll1.Value Text1.Width = 1.2 * Text1.Height End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。

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

最新回复(0)