下列程序运行后，输出的结果为______ 。B=1Do while b＜40...

单项选择题

在窗体上添加一个命令按纽，名为command1，其事件过程如下，程序运行后，其输出的结果为______ 。 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．10
B．14
C．15
D．120

单项选择题

使用CoamonDialog 控件的______ 方法可显示”打印”对话框。

A．ShowOpen
B．ShowSave
C．ShowColor
D．Showprinter

单项选择题

控件______ 属性的设置，可使该控件不能通过Tab键得到焦点。

A．TabStop
B．Tablndex
C．GotFocus
D．SetFocus

单项选择题

在窗体上添加一个文本框，名为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．出错

单项选择题

下列陈述中正确的是______ 。

A．二叉树是度为2的有序树
B．二叉树中结点只有一个孩子时无左右之分
C．二叉树中必有度为2的结点
D．二叉树中最多只有两棵子树，并且有左右之分

单项选择题

每个ActiveX控件都是扩展名为______的独立文件。

A．.OCX
B．.c
C．.act
D．.bmp

单项选择题

下列命令按纽事件过程执行后，输出的结果是______ 。 private sub command_ click() for m+1 to 10 step 2 a=10 for n=1 to 10 step 2 a+a+2 next n next m print a end sub

A．60
B．50
C．30
D．20

单项选择题

只能用来显示字符信息的控件是______ 。

A．文本框
B．标签框
C．图片框
D．图像框

单项选择题

为了提高测试的效率，应该______ 。

A．随机地选取测试数据
B．取一切可能的输入数据作为测试数据
C．在完成编码以后制定软件的测试计划
D．选择发现错误可能性大的数据作为测试数据

单项选择题

下列表达式中，______的值为false。

A．“BCD”＜“BCE”
B．“12345”＜＞“12345”旷“ABC”
C．Not 2*5=10
D．4=4 and 5＞2+2

单项选择题

结构化程序设计的一种基本方法是______ 。

A．归纳法
B．逐步求精法
C．递归法
D．穷尽法

单项选择题

对二叉树从1开始进行连续编号，要求每个结点的编号大于其左右孩子的编号，同一个结点的左右孩子中，其左孩子的编号小于其右孩子的编号，则可采用______ 遍历实现编号。

A．无序
B．中序
C．后序
D．从根开始的层次遍历

单项选择题

下列程序执行后，变量S的值为______ 。 Dim s As Long，X As Integer s=0 X=1 Do While x＜10 s= s+ x x=x+2 Loop Print s

A．10
B．25
C．50
D．100

单项选择题

在有n个结点的--31链表中，值为非空的链域的个数为______ 。

A．n-1
B．2n-1
C．n+1
D．2n+1

单项选择题

下列程序段的执行结果为______ 。 Dim A(4) N= 3 A(1) =1 For K=0 To N-1 For L=1 To K+1 X=K+2 -L A(X)=A(X)+A(X-1) If K＜N-1 Then Exit For Print A(X)； Next L Next K

A．1 2 1
B．1 2 3
C．2 4 6
D．1 3 1

单项选择题

当执行以下过程时，在名为1blResult的标签框内将显示______。 Private Sub cmdlt_ click() Dim I，R R=0 For I=1 To 5 Step 1 R=R+I Next i 1blResult．Caption=Str＄(R) End Sub

A．字符串15
B．整数15
C．字符串5
D．整数5

单项选择题

程序的三种基本控制结构是______ 。

A．过程、子程序和分程序
B．顺序、选择和重复
C．递归、堆栈和队列
D．调用，返回和转移

单项选择题

下面叙述中不正确的是______。

A．若使用Write #语句将数据输出到文件，则各数据项之间自动插入逗号，并且将字符串加上双引号。
B．若使用Print #语句将数据输出到文件，则各数据项之间没有逗号分隔，且字符串不加双引号。
C．Write #语句和Print #语句建立的顺序文件格式完成一样。
D．Write #语句和Print #语句均实现向文件中写入数据。

单项选择题

用如下语句所定义的数组的元素个数是______个。 Dim b(-2 to 4)as string

A．2
B．4
C．S
D．7

单项选择题

确定复选框是否选中，可访问的属性是______ 。

A．Value
B．Checked在
C．Selected
D．Caption

单项选择题

在窗体上添加一个命令按钮，名为command1，一文本框，名为text1，则执行如下事件过程后，文本框中的输出为______。 For i=1 To 4 x=3 For j=1 To 3 For k=1 To 2 x= x + 3 Next k Next j Next i Text1.Text=str(x)

A．6
B．12
C．18
D．21

单项选择题

以下语句错误的是：______ 。

