未知题型 设窗体上有一个名为Text1的文本框，并编写如下程序： Private Sub Form_Load() Show Text1.Text=' ' Text1.SetFocus End Sub Private Sub Form_MouseUp(Button As Integer， Shift As Integer，X As Single，Y As Single) Print“程序设计” End Sub Private Sub Text1_KeyDown(KeyCode As Integer，Shift As Integer) Print 'Visual Basic'； End Sub 程序运行后，如果在文本框中输入字母“a”，然后单击窗体，则在窗本上显示的内容是A.Visual BasicB.程序设计C.Visual Basic程序设计D.a程序设计

未知题型 邮寄送达中，挂号回执上注明的收件日期与送达回证上收件日期不一致的，送达日期应该是（）。

未知题型 设在工程中有一个标准模块，其中定义了如下记录类型： Type Books Name As String *10 TelNum As String *20 End Type 在窗体上画一个名为Command1的命令按钮，要求当执行事件过程Command1_Click时，在顺序文件Person.txt中写入一条记录。下列能够完成该操作的事件过程是A.Private Sub Command1_Click() Dim B As Books Open 'c：/Person.txt' For Output As #1BName=InputBox(“输入姓名”)BTelNum=InputBox(“输入电话号码”) Write #1,BName,BTelNum Close #1 End SubB.Private Sub Command1_Click() Dim B As Books Open 'c:/Person.txt' For Input As #1B@Name=InputBox(“输入姓名”)BTelNum=InputBox(“输入电话号码”) Print #1，BName，BTelNum Close #1 End SubC.Private Sub Command1_Click() Dim B As Books ppen 'c：/Person.txt' For Output AS #1BName=InputBox(“输入姓名”)BTelNum=InputBox(“输入电话号码”) Write #1，B Close#1 End SubD.Privte Sub Command1_Click() Open 'c：/Person.txt' For Input As #1 Name=InputBox(“输入姓名”) TelNum=InputBox(“输入电话号码”) Print#1，Name，TelNum Close #1 End Sub