单选题运行下面程序后,正确的输出结果是 ______。Private Sub Command1_ Click() x = 6 if x >6 then Print "x>6": Else if x <8 then Print "x<8"; Else if x = 6 then Print "x=6": End if End if End ifEnd Sub
单选题窗体上有一个文本框,用于接收正整数。为保证输入数据是合法性的(即正整数),可以在该数据输入结束后准备继续其他操作时进行数据的合法性检查。为实现上述目的,应选用的事件是______。
单选题设有如下程序:
Option Base 1
Private Sub Form_Click()
Dim a(5) As String, i As Integer
For i=1 To 5
a(i)=Chr(Asc("A")+i)
Call f(a, i)
Next i
End Sub
Sub f(ta()As String, n As Integer)
Dim i As Integer
For i=1 To n
Print ta(i);
Next i
Print
End Sub
时上述程序,以下叙述中正确的是______。
单选题工程中包含Form1、Form2两个窗体,Form1是启动窗体,两个窗体上都有名称为Label1的标签和名称为Command1的命令按钮,窗体外观分别如图1、图2所示。图1Form1窗体外观图2Form2窗体外观Form1中的事件过程如下:PrivateSubCommand1_Click()Form2.ShowEndSubForm2中的事件过程如下:PrivateSubCommand1_Click()Label1.Caption=Form1.Label1.CaptionEndSub关于以上程序,下面叙述中错误的是
单选题设有如下函数:
Function DelSpace(ch As String)As Integer
Dim n%,st$,c$
st=" "
n=0
For k=1 To Len(ch)
c=Mid(ch,k,1)
If c<>" "Then
st=st & c
Else
n=n+1
End If
Next k
ch=st
DelSpace=n
End Function
函数的功能是______。
单选题有如下程序代码: Private Sub Form Click() Dim x As Integer,y As Integer,Bum As Integer x=3 y=x Do Until x>=6 nun=x*y Print“Bum=”:Bum x=x+y y=y+x LoopEnd Sub下列程序代码仅修改了循环语句,循环体未变,其中运行结果不变的是( )。
单选题如果在框架中画了2个复选框,且框架的Enabled属性被设置为False,2个复选框的Enabled属性被设置为True,则下面叙述中正确的是( )。
单选题设有如下通用过程: Public Sub Fun(a() As Integer,x As Integer) For i=1 To 4 x=x*a(i) Next End Sub 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim arr(5)As Integer,n As Integer n=1 For i=1 To 4 arr(i)=i+i Next Fun arr,n Text1.Text=Str(n) End Sub 程序运行后,单击命令按钮,则在文本框中显示的内容是( )。
单选题设窗体上有一个水平滚动条,已经通过属性窗口把它的Max属性设置为1,Min属性设置为100,下列叙述中正确的是
单选题数据的存储结构是指______。
A. 存储在外存中的数据
B. 数据所占的存储空间
C. 数据在计算机中的顺序存储方式
D. 数据的逻辑结构在计算机中的表示
单选题用于去掉—个字符串的右边的空白部分的函数是 ______。
单选题下面的语句用Array函数为数组变量a的各种元素赋值整数值:
单选题决定窗体标题栏上显示内容的属性是
单选题可以产生30~50(含30和50)之间的随机整数的表达式是
单选题单击命令按钮时,下列程序代码的执行结果为 Public Sub Procl(n As Integer,ByVal m As integer) n=n Mod 10 m=m/10 End sub Private Sub Commandl_Click() Dim x AS Integer,y AS Integer x=12:y=24 Call Procl(x,y) Print x;y End sub
单选题下面语句正确的是( )。 A.If x<3*y And x>y Then y=x^3 B.If x<3*y And x>y Then y=3x C.If x<3*y:x>y Then y=x^3 D.If x<3*y And x>y Then y==x* *3
单选题窗体上的三个命令按钮构成名称为Command1的控件数组。如图所示。程序如下:PrivateSubCommand1_Click(IndexAsInteger)IfIndex=1ThenPrint"计算机等级考试"EndIfIfIndex=2ThenPrintCommand1(2).CaptionEndIfEndSub运行程序,单击“命令按钮2”,则如下叙述中正确的是()。
单选题在窗体中添加一个名称为Commandl的命名按钮,然后编写如下程序: Private Sub
Command1 Click() Print Tab(1);“第一”
Print Tab(6);“第二” End Sub
程序运行后,如果单击命令按钮,在窗体上显示的内容是(口表示空格)
A. 第一□□第二
B. 第一第二□□
C. 第一□□ 第二
D. 第一□□ 第二
单选题Function过程与Sub过程的最主要区别是( )。
单选题在窗体上画一个命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
a=InputBox("Enter the First integer")
b=InputBox("Enter the Second integer")
Print b+a
End Sub
程序运行后,单击命令按钮,先后在两个输入对话框中分别输入456和123,则输出结果是
