首页
题库
网课
在线模考
搜标题
搜题干
搜选项
单项选择题
有如下程序:
Option Base 1
Private Sub Form Click()
Dim arr,Sum
Sum=0
alt=Array(1,3,5,7,9,11,13,15,17,19)
For i=1 To 10
If arr(i)/3=arr(i)\3 Then
Sum=Sum+arr(i)
End If
Next i
Print Sum
End Sub
程序运行后,单击窗体,输出结果为______。
A.25
B.26
C.27
D.28
点击查看答案&解析
在线练习
你可能感兴趣的试题
单项选择题
有如下程序:
Option Base 1
Private Sub Form Click()
Dim arr,Sum
Sum=0
alt=Array(1,3,5,7,9,11,13,15,17,19)
For i=1 To 10
If arr(i)/3=arr(i)\3 Then
Sum=Sum+arr(i)
End If
Next i
Print Sum
End Sub
程序运行后,单击窗体,输出结果为______。
A.25
B.26
C.27
D.28
点击查看答案&解析
单项选择题
在窗体上画一个命令按钮,名称为Commandl。然后编写如下程序:
Private Sub Command1_Ctick()
For I=1 TO 2
For J=1 TO I
Print String(I,"Hello");
Next J
Print
Next I
End Sub
程序运行后,如果单击命令按钮,则在窗体上显示的内容是
A.HHHHH
B.HHHHH
C.HHHHH
D.HHHHHHH
点击查看答案&解析
单项选择题
在窗体上画两个标签和一个命令按钮,其名称分别为Labell、Label2和Command1,然后编写如下程序:
Private Sub func(L As Label,ByVal a As Integer)
L.Caption="1234"
a=a*a
End Sub
Private Sub Form_Load()
Label1.Caption="ABCD"
Label2.Caption=10
End Sub
Private Sub Command1_Click()
a=Val(Label2.Caption)
Call func(Labell,A)
Label2.Caption=a
End Sub
程序运行后,单击命令按钮,在两个标签Label1和Label2中显示的内容分别是 ______。
A.ABCD和10
B.1234和100
C.ABCD和100
D.1234和10
点击查看答案&解析
单项选择题
在计算机中,算法是指 ______。
A.查询方法
B.加工方法
C.解题方案的准确而完整的描述
D.排序方法
点击查看答案&解析
单项选择题
Visual Basic中的“启动对象”是指启动Visual Basic应用程序时,被自动加载并首先执行的对象。下列关于Visual Basic“启动对象”的描述中,错误的是
A.“启动对象”可以是指定的标准模块
B.“启动对象”可以是指定的窗体
C.“启动对象”可以是Sub Main过程
D.若没有经过设置,则默认的“启动对象”是第一个被创建的窗体
点击查看答案&解析
单项选择题
有弹出式菜单的结构如下表,程序运行时,单击窗体则弹出如下图所示的菜单。下面的事件过程中能正确实现这一功能的是
A.Private Sub Form_Click()PopupMenu cutEnd Sub
B.Private Sub Command1 Click()PopupMenu editEnd Sub
C.Private Sub Form_Click()PopupMenu editEnd SubEnd Sub
D.Private Sub Form_lick()PopupMenu cutPopupMenu paste
点击查看答案
单项选择题
在深度为5的满二叉树中,叶子结点的个数为 ______。
A.32
B.31
C.16
D.15
点击查看答案&解析
单项选择题
窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。以下程序的功能是从顺序文件中读取数据:
Private Sub Command1_Click()
Dim s1 As String, s2 As String
Open "c:\d4.dat" For Append As #3
Line Input#3, s1 Line Input#3, s2
Text1.Text=s1+s2
Close
End Sub
该程序运行时有错误,应该进行的修改是
A.将Open语句中的ForAppend改为ForInput
B.将LineInput改为Line
C.将两条Line Input语句合并为Line Input #3, s1, s2
D.将Close语句改为Close #3
点击查看答案&解析
单项选择题
在关系数据库中,实现主码标识元组的作用是通过______。
A.实体完整性规则
B.参照完整性规则
C.用户自定义的完整性
D.属性的值域
点击查看答案
单项选择题
下面子过程语句说明合法的是______。
A.Sub f1(sl As String*8)
B.Sub f1(nAs Integer)As Integer
C.Function f1(f1 As Integer)As Integer
D.Function f1(ByVal n As Integer)
点击查看答案&解析
单项选择题
设有语句:
Temp=MsgBox("继续执行吗",vbYesNo,"退出提示框")
程序运行时,在对话框的标题栏将显示
____
。
A.继续执行吗
B.vbYesNo
C.退出提示框
D.Temp
点击查看答案&解析
单项选择题
确定—个控件在窗体上的位置的属性是
A.Width和fteight
B.Width或Iteight
C.Top和Left
D.Top或Left
点击查看答案&解析
单项选择题
在窗体上画一个列表框和一个命令按钮,其名称分别为List1和Command1,然后编写如下事件过程:
Private Sub Form_Load()
List1. AddItem"Item1"
List1.AddItem"Item2"
List1. AddItem"Item3"
End Sub
Private Sub Command1_Click()
List1. List(List1. ListCount)="AAAA"
End Sub
程序运行后,单击命令按钮,其结果为______。
A.把字符串“AAAA”添加到列表框中,但位置不能确定
B.把字符串“AAAA”添到列表框的最后(即“Item3”的后面)
C.把列表框之中原有的最后一项改为“AAAA”
D.把字符串“AAAA”插入到列表框的最前面(即“Iteml”的前面)
点击查看答案&解析
单项选择题
如果要改变窗体的标题,需要设置窗体对象的 ______ 属性。
A.Name
B.Caption
C.BackColor
D.BorderStyle
点击查看答案&解析
单项选择题
下列关于Sub过程的叙述正确的是
____
。
A.一个Sub过程必须有一个Exit Sub语句
B.一个Sub过程必须有一个End Sub语句
C.在Sub过程中可以定义一个Function过程
D.可以用Goto语句退出Sub过程
点击查看答案&解析
单项选择题
下列程序段的执行结果为 ______。
X=5
Y=-20
If Not X>0 Then X=Y-3 Else Y=X+3
Print X-Y; Y-X
A.-3 3
B.5 -8
C.3 -3
D.25 -25
点击查看答案&解析
单项选择题
Visual Basic中的数值可以用十六进制或八进制表示,十六进制数的开头符号是&H,八进制数的开头符号是
____
。
A.$O
B.&O
C.$E
D.&E
点击查看答案&解析
单项选择题
下列对变量的定义中,不能定义a为变体变量的是
A.Dim a As Double
B.Dim a As Variant
C.Dim a
D.a=24
点击查看答案&解析
单项选择题
如果要将窗体中的某个命令按钮设置成不可见状态,应该设置命令按钮的什么属性
A.Value
B.Visible
C.Enabled
D.Default
点击查看答案&解析
单项选择题
假定已在窗体上画了多个控件,其中有一个被选中,为了在属性窗口中设置窗体的属性,预先应执行的操作是______。
A.单击窗体上没有控件的地方
B.单击任意一个控件
C.双击任意一个控件
D.单击属性窗口的标题栏
点击查看答案&解析
单项选择题
在窗体上画4个文本框,并用这4个文本框建立一个控件数组,名称为Text1(下标从0开始,自左至右顺序增大),然后编写下列事件过程:
Private Sub Command1_Click()
For Each TextBox In Text1
Text1(i)=Text1(i).Index
i=i+1
Next
End Sub
程序运行后,单击命令按钮,4个文本框中显示的内容分别为
____
。
A.0 1 2 3
B.1 2 3 4
C.0 1 3 2
D.出错信息
点击查看答案&解析
单项选择题
下列关于结构化设计方法的特点描述中,不正确的是
____
。
A.采用逐步求精的方法进行详细设计,由于相邻步之间变化小,易于验证其等效性和设计正确性
B.程序清晰和模块化使得修改和重新设计一个软件时使用的代码量不大
C.在进行程序设计时不能使用goto语句
D.良好清晰的控制结构使设计容易阅读和理解
点击查看答案&解析
单项选择题
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:
Private Sub Comandl_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
点击查看答案&解析
单项选择题
在下列叙述中,不正确的一条是 ______。
A.数据库设计包括结构设计和行为设计两方面的内容
B.数据库设计的关键是结构特征的设计
C.数据库设计是数据库应用系统设计的核心部分
D.数据库的物理设计和具体的DBMS的类型无关
点击查看答案&解析
单项选择题
下面语句中能够打开随机文件的是
A.Open"file.txt"For Random As #1
B.Open"file.txt" For Input As #1
C.Open"file.txt" For Output As #1
D.Open"file.txt" For Append As #1
点击查看答案&解析