下列程序的功能是：将数据1，2，…，10写入顺序文件Base.txt中，请填空。 Private Sub Form_Click() Dim i As Integer 　　Open ______ As #1 　　For i=1 To

admin2012-03-22 48

问题下列程序的功能是：将数据1，2，…，10写入顺序文件Base.txt中，请填空。
Private Sub Form_Click()
Dim i As Integer
　　Open ______ As #1
　　For i=1 To 10
　　　　Prin t#1,i
　　Next
　　Close #1
End Sub

选项

答案"Base.txt" For Output

解析

转载请注明原文地址:https://www.kaotiyun.com/show/8Uhp777K

本试题收录于：二级VB题库NCRE全国计算机二级分类

二级VB

NCRE全国计算机二级

相关试题推荐

往窗体Form1上添加一个列表框控件List1，并编写如下代码：PrivateSubForm_Load()Fori=0To6List1.AddItemiNextiEndSub为了在程序运
以下能正确定义数据类型TelBook的代码是_________。
在软件工程中，白箱测试法可用于测试程序的内部结构。此方法将程序看做是_______。
在有下面一个程序段从文本框中输入数据，如果该数据满足条件，除以6余2，脓以5余3，则输出．否则，特焦点定位在文本框中，并清除文本框的内容。　　PrivateSubCommand1_Click()　　　num=Val(Text1．Text)　　　
有如下程序：　　PrivateSubCommand1Click()　　　　DimaAsSingle　　　　DimbAsSingle　　　　a=5：b=4　　　　CallS(a，B)EndSub　　SubS(xAsSingle，y
下列说法错误的是
下面的程序的作用是利用随机函数产生10个100-300(不包含300)之间的随机整数，打印其中7的倍数的数，井求它们的总和，请填空。　　SubTOF()　　Randomize　　DimsAsDouble　　Dima(10)Aslnt
下面程序运行后，单击命令按钮，输出的结果是【】PrivateSubCommandl_Click()Dima％(1To4)，b％(2To6)，i％，strl#，str2#Fori=1To4a(
执行下面的程序后，输出的结果是　　p=1　　Forj=1To4　　　p=p-1：q=0　　　Fork=1To4　　　　p=p+1：q=q+1　　　Nextk　　Nextj　　Printp；q
关系数据库管理系统能实现的专门关系运算包括______。

随机试题

舒张早期奔马律的临床意义是()
若测得某物质的肾清除率为80mL／min，则可认为肾小管对该物质
患者，男，41岁。十二指肠球部溃疡6年，突然出现上腹部剧痛1天，继之大汗淋漓、出冷汗、四肢冰冷。查体：血压9．7／6kPa，心率119次／min，全腹有压痛及反跳痛。临床疑有溃疡穿孔可能。此时应立即采取的措施是
某药材，类圆柱形、圆锥形、卵圆形或不规则块片状，长3～17cm，直径3～10cm。除尽外皮者表面黄棕色至红棕色，有的可见类白色网状纹理及“星点”(异型维管束)散在。该药材是
下列关于黄金分割法的论述，说法正确的是()。
街津山国家森林公园、洪河自然保护区、三江口风景区、街津口赫哲族民俗村、横江口风景区都是()境内的旅游景区。
我国最早主张“以美育代宗教”的教育家是()。
正确贯彻执行惩办与宽大相结合政策应注意的问题有()。
[2008年10月]直线y=x，y=ax+b与x=0所围成的三角形的面积等于1。(1)a=—1，b=2；(2)a=—1，b=一2。
起源

最新回复(0)

下列程序的功能是：将数据1，2，…，10写入顺序文件Base.txt中，请填空。 Private Sub Form_Click() Dim i As Integer Open ______ As #1 For i=1 To

二级VB

NCRE全国计算机二级

往窗体Form1上添加一个列表框控件List1，并编写如下代码：PrivateSubForm_Load()Fori=0To6List1.AddItemiNextiEndSub为了在程序运

以下能正确定义数据类型TelBook的代码是_________。

在软件工程中，白箱测试法可用于测试程序的内部结构。此方法将程序看做是_______。

在有下面一个程序段从文本框中输入数据，如果该数据满足条件，除以6余2，脓以5余3，则输出．否则，特焦点定位在文本框中，并清除文本框的内容。 PrivateSubCommand1_Click() num=Val(Text1．Text)

有如下程序： PrivateSubCommand1Click() DimaAsSingle DimbAsSingle a=5：b=4 CallS(a，B)EndSub SubS(xAsSingle，y

下列说法错误的是

下面的程序的作用是利用随机函数产生10个100-300(不包含300)之间的随机整数，打印其中7的倍数的数，井求它们的总和，请填空。 SubTOF() Randomize DimsAsDouble Dima(10)Aslnt

下面程序运行后，单击命令按钮，输出的结果是【】PrivateSubCommandl_Click()Dima％(1To4)，b％(2To6)，i％，strl#，str2#Fori=1To4a(

执行下面的程序后，输出的结果是 p=1 Forj=1To4 p=p-1：q=0 Fork=1To4 p=p+1：q=q+1 Nextk Nextj Printp；q

关系数据库管理系统能实现的专门关系运算包括______。

舒张早期奔马律的临床意义是()

若测得某物质的肾清除率为80mL／min，则可认为肾小管对该物质

患者，男，41岁。十二指肠球部溃疡6年，突然出现上腹部剧痛1天，继之大汗淋漓、出冷汗、四肢冰冷。查体：血压9．7／6kPa，心率119次／min，全腹有压痛及反跳痛。临床疑有溃疡穿孔可能。此时应立即采取的措施是

某药材，类圆柱形、圆锥形、卵圆形或不规则块片状，长3～17cm，直径3～10cm。除尽外皮者表面黄棕色至红棕色，有的可见类白色网状纹理及“星点”(异型维管束)散在。该药材是

下列关于黄金分割法的论述，说法正确的是()。

街津山国家森林公园、洪河自然保护区、三江口风景区、街津口赫哲族民俗村、横江口风景区都是()境内的旅游景区。

我国最早主张“以美育代宗教”的教育家是()。

正确贯彻执行惩办与宽大相结合政策应注意的问题有()。

[2008年10月]直线y=x，y=ax+b与x=0所围成的三角形的面积等于1。(1)a=—1，b=2；(2)a=—1，b=一2。

起源

下列程序的功能是：将数据1，2，…，10写入顺序文件Base.txt中，请填空。 Private Sub Form_Click() Dim i As Integer 　　Open ______ As #1 　　For i=1 To

在有下面一个程序段从文本框中输入数据，如果该数据满足条件，除以6余2，脓以5余3，则输出．否则，特焦点定位在文本框中，并清除文本框的内容。　　PrivateSubCommand1_Click()　　　num=Val(Text1．Text)　　　

有如下程序：　　PrivateSubCommand1Click()　　　　DimaAsSingle　　　　DimbAsSingle　　　　a=5：b=4　　　　CallS(a，B)EndSub　　SubS(xAsSingle，y

下面的程序的作用是利用随机函数产生10个100-300(不包含300)之间的随机整数，打印其中7的倍数的数，井求它们的总和，请填空。　　SubTOF()　　Randomize　　DimsAsDouble　　Dima(10)Aslnt

执行下面的程序后，输出的结果是　　p=1　　Forj=1To4　　　p=p-1：q=0　　　Fork=1To4　　　　p=p+1：q=q+1　　　Nextk　　Nextj　　Printp；q