关于多行结构条件语句的执行过程，正确的是( )。

单项选择题

在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程： Private Sub Command1_Click() a=12345 Print Format$(a,"000,00") End Sub 程序运行后，单击命令按钮，窗体上显示的是( )。

A．123.45
B．12345.00
C．12345
D．00123.45

单项选择题

下面程序运行后输出结果是( )。 For I=1 to 2 　　S=1 　For j=0 to I-1 　　S=S+S*I 　Next j 　　Print S 　Next I

A．1 1
B．0 2
C．2 9
D．6 9

单项选择题

在窗体上添加一个文本框，名为text1，然后编写如下的load事件过程，则程序的运行结果是( )。 Private Sub Form_Load 　　Text1.Text=" " 　　Text1.SetFocus 　　For k=1 to 5 　　　t=t*k 　　Next k 　　Text1.Text=t End Sub

A．在文本框中显示120
B．文本框中仍为空
C．在文本框中显示1
D．出错

单项选择题

下面程序段执行结果为( )。 x=Int(Rnd()+4) Select Case x 　　Case 5 　　　 Print"excellent" 　　Case4 　　　Print"good" 　　Case 3 　　　Print"pass" 　　Case Else 　　　Print"fail" End Select

A．excellent
B．good
C．pass
D．fail

单项选择题

设有如下程序段： x=2 For i=1 To 10 Step 2 x=x+i Next 运行以下程序后，x的值是( )。

A．26
B．27
C．38
D．57

单项选择题

下列各种形式的循环中，输出“*”的个数最少的循环是( )。

A．a=5:b=8 Do 　Print"*" 　a=a+1 Loop While a＜b
B．a=5:b=8 Do Print"*" a=a+1 Loop Until a＜b
C．a=5:b=8 Do Until a-b 　　print"*" 　　b=b+1 Loop
D．a=5:b=8 DoUntil a＞b Print"*" a=a+1 Loop

单项选择题

程序的基本控制结构是( )。

A．Do-Loop结构、Do-Loop While结构和For-Next结构
B．子程序结构，自定义函数结构
C．顺序结构，选择结构和循环结构
D．单行结构，多行结构和多分支结构

单项选择题

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Move 500,500 End Sub 程序运行后，单击命令按钮，执行的操作为( )。

A．命令按钮移动到距窗体左边界、上边界各500的位置
B．窗体移动到距屏幕左边界、上边界各500的位置
C．命令按钮向左、上方向各移动500
D．窗体向左、上方向各移动500

单项选择题

在窗体上画一个名称为TxtA的文本框，然后编写如下的事件过程： Private Sub TxtA_KeyPress(key Ascii As Integer) End Sub 若焦点位于文本框中，则能够触发KeyPress事件的操作是( )。

A．单击鼠标
B．双击文本框
C．鼠标滑过文本框
D．按下键盘上的某个键

单项选择题

使用ReDim Preserve可以改变数组( )。

A．最后一维的大小
B．第一维的大小
C．所有维的大小
D．改变维数和所有维的大小

单项选择题

函数String(n,"str")的功能是( )。

A．把数值型数据转换为字符串
B．返回由n个字符组成的字符串
C．从字符串中取出n个字符
D．从字符串中第n个字符的位置开始取子字符串

单项选择题

已知数组a(1 To 10)As Integer,下面调用GetValue函数正确的是( )。 Private Function GetValue(a()As Integer)As Integer For i=1 To 10 Get Value=GetValue+a(i) Next i End Function

A．S=GetValue(a(1 To 10))
B．S=GetValue(a)
C．S=GetValue(a(10))
D．S=GetValue a

单项选择题

Sub过程与Function过程最根本的区别是( )。

A．Sub过程名称与Function过程名称的格式不统一
B．Function过程可以有参数，Sub过程不可以
C．两种过程参数的传递方式不同
D．Sub过程的过程名称不能有返回值，而Function过程能通过过程名称得到返回值

单项选择题

以下关于菜单的叙述中，错误的是( )。

A．在程序运行过程中可以增加或减少菜单项
B．如果把一个菜单项的Enabled属性设置为False，则可删除该菜单项
C．弹出式菜单在菜单编辑器中设计
D．利用控件数组可以实现菜单项的增加或减少

单项选择题

在窗体上用复制、粘贴的方法建立了一个命令按钮数组，数组名为M1。设窗体Form1标题为“myform1”，双击控件数组中的第3个按钮，打开代码编辑器，写下如下代码： Privae Sub M1_Click(Index As Integer) Form1.Caption="myform2" End Sub 运行时，单击按钮数组中的第1个按钮，窗本标题为( )。

A．Form1
B．M1
C．myform1
D．myform2

单项选择题

关于多行结构条件语句的执行过程，正确的是( )。

