• 搜标题
  • 搜题干
  • 搜选项
0 / 200字
单项选择题

下列程序段的执行结果为 X=5 Y=-20 If Not X＞0 Then X=Y-3 Else Y=X+3 Print X-Y；

A．-3
B．5
C．3
D．25
题目列表

你可能感兴趣的试题

单项选择题

下列数据结构中，能用二分法进行查找的是

A．顺序存储的有序线性表
B．线性链表
C．二叉链表
D．有序线性链表
单项选择题

以下关于图片框控件的说法中，错误的是

A．可以通过Print方法在图片框中输出文本
B．清空图片框控件中图形的方法之一是加载一个空图形
C．图片框控件可以作为容器使用
D．用Stretch属性可以自动调整图片框中图形的大小
单项选择题

在窗体上画一个名称为Commandl的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() a$="VisualBasic" Print String(3，a$) End Sub 程序运行后，单击命令按钮，在窗体上显示的内容是

A．VVV
B．Vis
C．sic
D．11
单项选择题

设在窗体上有一个名称为Command1的命令按钮，并有以下事件过程： Private Sub Commandl Click() StatiC b As Variant b=Array(1，3，5，7，9) ... End Sub 此过程的功能是把数组b中的5个数逆序存放(即排列为9，7，5，3，1)。为实现此功能，省略号处的程序段应该是

