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

题目

在窗体上画一个文本框和一个列表框，然后编写下列两个事件过程：

Private Sub Form_Load()

List1.AddItem"357"

List1.AddItem"246"

List1.AddItem"123"

List1.AddItem"456"

Text1.Text=""

End Sub

Private Sub List1 DblClick()

m=List1.Text

Print m+Text1.Text

End Sub

程序运行后，在文本框中输入“123”，然后双击列表框中的"456"，输出结果是( )。

A．1245

B．456123

C．123456

D．0

相似考题

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

2.在窗体上画一个列表框和一个文本框，然后编写如下两个事件过程：PrivateSubForm_Load()List1.AddItem"357"List1.AddItem"246"List1.AddItem"123"List1.AddItem"456"Text1.Text=""EndSubPrivateSubList1_DblClick()a=List1.TextPrinta+Text 1.TextEndSub程序运行后，在文本框中输入"789"，然后双击列表框中的"456"，则输出结果为( )A.456789B.789456C.111315D.101315

3.在窗体上画一个文框和一个列表框，然后编写下列两个事件过程： 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

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

更多“在窗体上画一个文本框和一个列表框,然后编写下列两个事件过程:Private Sub Form_Load()List1.Add ”相关问题

  • 第1题：

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


    正确答案：VB Programming、VB 程序设计
    【解析】单击窗体触发Form的Click事件，执行“Text1.Text="VB Programming"”语句，在文本框Text1中显示“VB Programming”；此时文本框Text1的Text属性发生了变化，因此触发Text1的Change事件，执行“Picture1.Print"VB程序设计"”语句，在图片框中显示“VB程序设计”。

  • 第2题：

    在窗体上画一个列表框、一个文本框及一个按钮，然后编写如下两个事件过程： 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．40123

    B．163

    C．123

    D．30123


    正确答案：A
    解析：当双击列表框的第四行，对应的Text值是40而不是123。另外，ListBox和TextBox的Text属性返回的均为字符型数据。窗体上显示的是列表框的内容与文本框的内容连接以后的内容，即为40123。

  • 第3题：

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


    正确答案：B
    解析：分析程序，在程序运行时，列表框自动添加几个列表项，双击列表框时，给程序把当前列表项的Text属性值赋值给变量m，然后将m与文本框的Text属性值连接起来并输出。List.Text代表列表框中当前项目的内容，选择456后，m的值为456，与文本框中的字符串连接，输出到窗体上。

  • 第4题：

    在窗体上画一个文本框和一个图片框，然后编写下列两个事件过程：

    Private Sub Form_C1ick()

    Textl.Text="VB Programming"

    End Sub

    Private SubText1_change()

    Picture1.Print"VB程序设计"

    End SUb

    程序运行后，单击窗体，则在文本框中显示的内容是______，而在图片框中显示的内容是______。


    正确答案：VB Programming VB程序设计
    VB Programming VB程序设计 解析： 单击窗体触发Form的Click事件，执行“Text1.Text="VB Programming"”语句，在文本框Text1中显示“VB Programming"；此时文本框Text1的Text属性发生了变化，因此触发Text1的Change事件，执行“Picture1.Print"VB程序设计"”语句，在图片框中显示“VB程序设计”。

  • 第5题：

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

    B．456123

    C．123456

    D．0


    正确答案：B
    解析：分析程序，在程序运行时，列表框自动添加几个列表项，双击列表框时，给程序把当前列表项的Text属性值赋值给变量m，然后将m与文本框的Text属性值连接起来并输出。List.Text代表列表框中当前项目的内容，选择456后，m的值为456，与文本框中的字符串连接，输出到窗体上。

相关内容