题目内容 (请给出正确答案)
[主观题]

1. Open "c:\myf1.txt" For OutPut语句用于打开一个顺...

1. Open "c:\myf1.txt" For OutPut语句用于打开一个顺序文件,但该语句的一个重要错误是没有 。 A) 指定打开方式 B)指定文件号 C) 指定打开文件名 D) 指定文件类型 2. Visual Basic根据计算机访问文件的方式将文件分成三类,其中不包括 。 A) 顺序文件 B) Unix文件 C) 二进制文件 D) 随机文件 3. 文件列表框控件的 属性用来确定在列表框中显示的文件类型。 A) Path B)Pattern C) FileName D) List 4. 以下叙述中不正确的是 。 A)Open语句的功能是打开一个已经存在的文件 B) 随机文件每条记录的长度是固定的 C) 执行如下命令后,文件指针指向文件的开头: Open "C:\Data\File1.Dat" For Output As #1 D) 以下循环语句中的条件表示当到达文件结尾时结束循环: Do While Not EOF(1) <循环体语句> Loop 5. 以下能正确定义数据类型TelBook的代码是 。 A) Type TelBook Name As String * 10 TelNum As Integer End Type B) Type TelBook Name As String * 10 TelNum As Integer End TelBook C) Type TelBook Name String * 10 TelNum Integer End Type TelBook D) Typedef TelBook Name String * 10 TelNum Integer End Type

暂无答案
如搜索结果不匹配,请 联系老师 获取答案
您可能会需要:
您的账号:,可能会需要:
您的账号:
发送账号密码至手机
发送
更多“1. Open "c:\myf1.txt" For OutP…”相关的问题

第1题

若要显示名为Myfrm1的窗体,所用方法是( )。

A.Myfrm1.Show

B.Myfrm1.Open

C.Myfrm1.Hide

D.Myfrm1.Load

点击查看答案

第2题

若MyClass是一个类名,其有如下语句序列:

MyClassc1,*c2;

MyClass*c3=newMyClass;

MyClass&c4=c1;

上面的语句序列所定义的类对象的个数是( )。

A.1

B.2

C.3

D.4

点击查看答案

第3题

若MyClass是一个类名,其有如下语句序列: MyClassc1,*c2; MyClass*c3=newMyClass; MyClass&
;c4=c1; 上面的语句序列所定义的类对象的个数是( )。

A.1

B.2

C.3

D.4

点击查看答案

第4题

设要把一个文件输出流对象myFile与文件“f:\myText.txt”相关联,所用的C++语句是ifstream myFile("f:\\myText.txt",ios::in|ios::out);
点击查看答案

第5题

设在工程中有一个标准模块,其中定义了如下记录类型: TyPe Record ID A3 Integer Name As String*20 End TyPe 在窗体中添加一个名为Command1的命令按钮,假设d:\F1.dat文件中含有5个用户自定义类型的记录。要求当执行事件过程Command1_Click时,随机访问该文件,并把文件中的第4条记录读出。下列能够完成该操作的程序段是

A.Private Sub Command1_Click( ) Dim MyRecord As Record,Position Open"d:\F1.dat"For Random As#1 Len=Len(My RecorD)Position=4 Get#1,Position,Myrecord Close #1 End Sub

B.Private Sub Command1_Click( ) Dim MyRecord As Record,Position Open"d:\F1.dat"For Random As #1 Len=Len(MyRecorD)Position=4 Put #1,Position,MyRecord Close#1 End Sub

C.Private Sub Command1_Click( ) Dim MyRecord As Record,Position Open"d:\F1.dar"For OutPut As #1 Len=Len(My RecorD0Position=4 Get #1,Position,MyRecord Close#1 End Sub

D.Private Sub Command1_Click( ) Dim MyRecord As record,Position Open"d:\F1.dat"For lnput As #1 Len=Len(MyRecorD)Position=4 Get #1,Position,MyRecord Close#1 End Sub

点击查看答案

第6题

以下不能正确创建输出文件对象并使其与磁盘文件相关联的语句是

A.ofstream myfile:myfile, open("d:ofile.txt");

B.ofstream *myfile=new ofstream;myfile->open("d;ofile.txt");

C.ofstream myfile("d:ofile.txt");

D.ofstream *myfile=new ("d:ofile.txt");

点击查看答案

第7题

在窗体上画一个命令按钮,然后编写如下代码: Private Type Record ID As Integer Name As String *20 End Type Private Sub Command1_Click() Dim Maxsize, NextChar, MyChar Open "d:\temp\female.txt" For Input As #1 Maxsize = LOF(1) For NextChar = Maxsize To 1 Step -1 Seek #1, NextChar MyChar = Input(1, #1) Next NextChar Print EOF(I) Close 31 End Sub 程序运行后,单击命令按钮,其输出的结果为

A.True

B.False

C.0

D.Null

点击查看答案

第8题

在窗体上画一个命令按钮,然后编写如下代码: Private Type Record ID As Integer Name As String * 20 End Type Private Sub Command1_Click() Dim MaxSize,NextChar,MyChar Open"D:\temp\female.txt"For Input As # 1 Max Size=LOF(1) For Next Char=1 To MaxSize Seek # 1,NextChar MyChar=Input(1,# 1) Next NextChar Print EOF(1) Close # 1 End Sub 程序运行后,单击命令按钮,其输出结果为 ______。

A.True

B.False

C.0

D.Null

点击查看答案

第9题

( 8 )在当前目录下有一个名为 “ myfile.txt ” 的文本文件,其中有若干行文本。下面程序的功能是读入此文件中的所有文本行,按行计算每行字符的 ASCII 码之和,并显示在窗体上。请填空。

Private Sub Commandl_Click()

Dim ch$,ascii As Integer

Open “ myfile.txt ” For 【 11 】 As #1

While Not EOF(1)

Line Input #1,ch

ascii=toasill ( 【 12 】 )

Print ascii

Wend

Close #1

End Sub

Private Function toascii(mystr$) As Integer

n=0

For k=1 To 【 13 】

n=n+Asc(Mid(mystr,k,l))

Next k

Toascii=n

End Function

点击查看答案

第10题

创建一个名为MyPackage的包的语句正确的是()。

A、importMyPackage;

B、importpackageMyPackage;

C、packageMyPackage;

D、packageimportMyPackage

点击查看答案
热门考试 全部 >
相关试卷 全部 >
账号:
你好,尊敬的上学吧用户
发送账号至手机
密码将被重置
获取验证码
发送
温馨提示
该问题答案仅针对搜题卡用户开放,请点击购买搜题卡。
马上购买搜题卡
我已购买搜题卡, 登录账号 继续查看答案
重置密码
确认修改
谢谢您的反馈

您认为本题答案有误,我们将认真、仔细核查,
如果您知道正确答案,欢迎您来纠错

警告:系统检测到您的账号存在安全风险

为了保护您的账号安全,请在“上学吧”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!

微信搜一搜
上学吧
点击打开微信
警告:系统检测到您的账号存在安全风险
抱歉,您的账号因涉嫌违反上学吧购买须知被冻结。您可在“上学吧”微信公众号中的“官网服务”-“账号解封申请”申请解封,或联系客服
微信搜一搜
上学吧
点击打开微信