[填空题] 下列程序段的功能是,单击命令按钮后,将随机产生10个三位数,并将这些数写到C盘根目录下的data.txt文件中。请填空。 Private Sub Command1_Click() Di

17 查阅

[填空题] 下列程序段的功能是,单击命令按钮后,将随机产生10个三位数,并将这些数写到C盘根目录下的data.txt文件中。请填空。

Private Sub Command1_Click()

Dim a As Integer

Open 【9】 For Output As #100

Randomize

For i =1 To 10

a=100+Int(899*Rnd)

【10】

Next i

Close #100

End Sub

参考答案:

"d:datalll.txt" Write #A00,a

首先打开顺序文件。第一个空填文件的路径与文件名。使用Write将数据写入文件内,格式为“Write #100,a”,即把变量a的值写入文件号为100的文件内。

计算机考试