以下各项，可以作为Visual Basic变量名的是

单项选择题

在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click( ) 　Dim m As Integer，n As Integer，p As Integer m=3：n=5：p=O Call Y(m，n，p) Print Str(p)End SubSub Y(ByVal i As Integer，ByVal j As Integer，k As Integer) k=i + jEnd Sub程序运行后，如果单击命令按钮，则在窗体上显示的内容是

A．4
B．6
C．8
D．10

单项选择题

单击窗体上的关闭按钮时，触发的事件是

A．Form_Initialize ( )
B．Form_Load ( )
C．Form_Unload ( )
D．Form_Click ( )

单项选择题

在代码编辑器中，续行符是用来换行书写同一个语句的符号，用以表示续行符的是

A．一个空格加一个下划线“_”
B．一个下划线“_”
C．一个造字符“_”
D．一个空格加一个连字符“-”

单项选择题

以下关于Visual Basic数据类型的说法，不恰当的是

A．Visual Basic 6．0提供的数据类型主要有字符串型和数值型，此外还有字节、货币、对象、日期、布尔和变体数据类型等
B．目前Decimal数据类型只能在变体类型中使用
C．用户不能定义自己的数据类型
D．布尔型数据只能取两种值，用两个字节存储

单项选择题

下列程序段，在运行时最早输出的内容是　　a=2　　c=1　AAA：　　c=c + a 　If c＜10 Then　　　　　Print c　　　　　GoTo AAA　　　Else　　　　　Print"10以内的奇数显示完毕。"　End If

A．3
B．7
C．9
D．6

单项选择题

表达式(3/2+1)*(5/2+2)的值是

A．11．25
B．3
C．6．125
D．4

单项选择题

有如下程序段：Private Sub Command1_Click( )　Dim a As Integer　a=2　For i=1 To 3　　　Print G(a)　Next iEnd SubFunction G(a As Integer)　b=0　Static c　b=b + 1　c=c + 1　G=a + b + cEnd Function运行上面的程序后，单击命令按钮，输出结果为

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

单项选择题

下列数据模型中，具有坚实理论基础的是

A．层次模型
B．网状模型
C．关系模型
D．以上3个都是

单项选择题

下列关于退出Visual Basic系统的方法的描述错误的是

A．打开Visual Basic主窗体的“文件”菜单，执行其中的“退出”命令
B．按快捷键Alt+Q退出
C．单击Visual Basic主窗体右上角的“关闭”按钮
D．按快捷键Alt+E退出

单项选择题

以下各项，可以作为Visual Basic变量名的是

A．Book
B．2_Seek
C．123．58
D．Book-1

单项选择题

单击命令按钮时，下列程序的运行结果为Private Sub Command1_Click( )　Print MyBM(23，18)End SubPublic Function MyBM(m As Integer，n As Integer)As Integer　Do While m< >n　　Do While m ＞ n：m=m - n：Loop　　Do While m ＜ n：n=n - m：Loop　Loop　MyBM=mEnd Function

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

单项选择题

在单链表中，增加头结点的目的是

A．方便运算的实现
B．使单链表至少有一个结点
C．标识表结点中首结点的位置
D．说明单链表是线性表的链式存储实现

单项选择题

线性表L=(a1，a2，a3，…ai，…an)，下列说法正确的是

A．每个元素都有一个直接前件和直接后件
B．线性表中至少要有一个元素
C．表中诸元素的排列顺序必须是由小到大或由大到小
D．除第一个元素和最后一个元素外，其余每个元素都有一个且只有一个直接前件和直接后件

单项选择题

执行以下语句过程，在窗体上显示的内容是　Option Base 0　Private Sub Command3_Click( )　　Dim d　　d=Array("a"，"b"，"c"，"d")　　Print d(1)；d(3) End Sub

A．ab
B．bd
C．ac
D．出错

单项选择题

分布式数据库系统不具有的特点是

A．数据分布性和逻辑整体性
B．位置透明性和复制透明性
C．分布性
D．数据冗余

单项选择题

以下说法不正确的是

A．使用ReDim语句可以改变数组的维数
B．使用ReDim语句可以改变数组的类型
C．使用ReDim语句可以改变数组的每一维的大小
D．使用ReDim语句可以改变对数组中的所有元素进行初始化

单项选择题

用什么语句可以选择指定的表项或取消已选择的表项

A．列表框．Selected(索引值)
B．列表框名．Selected(索引值)=True|False
C．列表框．Selected
D．列表框名．Selected=True|False

单项选择题

