请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。 (1)在名称为Forml的窗体上画一个文本框,其名称为T1,宽度和高度分别为1400、400;再画两个命令按钮,其名称分别为Cl和C2,标题分别为“显示”和“扩大”,编写适当的事

admin2010-09-02  21

问题 请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。
(1)在名称为Forml的窗体上画一个文本框,其名称为T1,宽度和高度分别为1400、400;再画两个命令按钮,其名称分别为Cl和C2,标题分别为“显示”和“扩大”,编写适当的事件过程。程序运行后,如果单击Cl命令按钮,则在文本框中显示“等级考试”,如图l-18l(a)所示;如果单击C2命令按钮,则使文本框在高、宽方向上各增加一倍,文本框中的字体大小扩大到原来的3倍,如图l-18l(b)所示。
注意;要求程序中不得使用变量。存盘时必须存放在考生文件夹下,工程文件名为sjtl.vbp,窗体文件名为sjtl.frm。

(2)在名称为Forml的窗体上画一个命令按钮,其名称为C1,标题为“转换”;然后再画两个文本框,其名称分别为Textl和Text2,初始内容均为空白,编写适当的事件过程。程序运行后,在Textl中输入一行英文字符串,如果单击转换按钮,则Textl文本框中的字母都变为小写,而Text2中的字母都变为大写。例如,在Textl中输入visualbasicprogramming,则单击转换按钮后,结果如图1-182所示。
注意:不得使用任何变量。存盘时必须存放在考生文件夹下,工程文件名为sjt2.vbp,窗体文件名为sjt2.frm。

选项

答案第1小题 【操作步骤】 步骤1:新建一个“标准EXE”工程,如表2-102在窗体中画出控件并设置其相关属性。 步骤2:打开代码编辑窗口,编写两个命令按钮的单击事件过程。 参考代码: Private Sub C1_Click() T1="等级考试" End Sub Private Sub C2_Click() T1.Height=2*Me.T1.Height T1.Width=2*T1.Width T1.FontSize=3*Forml.T1.FontSize End Sub [*] 步骤3:按要求将文件保存至考生文件夹中。 第2小题 【操作步骤】 步骤1:新建一个“标准EXE”工程,如表2-103在窗体中画出控件并设置其相关属性。 [*] 步骤2:打开代码编辑窗口,编写命令按钮的单击事件过程。 参考代码: Private Sub C1_Click() Textl.Text=LCase(Textl.Text) Text2.Text=UCase(Textl.Text) End Sub 步骤3:按要求将文件保存至考生文件夹中。

解析 第1小题
    ①文本框(Text)通常用于接收用户输入的字符串数据或用于显示输出信息,其Text属性用于设置或返回文本框中显示的文本。②控件的Height和Width属性用于设置控件在屏幕上的大小(即高和宽)。③字体大小通过FontSize属性设置,一般格式为:FontSize[=点数]。
    要在单击“扩大”按钮时,使文本框在高、宽方向上各增加一倍,只需在“扩大”按钮的Click事件中编写设置文本框的Height和Width属性值为原来2倍的语句。要使文本框中的字体大小扩大到原来的3倍,需编写设置文本框的FontSize属性值为原来3倍的语句。
  第2小题
     ①UCasc()函数用于将字符串中小写字母转换为大写字母,原本大写或非字母字符保持不变。②LCase()函数用于将字符串中大写字母转换为小写字母,原本小写或非字母字符保持不变。
    本题原程序是在命令按钮的单击事件过程中,将文本框Textl中的字符用UCase函数转换为大写并显示在Toxt2中,同时用LCase函数转换为小写并显示在Textl中。
转载请注明原文地址:https://jikaoti.com/ti/Emg0FFFM
0

最新回复(0)