A．For i=0 To 5-1\2 tmp=b( b(=b(5-i-1) b(5-i-1)=tmp Next
B．For i=0 To 5 tmp=b( b(=b(5-i-1) b(5-i-1)=tmp Next
C．For i-0 To 5\2 tmp=b( b(=b(5-i-1) b(5-i-1)=tmp Next
D．For i=1 To 5\2 tmp=b( b(=b(5-i-1) b(5-i-1)=tmp Next
单项选择题

下面概念中，不属于面向对象方法的是

A．对象
B．继承
C．类
D．过程调用
单项选择题

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Option Base 1 Private Sub Command1_Click() Dim a a=Array(1，2，3，4，5) For i=1 To UBound(a) a(i)=a(i)+i-1 Next Print a(3) End Sub 程序运行后，单击命令按钮，则在窗体上显示的内容是

A．4
B．5
C．6
D．7
单项选择题

为了在按下Esc键时执行某个命令按钮的Click事件过程，需要把该命令按钮的一个属性设置为True，这个属性是

A．Value
B．Default
C．Calicel
D．Enabled
单项选择题

以下能够触发文本框Change事件的操作是

A．文本框失去焦点
B．文本框获得焦点
C．设置文本框的焦点
D．改变文本框的内容
单项选择题

以下关系表达式中，其值为False的是

A．"ABC"＞"AbC"
B．"the"＜＞"they"
C．"VISUAL"＝UCase("Visual")
D．"Integer"＞"Int"
单项选择题

下列不能打开菜单编辑器的操作是

A．按组合键Ctrl+E
B．单击工具栏中的“菜单编辑器”按钮
C．执行“工具”菜单中的“菜单编辑器”命令
D．按组合键Shift+Alt+M
单项选择题

有如下程序： Private Sub Command1_Click() s = 0 Do s=(s+1) ( (s+2) N=N+1 Loop Until s＞=10 Print N；s End Sub 运行后的输出结果是

A．0 1
B．30 30
C．4 30
D．2 12
单项选择题

在设计阶段，当双击窗体上的某个控件时，所打开的窗口是

A．工程资源管理器窗口
B．工具箱窗口
C．代码窗口
D．属性窗口
单项选择题

以下声明语句中错误的是

A．Constvar1=123
B．Dim var2='ABC'
C．DefInt a-z
D．Static var3 As Integer
单项选择题

设有下列二叉树：
对此二叉树后序遍历的结果为

A．ABCDEF
B．BDAECF
C．ABDCEF
D．DBEFCA
单项选择题

在窗体中添加一个命令按钮，名称为Command1；添加一个文本框，名称为Text1，然后编写如下程序： Private Sub Commandl Click() Dim a(5)， b(5) For j = 1 To 4 a(j) = 3 ( j b(j) = a(j) ( 3 Next j Text1.Text = b(j\2) End Sub 程序运行后，单击命令按钮，在文本框中显示

A．25
B．18
C．36
D．35
单项选择题

设a=10，b=5，c=1，执行语句Print a＞b＞c后，窗体上显示的是

A．True
B．False
C．1
D．出错信息
单项选择题

以下关于过程及过程参数的描述中，错误的是

A．过程的参数可以是控件名称
B．用数组作为过程的参数时，使用的是“传地址”方式
C．只有函数过程能够将过程中处理的信息传回到调用的程序中
D．窗体可以作为过程的参数
单项选择题

单击一次命令按钮之后，下列程序代码的执行结果为 private Sub Command1_Click() S=P(1) +P(1)+P(2)+P(3)+P(4) Print S： End Sub Public Function P(N As Integer) Static Sum For I=1 To n Sum=Sum+I Next 1 P=Sum End Function

A．20
B．35
C．115
D．135
单项选择题

执行以下程序段 a$ ="abbacddcba" For i = 6 To 2 Step - 2 X = Mid(a， i，i) Y=Left(a， i) z=Right(a，i) z=UCase(X & Y &Z) Next i Print z 输出结果为

A．ABC
B．BBABBA
C．ABBABA
D．AABAAB
单项选择题

以下能够正确计算n!的程序是

A．Privas Sub Command1_Click() n=5：x=1 Do x=x*i i=i+1 Loop While i＜n Print x End Sub
B．Private Sub Command1_Click() n=5：x=1：i=1 Do x=x*i i=i+1 Loop While i＜n Print x End Sub
C．Private Sub Command1_Click() n=5：x=1：i=1 Do x=x*i i=i+1 Loop while i＜=n Print x End Sub
D．Private Sub Command1_Click() n=5：x=1：i=1 Do x=x*i i=i+1 Loop While i＞n Print x End Sub
单项选择题

在数据库管理技术的发展过程中，经历了人工管理阶段、文件系统阶段和数据库系统阶段。其中数据独立性最高的阶段是

A．数据库系统阶段
B．文件系统阶段
C．人工管理阶段
D．数据项管理
单项选择题

下列叙述中正确的是

A．一个逻辑数据结构只能有一种存储结构
B．数据的逻辑结构属于线性结构，存储结构属于非线性结构
C．一个逻辑数据结构可以有多种存储结构，且各种存储结构不影响数据处理的效率
D．一个逻辑数据结构可以有多种存储结构，且各种存储结构影响数据处理的效率
单项选择题

以下叙述中错误的是

A．用Shell函数可以调用能够在Windows下运行的应用程序
B．用Shell函数可以调用可执行文件，也可以调用Visual Basic的内部函数
C．调用Shell函数的格式应为；＜变量名＞＝Shell(……)
D．用Shell函数不能执行DOS命令
单项选择题

下面关于数据库系统的叙述正确的是

A．数据库系统减少了数据冗余
B．数据库系统避免了一切冗余
C．数据库系统中数据的一致性是指数据类型的一致
D．数据库系统比文件系统能管理更多的数据
单项选择题

下列程序段的执行结果为 X=5 Y=-20 If Not X＞0 Then X=Y-3 Else Y=X+3 Print X-Y；

A．-3
B．5
C．3
D．25
单项选择题

设有如下通用过程： Public Function f(x As Integer) Dim y As Integer x = 20 y = 2 f = x * y End Function 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Commandl Click() Static x As Integer x = 10 y = 5 y = f(x) Print x；y End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是

A．10 5
B．20 5
C．20 40
D．10 40
单项选择题

在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim arrayl(10；10)As Integer Dim i As Integer，j As Integer For i=1 To 3 For j=2：To 4 arrayl(i，j)=i+j Next j Next i Text1.Text=arrayl(2，3)+arrayl(3，4) End Sub 程序运行后，单击命令按钮，在文本框中显示的值是

A．15
B．14
C．13
D．12
单项选择题

有如下的程序段，该程序段的执行完后，共执行循环的次数是 Private Sub Command1_Click() total=0 Counter=l Do Print Counter total=total+Counter Print total Counter=Counter+1 If total＞=10 Then Exit Do End If Loop While Counter＜=10 End Sub

A．5
B．10
C．12
D．20
单项选择题

在窗体上画一个名称为CommonDialogl的通用对话框，一个名称为Commandl的命令按钮。然后编写如下事件过程： Private Command1_Click() CommonDialogl.FileName=" " CommonDialogl.Filter="All file|*.*|(*.Doc)|*.Doc|(*.Txt)|*.Txt" CommonDialoql.Filterlndex=2 CommonDialogl.DialoqTitle="VBTest" CommonDialoql.Action=1 End Sub 对于这个程序，似下叙述中错误的是

A．该对话框被设置为“打开”对话框
B．在该对话框中指定的默认文件名为空
C．该对话框的标题为VBTest
D．在该对话框中指定的默认文件类型为文本文件(*.Tx
单项选择题

设一个工程由两个窗体组成，其名称分别为Form1和Form2，在Form1上有一个名称为 Command1的命令按钮。窗体Form1的程序代码如下： Private Sub Command1_Click() Dim a As Integer a=10 Call g(Form2，a) End Sub Private Sub g(f As Form， x As Integer) y=IIf(x＞10， 100，-100) f.Show f.Caption =y End Sub 运行以上的程序，正确的结果是

A．Forml的Caption属性值为100
B．Form2的Caption属性值为-100
C．Forml的Caption属性值为-100
D．Form2的Caption属性值为100
微信扫码免费搜题