A . 111222
B . -111
C . 222
D . 111-222
[单选题]在表单form1中有两个文本框text1和text2,其初值为空,另有一个命令按钮command1,command1的click事件代码如下:a=rtrim(thisform.text1.value)+rtrim(thisform.text2.value)thisform.print(a)表单运行后,在text1、text2中分别输入123和456,然后单击命令按钮,则输出结果为()。A . 579B . 456123C . 123456D . 321654
[单选题]在表单form1中有三个文本框text1、text2、text3(它们的value初值均为{})和一个命令按钮command1,命令按钮的click事件代码如下:x=thisform.text1.valuey=thisform.text2.valuethisform.text3.value=y-x表单运行后,在text1中输入11/12/2006,在text2中输入11/10/2006,然后单击command1,则text3显示()。A . 11/10/200611/12/2006B . 11/
[单选题]在表单Form1中有一个文本框text1,text1的InteractiveChange事件代码如下:CHAR1=ALLTRIM(THIS.VALUE)ASC1=ASC(CHAR1)+32THIS.VALUE=CHR(ASC1)该表单运行后,在文本框中输入一个大写ASCII码“T”,则文本框中显示内容将是()。A . T+32B . T32C . tD . 97
[单选题]在表单FORM1中有一个文本框TEXT1,TEXT1的INIT事件代码如下:THIS.VALUE=0TEXT1的VALID事件代码如下:S=0FORi=1TOTHIS.VALUEIFi%5=0S=S+iENDIFENDFORTHIS.VALUE=S在TEXT1中输入22,然后按回车键,TEXT1中将显示()。A . 0B . 22C . 50D . 100
[试题]在名为Form1的窗体上绘制两个文本框,其名称分别为Text1和Text2,它们的高、宽分别为400、2500和1500、2500。窗体的标题为“窗体窗口”。请通过属性窗口设置适当的属性满足以下要求:(1)Text2可以显示多行文本,且有垂直和水平两个滚动条。(2)运行时在Text1中输入的字符都显示为“*”。运行后的窗体如下图所示。注意:文件必须存放在考生文件夹中,工程文件名为execise53.vbp,窗体文件名为 execiSe53.frm。
[试题]在名为Form1的窗体上绘制两个文本框,名称分别为Text1和Text2;再绘制两个命令按钮,名称分别为Cmd1和Cmd2,标题分别为LeR和Right,如下图所示。要求:(1)编写适当的事件过程,使得程序运行时,单击LeR按钮,则焦点位于Text1上。(2)单击Right按钮,则焦点位于Text2上。注意:程序中不得使用变量,事件过程中只能写一条语句:文件必须存放在考生文件夹中,工程文件名为execise110.vbp,窗体文件名为execise110.frm。
[试题]在名为Form1的窗体上绘制两个文本框,名称分别为Text1和Text2(如下图所示),初始情况下都没有内容。请编写适当的事件过程,使得程序在运行时,在Text1中输入的任何字符,立即显示在Text2中。注意:程序中不得使用任何变量;文件必须存放在考生文件夹中,工程文件名为execise7/vbp,窗体文件名为execise7.frm。
[单选题]在表单form1中有一个列表框list1和一个文本框text1,form1的load事件代码如下:Thisform.list1.additem(“123”)Thisform.list1.additem(“123”)Thisform.text1.value=””list1的interactivechange事件代码如下:Thisform.text1.value=Thisform.text1.value-Thisform.list1.value表单运行后,在list1中先选择456,再选择123,则
[单选题]窗体上有名称分别为Text1、Text2的2个文本框,要求文本框Text1中输入的数据小于500,文本框Text2中输入的数据小于1000,否则重新输入。为了实现上述功能,在以下程序中问号(?)处应填入的内容是。Private Sub Text1_LostFocus()C.all CheckInput(Text1,500)E.nd SubPrivate Sub Text2_LostFocus()C.all CheckInput(Text2,1000)E.nd SubSub CheckInput(
[单选题]窗体上有两个名称分别为Text1、Text2的文本框。Text1的KeyUp事件过程如下: Private Sub Text1_KeyUp(KeyCode As Integer, Shift As Integer) Dim c As String c=UCase(Chr(KeyCode)) Text2.Text=Chr(Asc(C+2) ) End Sub 当向文本框Text1中输入小写字母a时,文本框Text2中显示的是( )。A.AB.aC.CD.c