在窗体上画一个命令按钮和一个文本框，其名称分别为Command1和Text1，把文本框的Text属性设置为空白，然后编写如下事件过程： Private Sub Command1_Click() a=InputBox("Enter an integer") b=InputBox("Enter an integer") Text1.Text=b+a End Sub 程序运行后，单击命令按钮，如果在输入对话框中分别输入8和10，则文本框中显示的内容是（）。

A．显示当前驱动器或指定驱动器上的某目录下的文件名
B．显示当前驱动器或指定驱动器上的目录结构
C．显示根目录下的文件名
D．显示指定路径下的文件

A．Ptivate Sub Command1_Click() Dim B As Books Open"c:\Persotxt"For Output As#1 Name=InputBox("输入姓名") TelNum=InputBox("输入电话号码") Write#1，Name，TelNum Close#1 End Sub
B．Private Sub Command1_Click() Dim B As Books Open"c:\Persotxt"For Input As#1 Name=InputBox("输入姓名") TelNum=InputBox("输入电话号码") Print#1，Name，TelNum Close#1 End Sub
C．Private Sub Command1_Click() Dim B As Books OPQl"c:\Persotxt"For Output As#1 Nallle=InputBox("输入姓名") TelNum=InputBox("输入电话号码") Write#1，B Close#1 End Sub
D．Private Sub Command1_Click() Dim B As Books Open"c:\Persotxt"For lnput As#1 Name=InputBox("输入姓名") TelNum=InputBox("输入电话号码") Write#1，Name，TelNum Close#1 End Sub