在VBA中按文件的访问方式不同，可以将文件分为( )。
- A.顺序文件、随机文件和二进制文件
- B.文本文件和数据文件
- C.数据文件和可执行文件
- D.ASCII文件和二进制文件
热度🔥563
参考答案：A
解析：
【解析】VBA中打开文件的格式为： Open 文件名 [For 方式] [Access存取类型] [锁定] As [#]文件号[Len＝记录长度] 其中"方式"可以是以下几种：Output、Input、Append为指定顺序输出输入方式，Random为指定随机存取方式，Binary为指定二进制文件。因此，按文件访问方式不同可以将文件分为顺序文件、随机文件和二进制文件。
【解析】VBA中打开文件的格式为： Open 文件名 [For 方式] [Access存取类型] [锁定] As [#]文件号[Len＝记录长度] 其中"方式"可以是以下几种：Output、Input、Append为指定顺序输出输入方式，Random为指定随机存取方式，Binary为指定二进制文件。因此，按文件访问方式不同可以将文件分为顺序文件、随机文件和二进制文件。
复制题目向AI提问
扫码免费计算机二级刷题
2025年计算机等级考试题库
推荐
教师管理数据库有数据表"teacher"，包括"编号"、"姓名"、"性别"和"职称"四个字段。下面程序的功能是：通过窗体向"teacher"表中添加教师记录。对应"编号"、"姓名"、"性别"和"职称"的4个文本框的名称分别为：tNo、tName、tSex和tTitles。当单击窗体上的"增加"命令按钮(名称为Command1)时，首先判断编号是否重复，如果不重复，则向"teacher"表中添加教师记录；如果编号重复，则给出提示信息。
Private ADOcn As New ADODB.Connection
Private Sub Form_Load()
'打开窗口时，连接Access本地数据库
Set ADOcn＝CurrentProject.Connection
End Sub
Private Sub Command0_Click()
'追加教师记录
Dim strSQL As String
Dim ADOcmd As New ADODB.Command
Dim ADOrs As New ADODB.Recordset
Set ADOrs.ActiveConnection＝ADOcn
ADOrs.Open "Select 编号 From teacher Where 编号＝'" ＋ tNo ＋ "'"
If Not ADOrs.EOF Then
MsgBox "你输入的编号已存在，不能新增加！"
Else
ADOcmd.ActiveConnection＝ADOcn
strSQL＝"Insert Into teacher(编号，姓名，性别，职称)"
strSQL＝strSQL＋"Values('"＋tNo＋"'，'"＋tname＋"'，'"＋tsex＋"'，'"＋ttitles＋"')"
ADOcmd.CommandText＝strSQL
ADOcmd.
MsgBox "添加成功，请继续！"
End If
ADOrs.Close
Set ADOrs＝Nothing
End Sub
按照功能要求，在横线上应填写的是( )。
在窗体上画一个名称为Command1的命令按钮，并编写如下程序：Private Type Record ID As Integer Name As String * 20End TypePrivate 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 MyChar＝Input(1， #1) Next NextChar Print EOF(1) Close #1End Sub运行程序，单击命令按钮，其输出结果为( )。
软件设计中模块划分应遵循的准则是
设二叉树中共有15个结点，其中的结点值互不相同。如果该二叉树的前序序列与中序序列相同，则该二叉树的深度为（ ）。
设栈的顺序存储空间为 S(1:m)，初始状态为top=m+1。现经过一系列正常的入栈与退栈操作后，top=0，则栈中的元素个数为（ ）。
