[单选题]

在窗体上画一个列表框、一个文体框及一个按钮,然后编写如下事件过程: 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.789123

B.456789

C.789456

D.1245

参考答案与解析:

相关试题

在窗体上画一个列表框、一个文体框及一个按钮,然后编写如下事件过程: Privat

[单选题]在窗体上画一个列表框、一个文体框及一个按钮,然后编写如下事件过程:Private Sub Form_loab()List.AddItem″357″List.AddItem″246″List.AddItem″123″List.AddItem″456″TEXT1.Text=″″E.nd SubPrivate Sub Command1_Click()List.Listindex=3Print List.Text1+Text1.TextE.nd Sub程序运行后,在文本框中输入″789″,然后双列表框中

  • 查看答案
  • 在窗体.上画一个列表框、一个文本框及一个按钮,然后编写如下事件过程:Prirat

    [单选题]在窗体.上画一个列表框、一个文本框及一个按钮,然后编写如下事件过程: 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

  • 查看答案
  • 在窗体上画一个列表框、一个文本框及一个按钮,然后编写如下两个事件过程:Priva

    [单选题]在窗体上画一个列表框、一个文本框及一个按钮,然后编写如下两个事件过程: 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.12

  • 查看答案
  • 在窗体上画一个文本框和一个列表框,然后编写如下两个事件过程:Private Su

    [单选题]在窗体上画一个文本框和一个列表框,然后编写如下两个事件过程: 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 程序运行后,在文本框中输入“

  • 查看答案
  • 在窗体上画一个列表框和一个文本框,然后编写如下两个事件过程:Private Su

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

  • 查看答案
  • 在窗体上画一个文框和一个列表框,然后编写下列两个事件过程: Private Su

    [单选题]在窗体上画一个文框和一个列表框,然后编写下列两个事件过程: 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 程序运行后,在文本框中输入“1

  • 查看答案
  • 在窗体上画一个列表框和一个文本框,然后编写如下两个事件过程:PrivateSub

    [单选题]在窗体上画一个列表框和一个文本框,然后编写如下两个事件过程:PrivateSubForm_Load()List1.AddItem"357"List1.AddItem"246"List1.AddItem"123"List1.AddItem"456"Text1.Text=""E.ndSubPrivateSubList1_DblClick()a=List1.TextPrinta+Text 1.TextE

  • 查看答案
  • 在窗体上画一个文本框和一个列表框,然后编写下列两个事件过程:Private Su

    [单选题]在窗体上画一个文本框和一个列表框,然后编写下列两个事件过程:Private Sub Form_Load()List1.AddItem"357"List1.AddItem"246"List1.AddItem"123"List1.AddItem"456"Text1.Text=""E.nd SubPrivate Sub List1 DblClick()m=List1.TextPrint m+Text1.TextE.nd Sub程序运行后,在文本框中输入“123”,然后双击列表框中的

  • 查看答案
  • 在窗体上画一个文本框(Textl),然后编写如下事件过程:Private Sub

    [单选题]在窗体上画一个文本框(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

  • 查看答案
  • (29)在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub

    [单选题](29)在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Command1_Click( )D.im I, NumRandomizeD.oF.or I=1 To 1000Num=Int(Rnd*100)Print Num;Select Case NumC.ase 12E.xit ForC.ase 58E.xit DoC.ase 65, 68, 92E.ndE.nd SelectNext ILoopE.nd Sub上述事件过程执行后,下列描述中正确的是( )。A.)Do 循环执

  • 查看答案
  • 在窗体上画一个列表框、一个文体框及一个按钮,然后编写如下事件过程:Private