2. 计算机
  3. (1)在名称为Form1的窗体上画两个文本框，其名称分别为Text1和Text2，内容分别为“文本框1”和“文本框2”，编写适当的事件过程。程序运行后，如果单击窗体，则Textl隐藏，Text2显示，如图3．88(a)所示；如果双击窗体，则Text1显示，

(1)在名称为Form1的窗体上画两个文本框，其名称分别为Text1和Text2，内容分别为“文本框1”和“文本框2”，编写适当的事件过程。程序运行后，如果单击窗体，则Textl隐藏，Text2显示，如图3．88(a)所示；如果双击窗体，则Text1显示，

admin2017-09-22  33
问题 (1)在名称为Form1的窗体上画两个文本框，其名称分别为Text1和Text2，内容分别为“文本框1”和“文本框2”，编写适当的事件过程。程序运行后，如果单击窗体，则Textl隐藏，Text2显示，如图3．88(a)所示；如果双击窗体，则Text1显示，Text2隐藏，如图3．88(b)所示。
    注意：程序中不得使用变量。
    存盘时必须存放在考生文件夹下，工程文件名为sjtl．vbp，窗体文件名为sjtl．frm。

    (2)在名称为Form1的窗体上画一个文本框，其名称为Text1，初始内容为空白；再画一个水平滚动条，其名称为HS1，SmallChange属性为4，LargeChange属性为10，Min属性为0，Max属性为200，编写适当的事件过程。程序运行后，如果在文本框内输入一个数值(0～200)，然后单击窗体，则把滚动条的滚动框移到相应的位置，如图3．89所示。
    注意：程序中不要使用变量；存盘时必须存放在考生文件夹下，工程文件名为sjt2．vbp，窗体文件名为sjt2．frm。
选项
答案(1)步骤1：新建一个“标准EXE”工程，在窗体中加入两个文本框并设置它们的相关属性，属性及其值如表4-56所示。 [*] 步骤2：打开代码编辑窗口，输入如下代码。参考代码： Private Sub Form_Click() Text1．Visible=False Toxt2．Visible=TrLie End Sub Private Sub Form_DblClick() Text1．Visible=True Text2．Visible=False End Sub 步骤3：按要求将文件保存至考生文件夹中。 (2)步骤1：新建“标准EXE”工程，往窗体Form1中加入一个文本框和一个水平滚动条，分别设置它们的相关属性，属性及其值如表4．57所示。 [*] 步骤2：打开代码编辑窗口，输入如下代码。参考代码： Private Sub Form Click() HS1．Value=Val(Text1．Text) End Sub 步骤3：按要求将文件保存至考生文件夹中。
解析 (1)要在程序运行时实现题目所要求的功能，只需在窗体的Click事件过程中用代码设置文本框1的Visible属性值为False，文本框2的Visible属性为True；在窗体的DblClick事件过程中用代码设置文本框1的Visible属性值为True，文本框2的Visible属性为False。
(2)要在程序运行时，单击窗体就能将滚动条的滑块位置定位到文本框中输入的值，只需要编写窗体的单击事件，令滚动条的Value属性值等于文本框的Text属性值。
转载请注明原文地址:https://kaotiyun.com/show/DjGp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)