网友您好, 请在下方输入框内输入要搜索的题目:

题目内容 (请给出正确答案)

已知c:\1.txt是一个非空文件,其程序代码如下。 Private Sub Command1_Click() Dim MaxSize,NextChar,MyChat Open"c:\1.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(1) Close #1 End Sub 程序运行后,单击命令按钮,其输出结果为______。

A.True

B.Null

C.0

D.False


参考答案

更多 “ 已知c:\1.txt是一个非空文件,其程序代码如下。 Private Sub Command1_Click() Dim MaxSize,NextChar,MyChat Open"c:\1.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(1) Close #1 End Sub 程序运行后,单击命令按钮,其输出结果为______。A.TrueB.NullC.0D.False ” 相关考题
考题 判定一个顺序栈st(最多元素为MaxSize)为空的条件是()。A.st->top!B.st->top!C.top==-1D.top==MaxSize

考题 在窗体上画一个命令按钮,然后编写如下代码: 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.TrueB.FalseC.0D.Null

考题 判断一个栈ST(最多元素为Maxsize)为空的条件是()。A.ST->top!==一1B.ST->top==-1C.ST->top!==Maxsize-1D.ST->top==Maxsize-1

考题 在窗体上画一个命令按钮,然后编写如下代码: Private Type Record ID As Integer Name As String * 20 End Type Private Sub Command1_Click( ) Dim MaxSize, NextChar, MyChar Open "d:\vb\tt. 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(1) Close $1 End Sub 假设文件d:\vb\tt. txt 的内容为 Hello eveybody! 那么程序运行后,单击命令按钮,其输出结果为 ______。A.TrueB.FalseC.0D.Null

考题 在窗体上画一个命令按钮,然后编写如下代码: 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=1 To MaxSize Seek#1,NextChar MyChar=Input(1,#1) Next NextChar Print EOF(1) Close #1 End Sub 程序运行后,单击命令按钮,其输出结果为 ______。A.TrueB.FalseC.0D.Null

考题 在窗体上画一个命令按钮,然后编写如下代码: 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.TrueB.FalseC.0D.Null

考题 (单选)已知一个顺序存储的循环队列Q定义如下: #define MAXSIZE 50 typedef struct { QueueElementType element[MAXSIZE]; int front; //队头指示器 int rear; //队尾指示器 }SeqQueue; 则该非空队列取队头元素操作的语句是() A. Q->element[0]; B. Q->element[1]; C. Q->element[Q->front]; D. Q->element[Q->rear];

考题 从键盘输入一个3位数的正整数,将其反向输出(如输入123,输出321)。 提交要求: (1)把程序代码和运行结果并排显示,进行截图直接提交到“答案区”。 (2)把程序代码保存到一个文本文件中(如: 1.txt),并上传附件。

考题 判定一个顺序栈(存储空间长度Maxsize)为空的条件是______A.top != -1B.top == -1C.top != MaxsizeD.top== Maxsize -1