A．各个条件所对应的〈语句块〉中，一定有一个〈语句块〉被执行
B．找到〈条件〉为True的第一个入口，便从此开始执行其后的所有〈语句块〉
C．若有多个〈条件〉为True，则它们对应的〈语句块〉都被执行
D．多行选择结构中的〈语句块〉，有可能任何一个〈语句块〉都不被执行

单项选择题

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Static x As Integer Cls For i=1 To 2 y=y+x x=x+2 Next Print x,y End Sub 程序运行后，连续三次单击Command1按钮后，窗体上显示的是( )。

A．4 2
B．12 18
C．12 30
D．4 6

单项选择题

下列选项中不符合良好程序设计风格的是( )。

A．源程序要文档化
B．数据说明的次序要规范化
C．避免滥用goto语句
D．模块设计要保证高耦合、高内聚

单项选择题

执行x$=InputBox("请输入x的值")时，在弹出的对话框中输入123，在列表框List1选中1个列表项(数据为456)，使y的值是123456的语句是( )。

A．y=x$+List1.List(O)
B．y=x$+List1.List(1)
C．y=Val(x$)+Val(List1.List(0))
D．y=Val(x$)&Val(List1.List(1))

单项选择题

下列程序段的执行结果为( )。 Dim m(10),n(10) I=3 For I=1 to 5 M(t)=t N(I)=2*I+t Next t Print n(I);m(I)

A．3 11
B．3 15
C．11 3
D．15 3

单项选择题

在窗体上画1个命令按钮，名称为Command1，然后编写如下程序： Dim Flag As Boolean Private Sub Command1_Click() 　　Dim intNum As Integer 　　intNum=InputBox("请输入：") 　　If Flag Then 　　　Printf(intNum) 　　End If End Sub Function f(x As Integer)As Integer 　　If X＜10 Then 　　　　Y=X 　　Else 　　　　Y=X+10 　　End If 　　f=Y End Function Private Sub Form_MouseUp(Button As Integer,Shift As Integer,X As Single,Y As Single) 　　Flag=True End Sub 运行程序，首先单击窗体，然后单击命令按钮，在输入对话框中输入5，则程序的输出结果为( )。

A．0
B．5
C．15
D．无任何输出

单项选择题

在一个窗体上添加一命令按钮控件，名为Command1，事件过程如下，则该过程的执行结果是( )。 option base 1 Private Sub Command1_Ctick() 　　Dim a (5) As Integer 　　Dim k As Integer 　　Dim total As Integer 　　a(1)=2 　　a(2)=5 　　a(3)=4 　　a(4)=10 　　a(5)=6 　　For k=1 To 5 　　　　total=total+a(k) 　　Next k 　　Print total End Sub

A．10
B．15
C．27
D．35

单项选择题

在窗体上画两个文本框，其名称分别为Text1和Text2，然后编写如下程序： Private Sub Form_Load0 Show Text1.Text="" Text2.Text="" Text1.SetFocus End Sub Private Sub Text1 Change() Text2.Text=Mid(Text1.Text,8) End Sub 程序运行后，如果在文本框Text1中输入BeijingChina，则在文本框Text2中显示的内容是( )。

A．BeijingChina
B．China
C．Beijing
D．BeijingC

单项选择题

窗体上有名称分别为Text1、Text2的2个文本框，有一个由3个单选按钮构成的控件数组Option1，如图1所示。程序运行后，如果单击某个单选按钮，则执行Text1中的数值与该单选按钮所对应的运算(乘以1、10或100)，并将结果显示在Text2中，如图2所示。为了实现上述功能，在程序中的下划线处应填入的内容是( )。

Private Sub Option1_Click(Index As Integer) 　　If Text1.Text＜＞""Then 　　　Select Case______ 　　　　Case 0 　　　　　Text2.Text=Val(Text1.Text) 　　　　Case 1 　　　　　Text2.Text=Val(Text1.Text)10 　　　　Case 2 　　　　　Text2.Text=Val(Text1.Text)100 　　End Select 　End If End Sub

A．Index
B．Option1.Index
C．Option1(Index)
D．Option1(Index).Value

单项选择题

在窗体上绘制一个命令按钮和一个文本框，名称分别为Command1和Text1，然后编写如下程序： Private Sub Command1_Click() a=InputBox("请输入日期(1～31)") t="旅游景点："_ 　　&IIf(a＞0 And a＜=10，"长城:,"")_ 　　&IIf(a＞10 And a＜=20，"故宫","")_ 　　&IIf(a＞20And a＜=31，"颐和园:,"") Text1.Text=t End Sub 程序运行后，如果从键盘上输入16，则在文本框中显示的内容是( )。

