下列程序段的功能是,单击命令按钮后,将随机产生10个三位数,并将这些数写到C盘根目录下的datA.txt文件中。请填空。 Private Sub Command1_Click() Dim a As Integer Open【 】For

admin2010-09-11  28

问题 下列程序段的功能是,单击命令按钮后,将随机产生10个三位数,并将这些数写到C盘根目录下的datA.txt文件中。请填空。
   Private Sub Command1_Click()
   Dim a As Integer
   Open【   】For Output As #100
   Randomize
   For i =1 To 10
   a=100+Int(899*RnD)   【   】
   Next i
   Close #100
   End Sub

选项

答案d:\datalll.txt , Write #100,a

解析 首先打开顺序文件。第一个空填文件的路径与文件名。使用Write将数据写入文件内,格式为“Write #100,a”,即把变量a的值写入文件号为100的文件内。
转载请注明原文地址:https://jikaoti.com/ti/CSg0FFFM
0

最新回复(0)