下列程序实现的功能是：当在窗体上单击时，将随机产生100个3位数，并把它们写到D盘根目录下的文件myfile1．..._计算机等级考试_VISUAL_BASIC_二级VISUAL_BASIC笔试15

[填空题] - 考题描述：

下列程序实现的功能是：当在窗体上单击时，将随机产生100个3位数，并把它们写到D盘根目录下的文件myfile1．Dat中。 Private Sub Form_Click() Dim k As Integer Open 【13】 Randomize For i=1 To 10k=100+Int(899*Rnd) 【14】 Next i 【15】 End Sub

分类：计算机等级考试 VISUAL BASIC 二级VISUAL BASIC笔试15 2018-09-14

编写如下两个事件过程。 Private Sub Form_KeyDown(KeyCode As Integer，Shift As Integer)Print Chr(KeyCode) End Sub Private Sub Form_KeyPress(KeyAscii As Integer)Print Chr(KeyAscii) End Sub 在一般情况下(即不按住Shift键和锁定大写键时)运行程序，如果按“A”键，则程序输出的结果是语句PopupMenu PMENU，4 Or 2，，，PMENU3K中：其中PMeNU表示【14】 23 有如下程序段，该程序段循环的次数是______。Dim i As IntegerDim j As IntegerDim k As Integerk=0For i = 0 To 10 Step 3 For j = 1 To 5 If j ＞ 3 Then k = k + 4: Exit For k=k+1 Print k Next j If i ＞ 8 Then Exit For Next i以下程序用宋输出20个在开区间(10，87)中的随机整数R，每行输出4个整数。请完善下列程序。 Private Sub Command1_Click()For I = 1 To 10 R = 【9】 Print R； If I Mod 4=0 Then PrintNext I End Sub在Visual Basic中，用于管理文件系统的3个控件是文件列表框、目录列表框和【10】。

参考答案：

[AC]\"d:myfilel．dat\" For Random As #A0 [AD]Put#A0,i,k[AE]Close #A0

问题解析：

要使用文件，首先必须打开文件，本题没有说明该文件是随机文件还是顺序文件，因此用随机文件和顺序文件均可以，本题以随机文件处理为例。故[13]应填打开文件的语句，为“"d:myfilel．dat" For Random As #10”。打开文件后，本题通过一个For循环向文件中写入数，该循环执行了10次，每一次产生一个三位数，并把该数写到文件中去。向随机文件写入数据要用Put语句，故[14]处应填“Put #10，i，k”。文件读写完毕后，应关闭文件，所以[15]处应填“Close #10”。

BASIC:下列程序实现的功能是：当在窗体上单击时，将随机产生100个3位数，并把它们写到D盘根目录下的文件myfile1．...

相关题目