在窗体上画一个文本框和一个列表框,然后编写如下两个事件过程: 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_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.1245

B.456123

C.123456

D.0


相关考题:

在窗体上画一个文本框(其Name属性为Text1),然后编写如下事件过程:Private Sub Form_Load()Text1.Text=""Text1.SetFocusFor i=1 To 9Sum=Sum=iNext iText1.Text=SumEnd Sub上述程序的运行结果是A.在文本框Text1中输出45B.在文本框Text1中输出0C. 出错D. 在文本框Text1中输出不定值

( 28 )在窗体上画一个名称为 TxtA 的文本框,然后编写如下的事件过程:Private Sub TxtA _KeyPress(KeyAscii As Integer)......End Sub假定焦点已经位于文本框中,则能够触发 KeyPress 事件的操作是A ) 单击鼠标B ) 双击文本框C )鼠标滑过文本框D )按下键盘上的某个键

在窗体上画一个列表框和一个文本框,然后编写如下两个事件过程: 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 Form_Click()x = InputBox("请输入一个整数")Print x + Text1.TextEnd Sub程序运行时,在文本框中输入456,然后单击窗体,在输入对话框中输入123,单击“确定”按钮后,在窗体上显示的内容为( )。A.123B.456C.479D.123456

在窗体上画一个名称为TxtA的文本框,然后编写如下的事件过程: Private Sub TxtA_KeyPress(KeyAscii As Integer) …… End Sub 假定焦点已经位于文本框中,则能够触发KeyPress事件的操作是______。A.单击鼠标B.双击文本框C.鼠标滑过文本框D.按下键盘上的某个键

在窗体.上画一个列表框、一个文本框及一个按钮,然后编写如下事件过程: Prirate Sub Form_Loab() List.Addltem"357" Llst.Addltem"246" List.Addltem"123" List.Addltem"456" TEXTl.Text="" End ub Private Sub Commandl_Click() List.LiSdndex=3 Print List.Text+Textl.TextA.789123B.456789C.789456D.1245

在窗体上画一个文框和一个列表框,然后编写下列两个事件过程: 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)窗体上有一个列表框和一个文本框,编写下列两个事件过程: 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程序运行后,单击窗体,则在文本框中显示的内容是______,而在图片框中显示的内容是______。

在窗体上画一个命令按钮和一个文本框,并将窗体的KeyPreview属性设置为True,然后编写如下代码: Dim SaveAll As String Private Sub Form_Load() Show Text1.Text=" " Text1.SetFocus End Sub Private Sub Command1_Click() Text1.Text = Ucase(SaveAll) End Sub Private Sub Form_KeyPress(KeyAscii As Integer) SaveAll=SaveAll+Chr(KeyAscii) End Sub 程序运行后,在键盘上输入abcdefg,单击命令按钮,则文本框中显示的内容为A.abcdefgB.不显示任何信息C.ABCDEFGD.出错

在窗体上画一个文本框(Textl),然后编写如下事件过程: Private Sub Text1_KeyPress(KeyAscii As Integer) Dim char As String char=Chr(KeyAscii) KeyAscii=Asc(Ucase(char)) Print String(4,KeyAscii) End Sub 程序运行后,在文本框Text1中输入A,则程序在窗体上的输出结果为A.aB.AC.aaaaD.AAAA

在窗体(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 Command1_Click()Text 1="VB programming"Text 2=Text 1Text 1="ABCD"End Sub程序运行后,单击命令按钮,文本框Text 2中显示的内容为【 】。

窗体上有一个列表框和一个文本框,编写如下两个事件过程: 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.北京中国

在窗体上画一个名称为TxtA的文本框,然后编写如下的事件过程: Private Sub TxtA_KeyPress(keyaseii as integer) …… End Sub 若焦点位于文本框中,则能够触发KeyPress事件的操作是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

在窗体(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 程序运行后,在第1个文本A.444B.321123C.123321D.132231

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

在窗体上画一个文本框和一个列表框,然后编写如下两个事件过程: 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

在窗体(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

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

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