单项选择题

 
在窗体上画一个名称为List1的列表框和一个名称为Text1的文本框,然后编写如下两个事件过程:
Private Sub Form_Load()
    List1.AddItem "100"
    List1.AddItem "200"
    List1.AddItem "300"
    List1.AddItem "400"
    Text1.Text = ""
End Sub
Private Sub List1_DblClick()
    a = List1.Text
    Print a + Text1.Text
End Sub
程序运行后,在文本框中输入"500",然后双击列表框中的"400",则输出结果为________。

A.500400
B.400500
C.900
D. 0