填空题
下列程序的功能是:将数据1,2,…,8写入顺序文件Num.txt中,请补充完整。
Private Sub Form_Click()
Dim i As Integer
Open "Num.txt" For Output As #1
For i=1 To 8
______
Next
Close#1
End Sub
【参考答案】
Print#1,i
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
填空题
语句Form2.Show 0表示 [11] ; 语句Form3.Show 1表示 [12] ;
点击查看答案&解析
填空题
下列程序运行后的输出结果是______。 Private Sub f(k,s) s=1 For j=1 To k s=s*j Next End Sub Private Sub Command1_Click() Sum=0 For i=1 To 3 Call f(i,s) Sum=Sum+s Next Print Sum End Sub
点击查看答案&解析
相关试题
函数Int(Rnd*10)+10的值的范围是_...