有如下事件过程：　　Private Sub Form_KeyDown(KeyCode As Integer，Shift As Integer)　　　If(Button And 3)=3 Then　　　　Print"OK"　　　End If　　End Sub　　程序运行后，为了在窗体上输出“OK”，应当按下的鼠标键是

A．左键
B．右键
C．同时按下左键和右键
D．按什么都不显示

单项选择题

设有下面的循环：　　i=1　　Do　　　i=i + 3　　　Print i　　Loop Until I＞_________　　程序运行后要执行3次循环体，则条件中I的最小值为

A．6
B．7
C．8
D．9

单项选择题

用于将屏幕上的对象分组的控件是

A．列表框
B．组合框
C．标签
D．框架

单项选择题

关系表中的每一横行称为一个

A．元组
B．字段
C．属性
D．码

单项选择题

软件工程的出现是由于

A．程序设计方法学的影响
B．软件产业化的需要
C．软件危机的出现
D．计算机的发展

单项选择题

算法分析的目的是

A．找出数据结构的合理性
B．找出算法中输入和输出之间的关系
C．分析算法的易懂性和可靠性
D．分析算法的效率以求改进

单项选择题

关于自定义对话框概念的说明，错误的是

A．建立自定义对话框时必须执行添加窗体的操作
B．自定义对话框实际上是VB的窗体
C．在窗体上还要使用其他控件才能组成自定义对话框
D．自定义对话框不一定要有与之对应的事件过程

单项选择题

下面Change事件过程中，文本框控件Text1用来接收数字字符的输入，该事件过程的作用是Private Sub Text1_Change ( )　　Text2．Text=Str(6．28* Val(Text1．Text))　　End Sub

A．将在文本框Text1输入的数字变为数值
B．将在文本框Text1输入的数字作为半径，求圆的周长并转换为字符串
C．只要Text1中的内容一改变，Text2中显示的圆周长也随之改变
D．事件过程中的Val函数和Str函数使用错误，事件过程不能执行

单项选择题

下列说法正确的是

A．对象的可见性可设为True或False
B．标题的属性值不可设为任何文本
C．属性窗口中属性只能按字母顺序排列
D．某些属性的值可以跳过不设置，自动设为空值

单项选择题

阅读下面的程序段：For a=1 To 2　For b=1 To a 　For C=b To 2　　I=I + 1　　Next　NextNextPrint I执行上面的三重循环后，I的值为

A．4
B．5
C．6
D．9

单项选择题

下面4个CT函数中是用来判断用户输入的数是否为奇数的，是奇数的返回1，否则返回0，其中正确的是

