单项选择题
下列程序的功能是:将数据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属性值为...