下列程序实现的功能是:当在窗体上单击时,将随机产生100个3位数,并把它们写到D盘根目录下的文件myfile1.Dat中。
Private Sub Form_Click()
Dim k As Integer
Open 【13】
Randomize
For i=1 To 10
k=100+Int(899*Rnd)
【14】
Next i
【15】
End Sub
【参考答案】
[AC]"d:\myfilel.dat" For Random As #A0 [AD]Put#A0,i,k[AE]Clo......