题目
Private Sub Command1_Click()
Dim inData As String
Text1.Text = ""
Open "d:\myfile.txt" For 【 14 】 As #1
Do While 【 15 】
Input #1, inData
Text1.Text = Text1.Text + inData
Loop
Close #1
End Sub
程序的功能是,打开 D 盘根目录下的文本文件 myfile.txt ,读取它的全部内容并显示在文本框中 。 请填空。
第1题
在窗体上画一个命令按钮(名称为Command1),编写如下事件过程: Private Sub Command1_Click() b=5 c=6 Print a=b+c End Sub 程序运行后,单击命令按钮,输出的结果是:_______。
A.a=11
B.a=b+c
C.a=
D.False
第2题
在窗体上画一个命令按钮(名称为Command1),然后编写如下事件过程: Private Sub Command1_Click() b=5 c=6 Print a=b+c End Sub 程序运行后,单击命令按钮,输出的结果是______。
A.a=11
B.a=b+c
C.a=
D.False
第3题
在窗体上画一个命令按钮(名称为Command1),然后编写如下事件过程: Private Sub Command1_Click() a=4:b=5:c:6 Print a=b+c End Sub 程序运行后,单击命令按钮,其结果为
A.a=11
B.a=b+c
C.False
D.出错
第4题
在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Commandl_Click() Dim a(5)As String Fori=1 To 5 a(i)=Chr(Asc("A")+(11)) Nexti For Each b In a Print b Next End Sub 程序运行后,单击命令按钮,输出结果是()。
A.ABCDE
B.1 2 3 4 5
C.abcde
D.出错信息
第5题
在窗体上画一个名称为Command1的命令按钮,然后编写如下程序 _______。 Dim k As Integer Private Sub Form_Load() k=5 End Sub Private Sub Command Click() Static b As Integer b = b + k k=k+1 Print k,b End Sub 程序运行时,两次单击命令按钮Command1后,在窗体上显示的第二行是 _______。
A.7 11
B.5 11
C.76
D.2 1
第6题
A.5
B.6
C.10
D.11
第7题
在窗体上画一个命令按钮(名称为Command1),然后编写如下事件过程: Private Sub Command1_Click() b=5 c=6 Print a=b+c End Sub 程序运行后,单击命令按钮,输出的结果是 ______。
A.a=11
B.a=b+c
C.a=
D.假
第8题
在窗体上画一个命令按钮,名称为Command1。然后编写如下事件过程: Private Sub Command1_Click() x=11 Sum=0 For i=1 To x n=Iif(i>5, 1, 2) Sum=Sum+n Next i Print Sum End Sub 运行后的输出结果是______。
A.16
B.11
C.5
D.2
第9题
在窗体上画一个命令按钮Command1,然后编写如下代码: Privae Sub Command1_Click() Dim Arr1(10) As Integer,Arr2(10) As Integer n=3 For i=1 To 5 Arr1(i)=i Art2(n)=2*n+i Next i Print Arr2(n);Arr1(n) End Sub 运行程序后,单击命令按钮,输出结果是()。
A.11 3
B.3 11
C.13 3
D.3 13
第10题
在窗体上画一个命令按钮Command1,然后编写如下代码: Private Sub Command1_Click() Dim Arr1(10) As Integer, Arr2(10)As Integer n=3 For i = 1 To 5 Arr1 (i)=i Arr2(n)=2 * n+i Next i Print Arr2(n); Art1 (n)End Sub运行程序后,单击命令按钮,输出结果是()。
A.11 3
B.3 11
C.13 3
D.3 13
第11题
A.11
B.22
C.33
D.0
为了保护您的账号安全,请在“赏学吧”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!