[单选题]

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

Private Sub Form_loab()

List.AddItem″357″

List.AddItem″246″

List.AddItem″123″

List.AddItem″456″

TEXT1.Text=″″

E.nd Sub

Private Sub Command1_Click()

List.Listindex=3

Print List.Text1+Text1.Text

E.nd Sub

程序运行后,在文本框中输入″789″,然后双列表框中的″456″,则输出结果为

A.789123

B.456789

C.789456

D.1245

参考答案与解析:

相关试题

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

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

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

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

  • 查看答案
  • 在窗体上画一个文本框和一个列表框,然后编写下列两个事件过程: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”,然后双击列表框中的

  • 查看答案
  • 在窗体上画一个名称为Commandl命令按钮,然后编写如下事件过程:Privat

    [单选题]在窗体上画一个名称为Commandl命令按钮,然后编写如下事件过程: Private Sub Commandl_click() c="ABCD" For n=1 To 4 Print______ Next End Sub 程序运行后,单击命令按钮,要求在窗体上显示如下内容 D CD BCD ABCD 则在______处填入的内容为。A. Left(c,n)B.Right(c,n)C.Mid(c,n,1)D.Mid(c,n,n)

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

    [单选题]在窗体上画一个命令按钮,然后编写如下事件过程: Option Base 1 Private Sub Command1 Click() Dim a a=Array(1, 2, 3, 4) j = 1 For i = 4 To 1 Step -1 s = s + a(i)* j i = j * 10 Next i Print s End Sub 运行上面的程序,单击命令按钮,其输出结果为A.4321B.12C.34D.1234

  • 查看答案