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

时间：2021-07-20 16:42:15 解答: 84 次

[填空题] 下列程序段的功能是，单击命令按钮后，将随机产生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的文件内。

本文链接：https://www.waksw.com/lu3llgxsg7.html

上一篇：[单项选择题] 编写如下事件过程： Private Sub Form Click()Dim Char As String，i As IntegerConst ch$="#"msg

下一篇：[填空题] 在窗体上画两个组合框，其名称分别为Combo1、Combo2，然后画两个标签，名称分别为Label1、Label2，如图所示，程序运行后，如果在某个组合框中选择一个项目，则把所选中的项目在