单项选择题
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_click() Dim i As Integer, n As Integer For i=0 To 50 i=i+3 n=n+1 If i>10 Then Exit For Next Text1.Text=Str(n) End Sub 程序运行后,单击命令按钮,在文本框中显示的值是 ______ 。
A.2
B.3
C.4
D.5
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
单项选择题
在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后编写如下程序: Private Sub Command1_Click() Dim x,y,z As Integer x=5 y=7 z=0 Text1.Text= Call P1(x,y,z) Text1.Text=Str(z) End Sub Sub P1(ByVal a As Integer,ByVal b As Integer,c As Integer) c=a+b End Sub 程序运行后,如果单击命令按钮,则在文本框中显示的内容是 ______ 。
A.0
B.12
C.Str(
D.没有显示
点击查看答案&解析
单项选择题
在窗体上画一个命令按钮,然后编写如下代码: Private Type Record ID As Integer Name As String*20 End Type Private Sub Commandl_click() Dim MaxSize,NextChar,MyChar Open D: temp female.txt For Input As #1 MaxSize=LOF(1) For NextChar=1 To Max Size Seek #1,Next Char MyChar=Input(1,#1) Next NextChar Print EOF(1) Close #1 End Sub 程序运行后,单击命令按钮,其输出结果为 ______。
A.True
B.False
C.0
D.Null
点击查看答案&解析
相关试题
在窗体上画一个命令按钮(其Name属性为Comm...