单项选择题

下列程序的功能是:将数据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 i

Close#1

End Sub

A.print#1,i
B.input #1,I
C.print#1
D.input#1
<上一题 目录 下一题>
热门 试题

单项选择题
窗体上有两个文本框Text1、Text2以及一个命令按钮Command1,编写下列程序: Dim y As Integer Private Sub Command1_Click() Dim x As Integer x=2 Text1.Text=p2(p1(x),y) Text2.Text=p1(x) End Sub Private Function p1(x As Integer)As Integer x=x+y:y=x+y p1=x+y End Function Private Function p2(x As Integer,y As Integer)As Integer p2=2*x+y End Function 当单击1次和单击2次命令按钮后,文本框Textl和Text2内的值分别为( )。
A.2 4
2 4
B.2 4
4 8
C.4 4
8 8
D.10 10
58 58
单项选择题
下列程序的输出图形是( )。 For k=0 To 360 cr=Int(160*Rnd) ang=-3.1415926 180*k Circle(2000,2000),500,cr,0,ang Next
A.一段彩色圆弧
B.一个彩色扇形
C.一个彩色空心圆
D.一个辐射状彩色圆形
相关试题
  • 在窗体上画4个文本框,并用这4个文本框建...
  • 在窗体上有文本框Text1和命令按钮Command...
  • 下列程序的运行结果是( )。 Private F...
  • 在窗体上放置一个命令按钮Command1,并编...
  • 在窗体上有一个文本框Text1,Text属性值为...