填空题

下列程序的功能是：将数据1，2，…，10写入顺序文件Base．txt中，请填空。 　　Private Sub Form_Click() 　　　Dim i As Integer 　　　Open【 】　As #1 　　　For i=1 To 10 　　　　　【 】　 　　　Next i 　　　Close #1 　　End Sub

【参考答案】

“Base．txt”For Output
<上一题 目录 下一题>
热门 试题

填空题
给定年份，下列程序用来判断该年是否是闰年，请填空。Sub YN( )Dim X AS Integerx＝Input Box( 请输入年号 )If( x Mod 4=0 【 】 x Mod l000) 【 】 (x Mod 400=0)ThenPrint 是闰年 ElsePrint 不是闰年，是普通年份 End IfEnd Sub
填空题
把窗体的KeyPreView属性设置为True，并编写如下两个事件过程：Private Sub Form_KeyDown(KeyCode As Integer，Shift As Integer)Print KeyCodeEnd SubPrivate Sub Form_KeyPress(KeyAscii As Integer)Print KeyAsciiEnd Sub程序运行后，如果按下B键，则在窗体上输出的数值是【 】和【 】。
相关试题