题库
题库
A．2
B．3
C．4
D．5
| 单选题 | 假定有以下循环结构 Do Until 条件表达式 循环体 Loop 则以下正确的描述是（ ）。 |
查看答案 |
| 单选题 | 表达式 2*3^2+4*2/2+3^2 的值是（ ）。 | 查看答案 |
| 单选题 | 下列叙述中正确的是（ ）。 | 查看答案 |
| 单选题 | 为计算 a 的值，某人编写了函数 power如下： Private Function power (a As Integer, n As Integer) As Long Dim p As Long p=a For k=1 To n p=p*a Next k power=p End Function 在调试时发现是错误的，例如 Print power(5,4)的输出应该是 625，但实际输出是 3125。 程序需要修改。下面的修改方案中有 3 个是正确的，错误的一个是（ ）。 |
查看答案 |
| 单选题 | 某人编写了下面的程序 Private Sub Command1_Click( ) Dim a As Integer, b As Integer a=InputBox("请输入整数") b=InputBox("请输入整数") pro a pro b Call pro(a+b) End Sub Private Sub pro(n As Integer) While (n>0) Print n Mod 10; n=n\10 Wend End Sub 此程序功能是：输入 2个正整数，反序输出这 2 个数的每一位数字，再反序输出这 2 个数之和的每一位数字。例如：若输入 123 和234，则应该输出： 3 2 1 4 3 2 7 5 3 但调试时发现只输出了前 2 行（即2 个数的反序），而未输出第 3 行（即2 个数之和 的反序），程序需要修改。下面的修改方案中正确的是（ ）。 |
查看答案 |
| 单选题 | 设a=4，b=5，c=6，执行语句 Print a<b And b<c 后，窗体上显示的是（ ）。 | 查看答案 |
| 单选题 | 在数据管理技术发展的三个阶段中，数据共享最好的是（ ）。 | 查看答案 |
| 单选题 | 一个栈的初始状态为空。现将元素 1、2、3、4、5、A、B、C、D、E 依次入栈，然后再依次出栈，则元素出栈的顺序是（ ）。 | 查看答案 |
| 单选题 | 在长度为 n 的有序线性表中进行二分查找，最坏情况下需要比较的次数是（ ）。 | 查看答案 |
| 单选题 | 数据流图中带有箭头的线段表示的是（ ）。 | 查看答案 |
| 单选题 | 以下叙述中错误的是（ ）。 | 查看答案 |
| 单选题 | 在软件开发中，需求分析阶段可以使用的工具是（ ）。 | 查看答案 |
| 单选题 | 下列叙述中正确的是（ ）。 | 查看答案 |
| 单选题 | 设窗体上有一个列表框控件 List1，含有若干列表项。以下能表示当前被选中的列表 项内容的是（ ）。 |
查看答案 |
| 单选题 | 为把圆周率的近似值 3.14159存放在变量 pi 中，应该把变量 pi 定义为（ ）。 | 查看答案 |
| 单选题 | 在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click( ) Dim I, Num Randomize Do For I=1 To 1000 Num=Int(Rnd*100) Print Num; Select Case Num Case 12 Exit For Case 58 Exit Do Case 65, 68, 92 End End Select Next I Loop End Sub 上述事件过程执行后，下列描述中正确的是（ ）。 |
查看答案 |
| 单选题 | 假定有以下函数过程： Function Fun(S As String)As String Dim s1 As String For i=1 To Len(S) s1=LCase(Mid(S, i, 1))+s1 Next i Fun=s1 End Function 在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click( ) Dim Str1 As String, Str2 As String Str1=InputBox("请输入一个字符串") Str2=Fun(Str1) Print Srt2 End Sub 程序运行后，单击命令按钮，如果在输入对话框中输入字符串“abcdefg”，则单击“确 定”按钮后在窗体上的输出结果为（ ）。 |
查看答案 |
| 单选题 | 设有如下通用过程： Public Function Fun(xStr As String)As String Dim tStr As String, strL As Integer tStr="" strL=Len(xStr) i=1 Do While i<=strL/2 tStr=Tstr & Mid(xStr, i, 1)& Mid(xStr, strL-i+1, 1) i=i+1 Loop Fun=tStr End Function 在窗体上画一个名称为 Command1的命令按钮。然后编写如下的事件过程： Private Sub Command1_Click( ) Dim S1 As String S1="abcdef" Print UCase(Fun(S1)) End Sub 程序运行后，单击命令按钮，输出结果是（ ）。 |
查看答案 |
| 单选题 | 有三个关系 R、S和 T 如下： 由关系 R 和S通过运算得到关系 T，则所使用的运算为（ ）。 |
查看答案 |
| 单选题 | 以下不能输出“Program”的语句是（ ）。 | 查看答案 |