窗体上有一个列表框和一个文本框,编写下列两个事件过程:Private Sub Form. Load()List1.Addltem"北京"List1.Addltem"天津"List1.Addltem"上海"Text1.Text=""End SubPrivate Sub List1 Click()Print Text1.Text+List1.TextEnd Sub程序运行后,在文本框中输入“中国”,然后单击列表框中的“北京”,则输出结果是( )。A.中国北京B.中国天津C.中国上海D.北京中国

窗体上有一个列表框和一个文本框,编写下列两个事件过程:

Private Sub Form. Load()

List1.Addltem"北京"

List1.Addltem"天津"

List1.Addltem"上海"

Text1.Text=""

End Sub

Private Sub List1 Click()

Print Text1.Text+List1.Text

End Sub

程序运行后,在文本框中输入“中国”,然后单击列表框中的“北京”,则输出结果是( )。

A.中国北京

B.中国天津

C.中国上海

D.北京中国


相关考题:

在窗体上画一个命令按钮Command1和两个文本框,名称分别为Text 1和 Text 2 Text 2。编写如下两个事件过程: Dim str As String, strl As String Private Sub form_load() TextText = " " TextText = " " TextEnabled = False TextEnabled = False End Sub Private Sub Form. KeyPress(KeyAscii As Integer) str= strChr(KeyAscii) End Sub Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) str1 = strlChr(KeyCode) End Sub Private Sub Command1_Click() TextText =str TextText = str1 str= " " str1= " " End Sub 当在设计阶段把窗体KeyPreview属性设置为True时,程序运行过程中,在键盘上输入小写字母abc,然后单击命令按钮,则文本框Text1中显示的内容为 ______ 。A.abcB.不显示任何信息C.ABCD.出错

在窗体上画一个列表框和一个文本框,然后编写如下两个事件过程: Private Sub Form_ Load () Liet1.AddItem“357” List1.AddItem“246” List1.AddItem“123” List1.AddItem“456” Text1.Text=“” End Sub Private Sub List1_DblClick() a=List1.Text Print a+Text1.Text End Sub 程序运行后,在文本框中输入“789”,然后双击列表框中的“456”,则输出结果为______ 。A.1245B.456789C.789456D.0

在窗体上画一个文本框和一个图片框,然后编写如下两个事件过程:Private Sub Form_Click()Text1.Text = "VB程序设计"End SubPrivate Sub Text1_Change()Picture1.Print "VB Programming"End Sub程序运行后,单击窗体,则在文本框中显示的内容是______,而在图片框中显示的内容是_____。

窗体上有一个按钮和一个列表框,执行下列程序后的输出结果为【 】。Private Sub Command1_Click()List1.Addltem"China"List1.Addltem"USA"List1.Addltem"Japan",1Print List1.List(2)End Sub

在窗体上画一个文框和一个列表框,然后编写下列两个事件过程: Private Sub Form_Load() List1.Adddltem"357" List1.Adddltem"246" List1.Adddltem"123" List1.Adddltem"456" Text1.Text="" End Sub Private Sub List1_Dblclick() M=Textl.Text Print m+Text1.Text End Sub 程序运行后,在文本框中输入“123”然后双击列表框中的“456”输出结果是A.1245 B.456123 C.123456 D.0

(13)在窗体上画一个文本框(其Name属性为Text1),编写下列事件过程,运行结果是。 Private Sub Form_Load() Show Text1.Text="你好!" Text1.SetFocus For i=1 To 15 Sun=Sun+i Next i Text1.Text=Sun End Sub

(13)窗体上有一个列表框和一个文本框,编写下列两个事件过程: Private Sub Form_Load() List1.AddItem"北京" List1.AddItem"天津" List1.AddItem"上海" Text1.Text="" End Sub Private Sub List1_Click() Print Text1.Text+List1.text End Sub 程序运行后,在文本框中输入“中国”,然后单击列表框中的“北京”,则输出结果是A.中国北京 B.中国天津 C.中国上海 D.北京中国

(10)在窗体上画一个文本框和一个图片框,然后编写下列两个事件过程: Private Sub Form_Click() Text1.Text="VB Programming" End Sub Private Sub Text1_Change() Picture1.Print"VB程序设计" End Sub 程序运行后,单击窗体,则在文本框中显示的内容是,而在图片框中显示的内容是 。

