设在工程中有一个标准模块，其中定义了如下记录类型 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 #1 B.Name=InputBox("输入姓名") B.TelNum=InputBox("输入电话号码") Write #1,B.Name,B.TelNum Close #1 End SubB．Private Sub Command1_Click() Dim B As Books Open "c:\Person.txt" For Input As #1 B.Name=InputBox("输入姓名") B.TelNum=InputBox("输入电话号码") Print #1, B.Name, B.TelNum Close #1 End SubC．Private Sub Command1_Click() Dim B As Books Open "c:\Person.txt" For Output As #1 B.Name=InputBox("输入姓名") B.TelNum=InputBox("输入电话号码") Write #1, B Close #1 End SubD．Private Sub Command1_Click() Dim B As Books Open "c:\Person.txt" For Input As #1 Name=InputBox("输入姓名") TelNum=InputBox("输入电话号码") Print #1, Name, TelNum Close #1 End Sub

设在工程中有一个标准模块，其中定义了如下记录类型 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 #1 B.Name=InputBox("输入姓名") B.TelNum=InputBox("输入电话号码") Write #1,B.Name,B.TelNum Close #1 End Sub

B．Private Sub Command1_Click() Dim B As Books Open "c:\Person.txt" For Input As #1 B.Name=InputBox("输入姓名") B.TelNum=InputBox("输入电话号码") Print #1, B.Name, B.TelNum Close #1 End Sub

C．Private Sub Command1_Click() Dim B As Books Open "c:\Person.txt" For Output As #1 B.Name=InputBox("输入姓名") B.TelNum=InputBox("输入电话号码") Write #1, B Close #1 End Sub

D．Private Sub Command1_Click() Dim B As Books Open "c:\Person.txt" For Input As #1 Name=InputBox("输入姓名") TelNum=InputBox("输入电话号码") Print #1, Name, TelNum Close #1 End Sub

相关考题：

假定程序中有以下语句： answer=MsgBox("String1",,"String2","String3",2) 执行该语句后，将显示一个信息框，此时如果单击“确定”按钮，则answer的值为 ______。A．String1B．String2C．String3D．1
查看答案
假定程序中有以下语句： answer=MsgBox("Stringl",,"String2"，"String3"，2) 执行该语句后，将显示一个信息框，此时如果单击“确定”按钮，则answer的值为： ______。A．String1B．String2C．String3D．1
查看答案
假定程序中有以下语句：_______。 answer=MsgBox("Stringl",,"String2","String3",2) 执行该语句后，将显示一个信息框，此时如果单击“确定”按钮，则answer的值为：_______。A．String1B．String2C．String3D．1
查看答案
符号%是声明______类型变量的类型定义符。A．IntegerB．VariantC．SingleD．String
查看答案
假定程序中有以下语句： answer=MsgBox("Stringl",,"String2","String3",2) 执行该语句后，将显示一个信息框，此时如果单击“确定”按钮，则answer的值为： ______。A．String1B．String2C．String3D．1
查看答案
假定程序中有以下语句： answer=MsgBox("String1",,"String2","String31",2) 执行该语句后，将显示一个信息框，此时如果单击“确定”按钮，则answer的值为______。A．String1B．String2C．String3D．1
查看答案
已知String类定义如下：class String{public:String(const char *str = NULL); // 通用构造函数String(const String another); // 拷贝构造函数~ String(); // 析构函数String perater =(const String rhs); // 赋值函数private:char *m_data; // 用于保存字符串};尝试写出类的成员函数实现。
查看答案
对于String s;，以下哪句是对的？A．s是一个变量，它将要管理一个String的对象B．s是一个变量，其中有一个String的对象C．s现在的值是nullD．s是一个变量，它现在正管理着一个String的对象
查看答案
定义名为“联系方式”的属性组，该属性组包含两个名称分别为“邮箱”和“电话”的属性，这两个属性的类型均为"string"，下面正确的选项为（）。A．＜attributeGroup name="联系方式"＞ ＜attribute name="邮箱" type="xsd:string"/＞ ＜attribute name="电话" type=“xsd:string"/＞ ＜/attributeGroup＞B．＜attributeGroup name="联系方式"＞ ＜attribute name="邮箱" type="xsd:sting"＞ ＜attribute name="电话" type=“xsd:sting"＞ ＜/attributeGroup＞C．＜attribute name="联系方式"＞ ＜attribute name="邮箱" type="xsd:sting"/＞ ＜attribute name="电话" type=“xsd:sting"/＞ ＜
查看答案
20、对于String s;，以下哪句是对的？A．s是一个变量，它将要管理一个String的对象B．s是一个变量，其中有一个String的对象C．s现在的值是nullD．s是一个变量，它现在正管理着一个String的对象
查看答案
热门标签