单选题在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后编写如下事件过程:
Private Sub Command1_Click( )
n = Val(Text1.Text)
For i = 2 To n
For j = 2 To sqr(i)
If i Mod j = 0 Then Exit For
Next j
If j >Sqr(i) Then Print i
Next i
End Sub
该事件过程的功能是( )
单选题能够获得一个文本框中被选取文本的内容的属性是_______。
单选题设有如下事件过程:
Private Sub Form_Click()
x=0
While x<10
x=x+1
x=x*x
Wend
Print x
End Sub
运行程序,单击窗体,输出结果是______。
单选题某人编写了如下程序,用来求10个整数(整数从键盘输入)中的最大值:
Prirate Sub Command1_Click()
Dim a(10)As Integer, max As Integer
For k=1 To 10
a(k)=InputBox("输入一个整数")
Next k
max=0
For k=1 To 10
If a(k)>max Then
max=a(k)
End If
Next k
Print max
End Sub
运行程序时发现,当输入10个正数时,可以得到正确结果,但输入10个负数时结果是错误的,程序需要修改。下面的修改中可以得到正确运行结果的是______。
单选题假定建立了一个名为Commandl的命令按钮数组,则以下说法中错误的是
单选题窗体上有一个命令按钮,命令按钮的单击事件过程如下。运行程序后,单击命令按钮,输出结果是( )。 Private Sub Command1_Click() Dim a a=Array(1,2,3,4,5) For k=1 To 4 S=S+a(k) Next k Print S End Sub
单选题以下说法不正确的是
A. Visual Basic是一种可视化编程工具
B. Visual Basic是面向过程的编程语言
C. Visual Basic是结构化程序设计语言
D. Visual Basic采用事件驱动编程机制
单选题有下列程序段,其输出结果为( )。 a=0:b=0 For i=-1 To -2 Step-1 For i=1 To 2 b=b+1 Next j a=a+1 Next i Print a;b
单选题设窗体上有一个标签Labell和一个计时器Timerl,Timerl的Interval属性被设置为1000,Enabled属性被设置为True。要求程序运行时每秒在标签中显示一次系统当前时间。以下可以实现上述要求的事件过程是( )。
单选题在窗体上画一个名称为Command1的命令按钮,然后编写如下程序: Option Base 1 Private Sub Commandl_Click() d=0:c=10:x=Array(10,12,21,32,24) For i=1 To 5 Ifx(i)>c Then d=d+x(i):c=x(i) Else d=d-c End If Next i Print dEnd Sub 程序运行后,如果单击命令按钮,则在窗体上输出的内容为
单选题1个二维数组可以存放1个矩阵,在程序开始有语句Option Base0,则下面定义的数组中正好可以存放1个4(3矩阵(即只有12个元素))的是
单选题设有如下程序:
Private Sub Form_Click()
Dim ary(1 To 5)As Integer
Dim i As Integer
Dim sum As Integer
For i=1 To 5
ary(i)=i+1
sum=sum+ary(i)
Next i
Print sum
End Sub
程序运行后,单击窗体,则在窗体上显示的是
____
。
单选题以下程序段运行时从键盘上输入字符“-”,则输出结果为( )。
op$=InputBox("op=")
If op$="+" Then a=a+2
If op$="-" Then a=a-2
Print a
单选题将命令按钮的______ 属性设置为True后,就可以按Esc键触发其Click事件。
单选题编写如下事件过程: Private Sub Form_KeyDown (KeyCode As Integer,Shift As Integer) Print Chr(KeyCode) End Sub Private Sub Form_Key Press (KeyAscii As Integer) Print Chr (Key Ascii) End Sub 在一般情况下(即不按住Shift键和锁定大写键时)运行程序,若按“T”键,则程序输出的结果是
单选题设有关键码序列(Q,G,M,Z,A,N,B,P,X,H,Y,S,T,L,K,E),采用堆排序法进行排序,经过初始建堆后关键码值B在序列中的序号是( )。
单选题下列语句的运行结果是__________。 x=Format(2)
Print x
A.0
B.2
C.4
D.错误用法
单选题在窗体上画一个名称为Combo1的组合框,名称为Text1的文本框,以及名称为Commandl的命令按钮,如图所示。运行程序,单击命令按钮,将文本框中被选中的文本添加到组合框中,若文本框中没有选中的文本,则将文本框中的文本全部添加到组合框中。命令按钮的事件过程如下:PrivateSubCommandl_Click() IfText1.Se1Length<>0Then Else Combo1.AddItemText1 EndIfEndSub程序中横线处应该填写的是______。A.Combo1.AddItemText1.TextB.Combo1.AddItemText1.SelStartC.Combo1.AddItemText1.SelTextD.Combo1.AddItemText1.SelLength
单选题在窗体上按顺序,分别画出变量按钮command1、文本框Text1和文本框Text2。为了把Text2的Tab顺序设置为第一,应将Text2的TabIndex属性没置为______。
单选题已知X>Y,A>B,能正确表示它们之间关系的式子是_______。
A.Sgn(Y-X)-Sgn(A-B)<0
B.Sgn(Y-X)-Sgn(A-B)=-2
C.Sgn(Y-X)-Sgn(A-B)=0
D.Sgn(Y-X)-Sgn(A-B)=-1
