填空题

以下程序需要实现的功能是：在C盘根目录下建立一个名为Students.txt的顺序文件。单击命令按钮后，输入4个学生的个人信息，包括name、sex和age，将这些信息写入文件中。请填空。
Private Sub Form_Click()
Open 【9】 For Output As #1
For i=1 To 4
name=InputBox("姓名")
age=InputBox("年龄")
sex=InputBox("性别")
Write 【10】
Next i
Close #1
End Sub

【参考答案】

"C:\Students.txt" #1，name，age，sex

<上一题目录下一题>

热门试题

填空题

以下程序段的功能为，输入8个数给数组a,然后采用插入排序算法，将数组a中的数按照升序排列存入数组b中。请填空。 Private Sub Command1_Click () Dim a(1 To 8), b(1 To 8) For i = 1 To 8 a(i) = InputBox( 请输入 ) Print a(i) Next i Print For i = 1 To 8 s = 1 For j = 1 To 8 If 【6】 Then s = s + 1 End If Next j 【7】 Next i End Sub

单项选择题

当Form_Click;事件发生时,窗体上显示的第三行是 ______。 Private Sub Form_Click() Dim i As Integer, j As Integer, k As Integer Dim x(5, 5) As Integer For i = 1 To 5 k = 1 For j = 1 To 5 If i ＜= j Then x(i, j) = k + 1 k=k+2 Else x(i, j) = k + 1 End If Next j Next i For i = 1 To 5 For j = 1 To 5 Print x(i, j) Next j Print Next i End Sub

A．22135
B．21357
C．22213
D．13579

相关试题