单选题设一个工程由两个窗体组成,其名称分别为Form1和Form2,在Form1上有一个名称为 Command1的命令按钮。窗体Form1的程序代码如下: Private Sub Command1_Click() Dim a As Integer a=10 Call g(Form2,a) End Sub Private Sub g(f As Form, x As Integer) y=IIf(x>10, 100,-100) f.Show f.Caption =y End Sub 运行以上的程序,正确的结果是
单选题算法的时间复杂度是指( )。
单选题以下程序的输出结果是 Private Sub Command1_Click() ch$="ABCDEF" proc ch Print ch End Sub Private Sub proc(ch As String) s="" For k=Len(ch)To 1 Step-1 s=s & Mid(ch,k,1) Next k ch=s End Sub
单选题在窗体上添加一个名称为Text1的文本框和一个名称为Command1的命令按钮,编写如下事件过程: Private Sub Command1_Click() Text1.Text=“计算机” Me.Text1=“等级” Text1=“考试” End Sub 程序运行后.如果单击命令按钮,则在文本框中显示的是
单选题以下不属于单选按钮的属性是( )。
单选题在窗体画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后编写如下事件过程: Private Sub Command1_Click() n=Val(Text1. Text) For i=2 To n For j=2 To Sqr(i) If i Hod j=0 Then Exit For Next j If j>Sqr(i)Then Print i Next i End Sub 该事件过程的功能是______。
单选题以下叙述中错误的是( )。
单选题有如下程序:
Private Sub Command1_Click()
Dim k As Integer,m As Integer
Dim p As Integer
k=4:m=1
p=PC(k,m):Print p;
p=PC(k,m):Print p
End Sub
Private Function PC(a As Integer,b As Integer)
Static m As Integer,i As Integer
m=0:i=2
i=i + m + 1
m=i + a + b
PC=m
End Function
程序运行后,输出的结果为
单选题关于Exit For的使用说明正确的是( )。 A) Exit For语句可以退出任何类型的循环 B) 一个循环中只能有一个这样的语句 C) Exit For表示返回For语句去执行 D) 一个For循环中可以有多条Exit For语句
单选题单击命令按钮时,下列程序的运行结果为Private Sub Command1_Click( ) Print MyBM(23,18)End SubPublic Function MyBM(m As Integer,n As Integer)As Integer Do While mn Do While m > n:m=m - n:Loop Do While m < n:n=n - m:Loop Loop MyBM=mEnd Function
单选题如果要在窗体上画一个标签,应在工具箱窗口中选择的图标是
单选题数学表达式sin25°写成Visual Basic表达式是( )。
单选题窗体上有一个名称为Command1的命令按钮。要求编写程序,把文件f1.txt的内容写到文件f2.txt中,然后将f1.txt删除。命令按钮的单击事件过程如下:Private Sub.Commandl_Click() Open"c:\f1.txt"For Input As#1 Open"c:\f2.txt"For Output As#2 Do While Not EOF(2) Line Input#1,str1 Print#2,str1 Loop Close Kill*c:\f1.txt"End Sub该程序运行时发生错误,应该进行的修改是
单选题为计算1+2+22+23+24+…+210的值,并把结果显示在文本框Text1中,若编写如下事件过程:
Private Sub Command1 Click()
Dim a%,s%,k%
s=1
a=2
For k=2 To 10
a=a*2
s2 s+a
Next k
Text1.Text=s
End Sub
执行此事件过程后发现结果是错误的,为能够得到正确结果,应做的修改是( )。
单选题假定有如下的窗体事件过程: Private Sub Form_Click() a$="MicrosoftVisual Basic" b$=Right(a$,5) c$=Mid(a$,1,9) MsgBox a$,34,b$,c$,5 End Sub 程序运行后,单击窗体,则在弹出的信息框的标题栏中显示的信息是 A) Microsoft Visual B) Microsoft C) Basic D) 5
单选题窗体上有一个由两个文本框组成的控件数组,名称为Text1,并有如下事件过程:Private Sub Text1_Change(Index As Integer) Select Case Index Case 0 Text1(1).FontSize=Text1(0).FontSize*2 Text1(1).Text=Text1(0).Text Case 1 Text1(0).FontSize=Textl(1).FontSize/2 Text1(0).Text=Text1(1).Text Case Else MsgBox"执行Else分支" End Select End Sub关于上述程序,以下叙述中错误的是
单选题在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
i=0
Do
n=i*i
i=i+1
Loop While n<i
End Sub
运行上面的程序,循环体的执行次数是
单选题下列语句中,不能实现循环100次的是
单选题18所列的菜单结构。
{{B}} 表2.18 {{/B}}
单选题如果要在语句:a=Array(1,2,3,4,5)的前面声明变量a,则正确的声明是