在工程中的标准模块中定义了如下数据类型： Type fruit orange As Integer apple As Integer End Type 在窗体上有—命令按钮Command1，要求当单击命令按钮时在C:\根目录下的顺序文件myfrtac.txt 中写入一条记录，下列能够完成改操作的事件过程是______ 。A．Private Sub Command1_Click() Dim myfrt As fruit myfrt. range = 5 myfrt. apple = 10 Open “c:\myfrta. txt” For Output As #1 Print #1, myfrt. orange; myfrt. apple Close #1 End SubB．Private Sub Command1_Click() Dim myfrt As fruit myfrt. range= 5 myfrt. apple= 10 Open “c:\myfrtac. txt”For Input As #1 Print #1, myfrt, orange; myfrt. apple Close #1 End SubC．Private Sub Command1_Click() Dim myfrt As fruit myfrt. range= 5 myfrt. apple = 10 Open “c:\myfrtac. txt” For As #1 Print #1, myfrt. orange; myfrt. apple Close #1 End SubD．Private Sub Command1_Click() Dim myfrt As fruit myfrt. range = 5 myfrt. apple= 10 Open “c:\myfrtac..txt” For Output As #1 Print myfrt. orange; myfrt. apple Close #1 End Sub

在工程中的标准模块中定义了如下数据类型： Type fruit orange As Integer apple As Integer End Type 在窗体上有—命令按钮Command1，要求当单击命令按钮时在C:\根目录下的顺序文件myfrtac.txt 中写入一条记录，下列能够完成改操作的事件过程是______ 。

A．Private Sub Command1_Click() Dim myfrt As fruit myfrt. range = 5 myfrt. apple = 10 Open “c:\myfrta. txt” For Output As #1 Print #1, myfrt. orange; myfrt. apple Close #1 End Sub

B．Private Sub Command1_Click() Dim myfrt As fruit myfrt. range= 5 myfrt. apple= 10 Open “c:\myfrtac. txt”For Input As #1 Print #1, myfrt, orange; myfrt. apple Close #1 End Sub

C．Private Sub Command1_Click() Dim myfrt As fruit myfrt. range= 5 myfrt. apple = 10 Open “c:\myfrtac. txt” For As #1 Print #1, myfrt. orange; myfrt. apple Close #1 End Sub

D．Private Sub Command1_Click() Dim myfrt As fruit myfrt. range = 5 myfrt. apple= 10 Open “c:\myfrtac..txt” For Output As #1 Print myfrt. orange; myfrt. apple Close #1 End Sub

相关考题：

有类定义如下：class Type{public：Type(int i=0)；Type operator-(int)；friend Type operator+(Type，Type)；private：int val；}；若有对象定义Type c1；则下列语句序列中，错误的是A．Type(3)+c1；B．c1+Type(3)；C．3-c1；D．c1-3；
查看答案
有如下程序：Private type stuX as stringY as integerEnd typePrivate Sub Command1_Click()Dim a as stua.x=”ABCD”a.Y=12345print aEnd Sub程序运行时出现错误，错误的原因是A)Type定义语句没有放在标准模块中B)变量声明语句有错C)赋值语句不对D)输出语句print不对
查看答案
有如下程序：Private Type stuX As StringY As IntegerEnd TypePrivate Sub Command1 Click（ ）Dim a As stuX=ABCDY=12345Print aEnd Sub程序运行时出现错误，错误的原因是（ ）。A.Type定义语句没有放在标准模块中B.变量声明语句有错C.赋值语句不对D.输出语句Print不对
查看答案
有如下程序： Private Type stu X As String Y As Integer End Type Private Sub Command1 Click（ ） Dim a As stu X="ABCD" Y=12345 Print a End Sub 程序运行时出现错误，错误的原因是（ ）。A.Type定义语句没有放在标准模块中B.变量声明语句有错C.赋值语句不对D.输出语句Print不对
查看答案
假定已经定义了一个名为arr_type的PL／SQL表类型,那么怎样实例化一个arr_type类型的变量() A.v_arr arr_type;B.v_arr is arr_type;C.v_arr of arr_type;D.v_arr arr_type%type;
查看答案
在Oracle中,()数据字典表可以用来查看抽象数据类型的实际结构。 A.USER_TYPE_ATTRSB.USER_TABLESC.USER_TYPE_TABSD.USER_TAB_COLUMNS
查看答案
以下哪几种统计报告可以在OMCR上利用PMC来定义() A.Type110B.Type018C.Type26D.Type19
查看答案
如果希望想为表单元素类型为type且值为text的元素设置背景色，则用如下方法定义（）。A．input{type=text}{ }B．input[type=text]{ }C．input（type=text）{ }D．input type=text{ }
查看答案
4、如果希望想为表单元素类型为type且值为text的元素设置背景色，则用如下方法定义（）。A．input{type=text}{ }B．input[type=text]{ }C．input（type=text）{ }D．input type=text{ }
查看答案
在jQuery中，选择器$（"tr.type")的作用是（）。A．获取应用了样式类type的所有的tr元素B．获取设置了属性type的所有的tr元素C．获取id属性值为type的所有的tr元素D．获取type属性值为type的所有的tr元素
查看答案
热门标签