A．Function CT(ByVal a As Intege 　　If a Mod 2=0 Then　　　　Return 0　　 ElSe　　　　Return 1　　 End if　 End Function
B．Function CT(ByVal a As Intege　　　If a Mod 2=0 Then　　　　CT=0 Else　　　　CT=1　 End if End Function
C．Function CT(ByVal a As Intege　　　If a Mod 2=0 Then　　　　　CT=1　　　Else　　　　　CT=0　　　End if End Function
D．Function CT(ByVal a As Intege　　　If a Mod 2=0 Then　　　　　Return 1　　　Else　　　　　Return 0　　　End if　　End Function

单项选择题

有如下的程序：Private Sub Command1_Click( )　Dim k As Integer，m As Integer　Dim P As Integer　k=4：m=1　P=Pid(k，m) ：Print P；　P=Pid(k，m) ：Print PEnd SubPrivate Function Pid(a As Integer，b As Integer)　Static m As Integer，i As Integer　m=5：i=2　i=i + m + 1　m=i + a + b　Pid=m\2End Function单击命令按钮后，输出结果为

A．2 2
B．4 4
C．5 5
D．6 6

以下各项，可以作为Visual Basic变量名的是

你可能感兴趣的试题

软件开发离不开系统环境资源的支持，其中必要的测试数据属于

在数据流图(DFD) 中，带有名字的箭头表示

设有下面的循环： i=０ While i＜=1 i=i + 3 Print i Wend则运行后的输出结果是

为了暂时关闭计时器，应把该计时器控件的哪个属性设置为False

单击窗体上的关闭按钮时，触发的事件是

在代码编辑器中，续行符是用来换行书写同一个语句的符号，用以表示续行符的是

以下关于Visual Basic数据类型的说法，不恰当的是

下列程序段，在运行时最早输出的内容是 a=2 c=1 AAA： c=c + a If c＜10 Then Print c GoTo AAA Else Print"10以内的奇数显示完毕。" End If

表达式(3/2+1)*(5/2+2)的值是

有如下程序段：Private Sub Command1_Click( ) Dim a As Integer a=2 For i=1 To 3 Print G(a) Next iEnd SubFunction G(a As Integer) b=0 Static c b=b + 1 c=c + 1 G=a + b + cEnd Function运行上面的程序后，单击命令按钮，输出结果为

下列数据模型中，具有坚实理论基础的是

下列关于退出Visual Basic系统的方法的描述错误的是

以下各项，可以作为Visual Basic变量名的是

单击命令按钮时，下列程序的运行结果为Private Sub Command1_Click( ) Print MyBM(23，18)End SubPublic Function MyBM(m As Integer，n As Integer)As Integer Do While m< >n Do While m ＞ n：m=m - n：Loop Do While m ＜ n：n=n - m：Loop Loop MyBM=mEnd Function

在单链表中，增加头结点的目的是

线性表L=(a1，a2，a3，…ai，…an)，下列说法正确的是

执行以下语句过程，在窗体上显示的内容是 Option Base 0 Private Sub Command3_Click( ) Dim d d=Array("a"，"b"，"c"，"d") Print d(1)；d(3) End Sub

分布式数据库系统不具有的特点是

以下说法不正确的是

用什么语句可以选择指定的表项或取消已选择的表项

有如下事件过程： Private Sub Form_KeyDown(KeyCode As Integer，Shift As Integer) If(Button And 3)=3 Then Print"OK" End If End Sub 程序运行后，为了在窗体上输出“OK”，应当按下的鼠标键是

设有下面的循环： i=1 Do i=i + 3 Print i Loop Until I＞_________ 程序运行后要执行3次循环体，则条件中I的最小值为

用于将屏幕上的对象分组的控件是

关系表中的每一横行称为一个

软件工程的出现是由于

算法分析的目的是

关于自定义对话框概念的说明，错误的是

下面Change事件过程中，文本框控件Text1用来接收数字字符的输入，该事件过程的作用是Private Sub Text1_Change ( ) Text2．Text=Str(6．28* Val(Text1．Text)) End Sub

下列说法正确的是

阅读下面的程序段：For a=1 To 2 For b=1 To a For C=b To 2 I=I + 1 Next NextNextPrint I执行上面的三重循环后，I的值为

下面4个CT函数中是用来判断用户输入的数是否为奇数的，是奇数的返回1，否则返回0，其中正确的是

设有下面的循环：　i=０　　While i＜=1　　　i=i + 3　　　Print i　　Wend则运行后的输出结果是

下列程序段，在运行时最早输出的内容是　　a=2　　c=1　AAA：　　c=c + a 　If c＜10 Then　　　　　Print c　　　　　GoTo AAA　　　Else　　　　　Print"10以内的奇数显示完毕。"　End If

有如下程序段：Private Sub Command1_Click( )　Dim a As Integer　a=2　For i=1 To 3　　　Print G(a)　Next iEnd SubFunction G(a As Integer)　b=0　Static c　b=b + 1　c=c + 1　G=a + b + cEnd Function运行上面的程序后，单击命令按钮，输出结果为

单击命令按钮时，下列程序的运行结果为Private Sub Command1_Click( )　Print MyBM(23，18)End SubPublic Function MyBM(m As Integer，n As Integer)As Integer　Do While m< >n　　Do While m ＞ n：m=m - n：Loop　　Do While m ＜ n：n=n - m：Loop　Loop　MyBM=mEnd Function

执行以下语句过程，在窗体上显示的内容是　Option Base 0　Private Sub Command3_Click( )　　Dim d　　d=Array("a"，"b"，"c"，"d")　　Print d(1)；d(3) End Sub

有如下事件过程：　　Private Sub Form_KeyDown(KeyCode As Integer，Shift As Integer)　　　If(Button And 3)=3 Then　　　　Print"OK"　　　End If　　End Sub　　程序运行后，为了在窗体上输出“OK”，应当按下的鼠标键是

设有下面的循环：　　i=1　　Do　　　i=i + 3　　　Print i　　Loop Until I＞_________　　程序运行后要执行3次循环体，则条件中I的最小值为

下面Change事件过程中，文本框控件Text1用来接收数字字符的输入，该事件过程的作用是Private Sub Text1_Change ( )　　Text2．Text=Str(6．28* Val(Text1．Text))　　End Sub

阅读下面的程序段：For a=1 To 2　For b=1 To a 　For C=b To 2　　I=I + 1　　Next　NextNextPrint I执行上面的三重循环后，I的值为