在窗体上画一个文本框和一个列表框,然后编写下列两个事件过程:Private Sub Form_Load()List1.AddItem"357"List1.AddItem"246"List1.AddItem"123"List1.AddItem"456"Text1.Text=""End SubPrivate Sub List1 DblClick()m=List1.TextPrint m+Text1.TextEnd Sub程序运行后,在文本框中输入“123”,然后双击列表框中的"456",输出结果是( )。A.1245B.456123C.123456D.0

在窗体上画一个文本框和一个图片框,然后编写下列两个事件过程:Private Sub Form_C1ick()Textl.Text="VB Programming"End SubPrivate SubText1_change()Picture1.Print"VB程序设计"End SUb程序运行后,单击窗体,则在文本框中显示的内容是______,而在图片框中显示的内容是______。

窗体上有一个列表框,编写下列程序: Private Sub Command1_Click() ListRemoveItem3 End Sub Private Sub Form_Load() ListAddItem "拉瓦锡" ListAddItem "道尔顿" ListAddItem "汤姆森" ListAddItem "门捷列夫" End Sub 程序执行时,单击Commandd1,则在列表框中将不再出现 ______。A.拉瓦锡B.道尔顿C.汤姆森D.门捷列夫

在窗体上画一个组合框Combo1和一个命令按钮Command1,然后编写如下两个事件工程:Private Sub form. Activate( a = Combo1. List (1) Print aEnd SubPrivate Sub form_ Load () Combo1. AddItem "11" Combo1. AddItem "22" Combo1. Addltem "33"End Sub窗体上打印出来的结果是______。A.11B.22C.33D.0

在窗体(Name属性为Form1)上画两个文本框(其Name属性分别为Text1和 Text2)和一个命令按钮(Name属性为Commandl),然后编写如下两个事件过程: Private Sub Commandl Click() a=TextText+TextText Print a End Sub Private Sub Form. Load() TextText="" Text2.Text="" End Sub 程序运行后,在第一个文本框(Text1)和第二个文本框(Text2)中分别输入123和 321,然后单击命令按钮,则输出结果为 ( )A.444B.321123C.123321D.132231

窗体上有一个列表框和一个文本框,编写如下两个事件过程: Private Sub Form_Load() List1.Addltem "北京" List1.Addltem "天津" List1.Addltem "上海" Text1.Text= "" End Sub Private Sub List1_Click() Print Text1.Text+List1.Text End Sub 程序运行后,在文本框中输入“中国”,然后单击列表框中的“北京”,则输出结果为( )。A.中国北京B.中国天津C.中国上海D.北京中国

窗体上有一个列表框和一个文本框,编写如下两个事件过程: Private Sub Form_Load() List1.AddItem"北京" List1.AddItem"天津" List1.AddItem"上海" Text1.Text=" " End Sub Private Sub List1_Click() Print Text1.Text+List1.Text End Sub 程序运行后,在文本框中输入“中国”,然后单击列表框中的“北京”,则输出结果为( )。A.中国北京B.中国天津C.中国上海D.北京中国

窗体上画一个名称为Text1的文本框,然后编写如下事件过程: Private Sub Form. Load() Show TextSetFocus End Sub Private Sub Text1_ KeyPress (KeyAscii As Integer) Dim ch As String ch = Chr (KeyAscii) KeyAscii = Asc(UCase(ch)) Pint Chr(KeyAscii + 4) End Sub程序运行后,在文本框中输入abcde,则在窗体上显示的内容是______。A.abcdeB.efghiC.EFGHID.ABCDE

在窗体上画一个列表框、一个文本框及一个按钮,然后编写如下两个事件过程: Private Sub Form_Load() For i=1 To 10 List1.AddItem i * 10 Next i Text1.Text=" " End Sub Private Sub List1_Click() Print List1.Text + Text1.Text End Sub 程序运行后,在文本框中输入“123”,然后双击列表框中的第四行,则在窗体上输出的结果为A.40123B.163C.123D.30123

在窗体上画一个列表框、一个文体框及一个按钮,然后编写如下事件过程: Private Sub Form. Loab() List.AddItem"357" List.AddItem"246" List.AddItem"123" List.AddItem"456" TEXT1.Text="" End Sub Private Sub Command1_Click() List.Listindex=3 Print List.Text1+Text1.Text End Sub 程序运行后,在文本框中输入"789",然后双击列表框中的"456",则输出结果为A.789123B.456789C.789456D.1245

窗体上有一个列表框和一个文本框,编写如下两个事件过程: Private Sub Form_Load() List1.Addltem"Beijing" List1.Addltem"Tianjin" List1.Addltem"Shanghai", Text1.Text=" End Sub Private Sub Listl_Dbl Click() x=Listl.Text Printx+Textl.Text End Sub 程序运行后,在文本A.China BeejingB.China TianjinC.China ShanghaiD.Shanghai China

在窗体中添加了一个文本框和一个命令按钮(名称分别为Textl和Commandl),并编写了相应的事件过程。运行此窗体后,在文本框中输入一个字符,则命令按钮上的标题变为"Access模拟”。以下能实现上述操作的事件过程是( )。A.Private Sub Commandl.Click( ) Caption=”Access模拟”Commandl.B.Private Sub Textl click( ) Caption=”Access模拟”EndSubEndSubC.Private SUb Commandl Change( ) Caption=”Access模拟”Commandl.D.Private Sub Textl_Change( ) Caption=”Access模拟”End SubEnd Sub

在窗体上画一个文本框和一个列表框,然后编写如下两个事件过程: Private Sub Form_Load() List1.AddItem "357" List1.AddItem "246" List1.AddItem "123" List1.AddItem "456" Text1.Text="" End Sub Private Sub List1_Db1Click() m=List1.Text Print m+Text1.Text End Sub 程序运行后,在文本框中输入“123”,然后双击列表框中的“456”,输出结果为( )。A.1245B.456123C.123456D.0

在名为“Form1”的窗体上添加三个文本框和一个命令按钮,其名称分别为“txt1”、“txt2”、“txt3”和“Command1”,然后编写如下两个事件过程:Private Sub Command1_Click()txt3=txt1+txt2End SubPrivate Sub Form. l_Load()txt1=" "txt2=" "txt3=" "End Sub当打开窗体Form. 1后,在txt1和txt2中分别输入3和5,然后单击命令按钮Command1,则文本框txt3中显示的内容为______。

在窗体(Name属性为Forml)上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Commandl),然后编写如下两个事件过程: Private Sub Commandl_Click() a=Text1.Text+Text2.Text Printa End Sub Private Sub Form_Load() Text1.Text="" Text2.Text="" End Sub 程序运行后,在第一个文本框(A.165B.8778C.7788D.7887

在窗体上画一个列表框和一个命令按钮,其名称分别为List1和Command1,然后编写如下事件过程 Private Sub Form_Load() List1.Addltem"Iteml" List1.Addltem"Item2" List1.Addltem"Item3" End Sub Private Sub Command1_click() List1.List(List1.ListCount)="AAAA" End Sub 程序运行后,单击命令按钮,其结果为______。A.把字符串“AAAA”添加到列表框中,但位置不能确定B.把字符串“AAAA人”添加到列表框的最后(即“Item3”的后面)C.把列表框中原有的最后一项改为“AAAA”D.把字符串“AAAA”插入到列表框的最前面(即“Item1”的前面)

在窗体上画一个文本框和一个列表框,然后编写如下两个事件过程: Private Sub Form_Load() List1.Addltem "357" List1.Addltem "246" List1.Addltem "123" List1.AddItem "456" Text1.Text = "" End Sub Private Sub Listl_DblClick0 m=List1.Text Print m + Text1.Text End Sub 程序运行后,在文本框中输入“123”,然后双击列表框中的“456”,输出结果为( )。A.1245B.456123C.123456D.0

在窗体上画一个文本框和一个图片框,然后编写如下两个事件过程:Private Sub Form_Click()Textl.Text="VB程序设计"End SubPrivate Sub Textl_Change()Picturel.Print"VB programming"End Sub程序运行后,单击窗体,则在文本框中显示的内容是【 】,而在图片框中显示的内容是【 】。

窗体Form. 1上有一个名称为Command 1的命令按钮,以下对应窗体单击事件的事件过程是A)Private Sub Form. 1_Click() B)Private Sub Form. _Click()End Sub End SubC)Private Sub Commandl_Click() D)Private Sub Command_ Click()End Sub End Sub