[问答题] 在窗体上画两个文本框，名称分别为T1、T2，初始情况下均为空白，编写适当的事件过程。程序运行后，如果在T1中输入字符，则所输入的字符立即在T2中显示出来，并把小写字母转换为相应的大写字母，

[问答题] 在窗体上画两个文本框，名称分别为T1、T2，初始情况下均为空白，编写适当的事件过程。程序运行后，如果在T1中输入字符，则所输入的字符立即在T2中显示出来，并把小写字母转换为相应的大写字母，如图1—1所示。要求：程序中不得使用任何变量。注意：存盘时，工程文件名为sjt1.vbp，窗体文件名为sjt1.frm。2．在窗体上画二个文本框，名称为Text1和Text2，内容为空；再画二个标签，名称分别为L1和L2，标题分别为“输入A，B，C：”和“A×B+C＝”；再画一个命令按钮，名称为C1，标题为“运算”。编写适当的程序。程序运行时，在文本框Text1中输入用逗号隔开的3个整数A和B、C，单击“运算”按钮，则计算出A×B+C的值，显示在文本框Text2中。程序运行结果如图1—2所示。

注意：存盘时必须存放在考生文件夹下，工程文件名为sjt2.vbp，窗体文件名为sjt2.frm。

参考答案：

问题解析:

① 启动Visual Basic，在窗体上画两个文本框。 ② 按F4键激活属性窗口，在属性窗口中设置文本框的属性，见表1。 表 1控件属性设置值文本框1名称TextT1(空白)文本框2名称TextT2(空白)　　③ 编写命令按钮的Click事件过程：　　Private Sub T1_change()　　T2. Text＝UCase(T1. Text)　　End Sub2．① 对象主要属性设置如表2所示。　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　 表 2对象对象名属性名属性值窗体Form1Caption数据处理命令按钮C1Caption运算文本框Text1文本框Text2标签L1Caption输入A,B,C:标签L2CaptionA×B+C= ② 分析：按试题要求在窗体上画两个文本框、两个标签和一个单选按钮，并分别将它们的属性按表2的内容进行设置。Split()函数返回一个下标从零开始的一维数组，它包含指定数目的子字符串。Val()函数返回包含于字符串内的数字，字符串中是一个适当类型的数值。CStr()函数将一数值转换为字符串。 ③ 编程代码： Private Sub C1_Click() Dim a a＝Split(Text1.Text,",") Text2.Text＝CStr(Val(a(0)) * Val(a(1))+Val(a(2))) End Sub