单项选择题

在窗体上画一个名为Command1的命令按钮，然后编写如下程序： Option Base 1 Private Sub Command1_Click() Dim Arr Arr = Array(1,2,3,4,5) j=1 For i = 5 To 1 Step -1 S = S + Art(i) * j j =j * 10 Next Print S End Sub 程序运行后，单击命令按钮，输出结果为( )。

A．54321
B．123
C．12345
D．345

<上一题目录下一题>

热门试题

单项选择题

在E盘当前目录文件夹下建立一个名为“Student.txt”的随机文件，要求用InputBox函数输入5个学生的姓名(StuName)、年级(StuGrade)和年龄(StuAge)。在程序中有以下记录类型和窗体的事件过程，请选择正确的语句完成程序( )。 Private Type student StuName As String * 10 StuGrade As String * 10 StuAge As Integer End Type Private Sub Form_Click() Dim s As student Open c: student.txt For Random As #1 Len = Len(s) For i = 1 To 1 s. StuName = InputBox( 请输入姓名 ) s. StuGrade = InputBox( 请输入年级号 ) s. StuAge = Val(InputBox( 请输入年龄 )) Next i Close #1 End Sub

A．Print #1,s
B．Print #1,i
C．Put #1,,s
D．Put #1,,i

单项选择题

执行语句Open TC.dat For Random As #1 Len=50后，对文件TC.dat中的数据能执行的操作是( )。

A．只读操作
B．只写操作
C．既可以读，也可以写
D．追加操作

相关试题