A．旅游景点：长城故宫
B．旅游景点：长城颐和园
C．旅游景点：颐和园
D．旅游景点：故宫

单项选择题

在窗体上画一个名称为Command1的命令按钮和两个名称分别为Text1、Text2的文本框，然后编写如下事件过程： Private Sub Command1_Click() 　　n=Text1.Text Select Case n 　　　Case 1 To 20 　　　　x=10 　　　Case2,4,6 　　　　x=20 　　　Case Is＜10 　　　　x=30 　　　Case 10 　　　　x=40 　　End Select 　　Text2.Text=x End Sub 程序运行后，如果在文本框Text1中输入10，然后单击命令按钮，则在Text2中显示的内容是( )。

A．10
B．20
C．30
D．40

关于多行结构条件语句的执行过程，正确的是( )。

你可能感兴趣的试题

在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程： Private Sub Command1_Click() a=12345 Print Format$(a,"000,00") End Sub 程序运行后，单击命令按钮，窗体上显示的是( )。

下面程序运行后输出结果是( )。 For I=1 to 2 S=1 For j=0 to I-1 S=S+S*I Next j Print S Next I

在窗体上添加一个文本框，名为text1，然后编写如下的load事件过程，则程序的运行结果是( )。 Private Sub Form_Load Text1.Text=" " Text1.SetFocus For k=1 to 5 t=t*k Next k Text1.Text=t End Sub

文本框控件中将Text的内容全部显示为所定义的字符的属性项是( )。

下列程序段的执行结果为( )。 a=6 For k=1 To 0 a=a+k Next k Print k;a

下列表达式中，( )的运算结果与其他3个不同。

以下( )程序段可以实施X、Y变量值的互换。

窗体的隐藏和删除，分别用在不同的场合，隐藏Form1和删除Form1的命令是( )。

不能脱离控件(包括窗体)而独立存在的过程是( )。

计算z的值，当x大于等于y时，z=x；否则z=y。下列语句错误的是( )。

andomize语句的功能是( )。

设有如下语句： str1=IntputBox("输入"，" "，"练习") 从键盘上输入字符串“示例”后，str1的值是( )。

下面程序段执行结果为( )。 x=Int(Rnd()+4) Select Case x Case 5 Print"excellent" Case4 Print"good" Case 3 Print"pass" Case Else Print"fail" End Select

设有如下程序段： x=2 For i=1 To 10 Step 2 x=x+i Next 运行以下程序后，x的值是( )。

下列各种形式的循环中，输出“*”的个数最少的循环是( )。

程序的基本控制结构是( )。

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Move 500,500 End Sub 程序运行后，单击命令按钮，执行的操作为( )。

在窗体上画一个名称为TxtA的文本框，然后编写如下的事件过程： Private Sub TxtA_KeyPress(key Ascii As Integer) End Sub 若焦点位于文本框中，则能够触发KeyPress事件的操作是( )。

使用ReDim Preserve可以改变数组( )。

函数String(n,"str")的功能是( )。

已知数组a(1 To 10)As Integer,下面调用GetValue函数正确的是( )。 Private Function GetValue(a()As Integer)As Integer For i=1 To 10 Get Value=GetValue+a(i) Next i End Function

Sub过程与Function过程最根本的区别是( )。

以下关于菜单的叙述中，错误的是( )。

关于多行结构条件语句的执行过程，正确的是( )。

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Static x As Integer Cls For i=1 To 2 y=y+x x=x+2 Next Print x,y End Sub 程序运行后，连续三次单击Command1按钮后，窗体上显示的是( )。

下列选项中不符合良好程序设计风格的是( )。

执行x$=InputBox("请输入x的值")时，在弹出的对话框中输入123，在列表框List1选中1个列表项(数据为456)，使y的值是123456的语句是( )。

下列程序段的执行结果为( )。 Dim m(10),n(10) I=3 For I=1 to 5 M(t)=t N(I)=2*I+t Next t Print n(I);m(I)

下面程序运行后输出结果是( )。 For I=1 to 2 　　S=1 　For j=0 to I-1 　　S=S+S*I 　Next j 　　Print S 　Next I

在窗体上添加一个文本框，名为text1，然后编写如下的load事件过程，则程序的运行结果是( )。 Private Sub Form_Load 　　Text1.Text=" " 　　Text1.SetFocus 　　For k=1 to 5 　　　t=t*k 　　Next k 　　Text1.Text=t End Sub

下列程序段的执行结果为( )。 a=6 For k=1 To 0 　　a=a+k Next k Print k;a

下面程序段执行结果为( )。 x=Int(Rnd()+4) Select Case x 　　Case 5 　　　 Print"excellent" 　　Case4 　　　Print"good" 　　Case 3 　　　Print"pass" 　　Case Else 　　　Print"fail" End Select