A．Do while(Conditio Statements Loop
B．Do Statements Loop while(conditio
C．Do until(conditio Statements Loop
D．Do until(conditio Statements end do

单项选择题

Label控件中内容能垂直方向变化而宽度保持不变则应设置______ 属性。

A．Wordwrap
B．Enabled
C．Locked
D．AutoSize

单项选择题

命令按钮Command1的Caption属性为“退出(x)”，要将命令按钮的快捷键设为Alt+x，应修改Caption属性为______ 。 A) 在x前插入＆ 6)在x后插入＆ C) 在x前插入# D) 在x后插入#

单项选择题

在窗体上画一个名称为Command1的命令按钮，然后编写如下程序： Private Sub Command1-Click() Static X Am Integer Static Y As Integer Cls Y=1 Y=Y+5 X=5+X Print X，Y End Sub程序运行时，三次单击命令按钮Comand1后，窗体上显示的结果为______。

A．15 16
B．15 6
C．15 15
D．5 6

单项选择题

深度为k的二叉树至多有______ 。

A．2k个结点
B．2^k-1个结点
C．2K^-1结点
D．2^k-1-1个结点

单项选择题

设执行以下程序段时依次输入1、3、5，执行结果为______ 。 Dim a(4)As Integer Dim b(4) As Integer For K=0 To 2 a(K+1)=Val(1nputBox(“请输入数据：”)) b(3-K)=a(K+1) Next K Print b(K)

A．1
B．3
C．5
D．0

单项选择题

下面程序执行的结果是______。 Private Sub Form_ Click() A＄=“123”：B＄=“456” C=Val(A＄)+Val(B＄) Print C\100 End Sub

A．123
B．3
C．5
D．579

单项选择题

单击命令按钮时，下列程序代码的执行结果为______。 Private Function PickMid(xStr As String) As String Dim tempStr As String Dim strLen As Integer tempStr=“” strLen=Len(xStr) i=1 Do While i＜=strLen/2 tempStr=tempStr+Mid(xStr，i，1)+Hid(xStr，strLen-i+1，1) i=i + 1 Loop PickMid=tempStr End Function Private Sub Command1_Click() Dim FirstStr As String FirstStr=“abcdef” Print PickMid(FirstStr) End Sub

A．abcdef
B．afbecd
C．fedcba
D．defabc

单项选择题

先在窗体上添加一个命令按纽，然后编写如下程序： Function fun(ByVal nm As Long)As Long Dim k As Long k=1 num=Abs(num) Do While num k=k*(num Mod 10) num=num\10 Loop fun=k End Function Private Sub Command1_Click() Dim n As Long Dim r As Long n=InputBox(“请输入一个数”) n=CLng(n) r=fun(n) Print r End Sub 则在程序运行后，单击命令按纽，在对话框中输入“100”，输出结果是______。

A．0
B．100
C．200
D．300

单项选择题

下列程序运行后，输出的结果为______ 。B=1Do while b＜40 b=*(b+1)LoopPrint B

你可能感兴趣的试题

两个关系有若干相同属性名等值连接，并去掉重复属性的关系代数运算称为______ 。

若要使用户不能修改文本框TextBox1中内容，应修改______ 属性。

数据的逻辑独立性是指______ 。

下列程序运行后，输出的结果为______ 。B=1Do while b＜40 b=*(b+1)LoopPrint B

在窗体上添加一个命令按纽，名为command1，其事件过程如下，程序运行后，其输出的结果为______ 。 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

使用CoamonDialog 控件的______ 方法可显示”打印”对话框。

控件______ 属性的设置，可使该控件不能通过Tab键得到焦点。

在窗体上添加一个文本框，名为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

下列陈述中正确的是______ 。

每个ActiveX控件都是扩展名为______的独立文件。

下列命令按纽事件过程执行后，输出的结果是______ 。 private sub command_ click() for m+1 to 10 step 2 a=10 for n=1 to 10 step 2 a+a+2 next n next m print a end sub

只能用来显示字符信息的控件是______ 。

为了提高测试的效率，应该______ 。

下列表达式中，______的值为false。

结构化程序设计的一种基本方法是______ 。

对二叉树从1开始进行连续编号，要求每个结点的编号大于其左右孩子的编号，同一个结点的左右孩子中，其左孩子的编号小于其右孩子的编号，则可采用______ 遍历实现编号。

下列程序执行后，变量S的值为______ 。 Dim s As Long，X As Integer s=0 X=1 Do While x＜10 s= s+ x x=x+2 Loop Print s

在有n个结点的--31链表中，值为非空的链域的个数为______ 。

下列程序段的执行结果为______ 。 Dim A(4) N= 3 A(1) =1 For K=0 To N-1 For L=1 To K+1 X=K+2 -L A(X)=A(X)+A(X-1) If K＜N-1 Then Exit For Print A(X)； Next L Next K

当执行以下过程时，在名为1blResult的标签框内将显示______。 Private Sub cmdlt_ click() Dim I，R R=0 For I=1 To 5 Step 1 R=R+I Next i 1blResult．Caption=Str＄(R) End Sub

程序的三种基本控制结构是______ 。

下面叙述中不正确的是______。

用如下语句所定义的数组的元素个数是______个。 Dim b(-2 to 4)as string

确定复选框是否选中，可访问的属性是______ 。

在窗体上添加一个命令按钮，名为command1，一文本框，名为text1，则执行如下事件过程后，文本框中的输出为______。 For i=1 To 4 x=3 For j=1 To 3 For k=1 To 2 x= x + 3 Next k Next j Next i Text1.Text=str(x)

以下语句错误的是：______ 。

Label控件中内容能垂直方向变化而宽度保持不变则应设置______ 属性。

在窗体上画一个名称为Command1的命令按钮，然后编写如下程序： Private Sub Command1-Click() Static X Am Integer Static Y As Integer Cls Y=1 Y=Y+5 X=5+X Print X，Y End Sub程序运行时，三次单击命令按钮Comand1后，窗体上显示的结果为______。

深度为k的二叉树至多有______ 。

设执行以下程序段时依次输入1、3、5，执行结果为______ 。 Dim a(4)As Integer Dim b(4) As Integer For K=0 To 2 a(K+1)=Val(1nputBox(“请输入数据：”)) b(3-K)=a(K+1) Next K Print b(K)

下面程序执行的结果是______。 Private Sub Form_ Click() A＄=“123”：B＄=“456” C=Val(A＄)+Val(B＄) Print C\100 End Sub