A.顺序文件中的数据只能按顺序读写
B.对同一个文件,可以用不同的方式和不同的文件号打开
C.执行Close 语句,可将文件缓冲区中的数据写到文件中
D.随机文件中各记录的长度是随机的
单选题 | 设 a=5,b=6,c=7,d=8 ,执行下列语句后, X 的值为 ( ) 。 X=IIf((a>b)And(c>d),10,20) |
查看答案 |
单选题 | 从工程管理角度,软件设计一般分为两步完成,它们是 ( ) 。 | 查看答案 |
单选题 | 在窗体上画一个命令按钮和两上文体,其名称分别为 Command1 、 Text1 和 Text2 ,然后编写如下程序: Dim S1 As String, S2 As String Private Sub Form_Load() Text1. Text=”” Text2. Text=”” End Sub Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer) S2=s2 & Chr(KeyCode) End Sub Private Sub Text1_KeyPress(KeyAscii As Integer) S1=S1 & chr(KeyAscii) End Sub Private Sub Command1_Click() Text1.Text=S2 Text2.Text=S1 S1= “” S2= “” End Sub 程序运行后,在 Text1 中输入“ abc ”,然后单击命令按钮,在文本框 Text1 和 Text2 中显示的内容分别为 ( ) 。 |
查看答案 |
单选题 | 没有如下的用户定义类型: Type Student number As String name As String age AS Integer End Type 则以下正确引用该类型成员的代码是 ( ) 。 |
查看答案 |
单选题 | 以下叙述中正确的是 ( ) 。 | 查看答案 |
单选题 | 以下叙述中正确的是 ( ) 。 | 查看答案 |
单选题 | 设有语句: Open "d: \ Text.txt" For OutputAs#1 ,以下叙述中错误的是() | 查看答案 |
单选题 | 在窗体上画一个名称为 TxtA 的文本框,然后编写如下的事件过程: Private Sub TxtA_KeyPress(KeyAscii As Integer) …… End Sub 假定焦点已经位一地文本框中,则能够触发 KeyPress 事件的操作是 |
查看答案 |
单选题 | 下列叙述中正确的是 ( ) 。 | 查看答案 |
单选题 | 下列选项中不属于软件生命周期开发阶段任务的是 ( ) 。 | 查看答案 |
单选题 | 设有如下通用过程: Public Function Fun(xStr As String) Dim tStr As String, srtL As Integer tStr+”” strL=Len(xStr) i=1 Do While i<=strL/2 tStr=tStr &Mid(xStr,i ,1)& Mid (xStr ,strL-i+1,1) i=i+1 Loop Fun=tStr End Function 在窗体上画一个名称为 Textl 的文本框和一个名称为 Command1 的命令按钮,然后编写如下的事件过程: Private Sub Command 1_ Click() Dim S1 As String S1=”abcdef” Text1.Text=UCase(Fun(S1)) End Sub 程序运行后,单击命令按钮,则 Text1 中显示的是 ( ) 。 |
查看答案 |
单选题 | 在窗体上画一个通用对话框,其名称为 CommonDialog1 ,然后画一个命令按钮,并编写如下事件过程: Private Sub Command1_Click() CommonDialog1. Filter=”All Files(*.*)|*.*Text Files”&_ “(*.txt)|*.txt| Executable Files(*.exe)|*.exe” CommonDialog1. Filterindex=3 CommonDialog1. Show Open MsgBox CommonDialog1. FileName End Sub 程序运行后,单击命令按钮,将显示一个“打开”对话框,此时在“文件类型”框中显示的是 ( ) 。 |
查看答案 |
单选题 | 以下叙述中错误的是() | 查看答案 |
单选题 | 在窗体上画一个命令按钮和两个标签,真名和分别为 Commandl 、 Labell 和 Labe12 ,然后编写如下事件过程: Private Sub Commandl_Chick. a=0 For i=1 To 10 a=a+1 b=0 Forj=1 To 10 a=a+1 b=b+2 Nextj Next i Labell. Caption=Str(a) Labe12.Caption=Str(b) End Sub 程序运行后,单击命令按钮,在标签 Labell 和 Labe12 中显示的内容分别为 ( ) 。 |
查看答案 |
单选题 | 在窗体上画一个文本框(其名称为 Textl)和一个标签(其名称为 Labell),程序运行后,如果在文本框中输入指定的信息,则立即在标签中显示相同的内容,以下可以实现上述操作的事件过程是 ( ) 。 | 查看答案 |
单选题 | 有以下程序: Sub subp(b()As Integer) For i=1To4 b(i)=2-i Nexti End Sub Private Sub Command1_Click() Dim a (1 To 4)As Integer a(1)=5 a(2)=6 a(3)=7 a(4)=8 subpa() For i=1 To4 Print a (i) Next i End Sub 运行上面的程序,单击命令按钮,输出结果为 ( ) 。 |
查看答案 |
单选题 | 在窗体上画一个名称为 Listl 的列表框,一个名称为 Labell 的标签,列表框中显示若干城市的名称。当单击列表框中的某个城市名时,该城市名从列表框中消失,并在标签中显示出来。下列能正确实现上述操作的程序是 ( ) 。 | 查看答案 |
单选题 | 在窗体上画一个名称为 Text1 的文本框和一个名称为 Commandl 的命令按钮,然后编写如下事件过程: Private Commandl_Click() Dim i As Integer, n As Integer For i=0 To 50 i = i+3 n = n+1 If i>10Then Exit For Next Textl.Text=Str(n) End Sub 程序运行后,单击命命令按钮,在文本框中显示的值是 ( ) 。 |
查看答案 |
单选题 | 设有如下三个关系表: 下列操作中正确的是 ( ) 。 |
查看答案 |
单选题 | 有以下程序: Option Base 1 Dim arr() As Integer Private Sub Form_Click() Dim i As Integer,j As Integer ReDim arr(3,2) For i=1 To 3 For j=1 To 2 arr (i,j)=i*2+j Next j Next i ReDim Preserve arr(1,4) For j=3 To 4 arr(3,j)=j+9 Next j Print arr(3,2);arr(3,4) End Sub 程序运行后,单击窗体,输出结果为 ( ) 。 |
查看答案 |