设a = 5，b = 10，则执行c = Int((b - a) * Rnd + a) + 1后，c值的范围-最需题库

试卷相关题目

1设a=2, b=3, c=4, d=5, 下列表达式的值是Not a<=c Or 4*c=b^2 And b<>a+c
A.-1
B.1
C.True
D.False
开始考试点击查看答案
2以下叙述中错误的是
A.打开一个工程文件时，系统自动装入与该工程有关的窗体、标准模块等文件
B.当程序运行时，双击一个窗体，则触发该窗体的DblClick事件
C.Visual Basic应用程序只能以解释方式执行
D.事件可以由用户引发，也可以由系统引发
开始考试点击查看答案
3为了清除窗体上的一个控件，下列正确的操作是
A.按回车键
B.按Esc键
C.选择（单击）要清除的控件，然后按Del键
D.选择（单击）要清除的控件，然后按回车键
开始考试点击查看答案
4假定一个Visual Basic应用程序由一个窗体模块和一个标准模块构成。为了保存该应用程序，以下正确的操作是
A.只保存窗体模块文件
B.分别保存窗体模块、标准模块和工程文件
C.只保存窗体模块和标准模块文件
D.只保存工程文件
开始考试点击查看答案
5数据库系统的核心是
A.数据模型
B.数据库管理系统
C.数据库
D.数据库管理员
开始考试点击查看答案
6在窗体上画一个命令按钮，名称为Command1，然后编写如下事件过程：Private Sub Command1_Click()a$ = "software and hardware"b$ = Right(a$, 8)c$ = Mid(a$, 1, 8)MsgBox a$, , b$, c$, 1End Sub运行程序，单击命令按钮，则在弹出的信息框的标题栏中显示的是
A.software and hardware
B.software
C.hardware
D.1
开始考试点击查看答案
7在窗体上画一个命令按钮和一个文本框，其名称分别为Command1和Text1，把文本框的Text属性设置为空白，然后编写如下事件过程：Private Sub Command1_Click()a = InputBox("Enter an integer")b = InputBox("Enter an integer")Text1.Text = b + aEnd Sub程序运行后，单击命令按钮，如果在输入对话框中分别输入8和10，则文本框中显示的内容是
A.108
B.18
C.810
D.出错
开始考试点击查看答案
8在窗体上画两个文本框，其名称分别为Text1和Text2，然后编写如下程序：Private Sub Form_Load()ShowText1.Text = ""Text2.Text = ""Text1.SetFocusEnd SubPrivate Sub Text1_Change()Text2.Text = Mid(Text1.Text, 8)End Sub程序运行后，如果在文本框Text1中输入BeijingChina，则在文本框Text2中显示的内容是
A.BeijingChina
B.China
C.Beijing
D.BeijingC
开始考试点击查看答案
9在窗体上画一个列表框和一个命令按钮，其名称分别为List1和Command1，然后编写如下事件过程：Private Sub Form_Load()List1.AddItem "Item 1"List1.AddItem "Item 2"List1.AddItem "Item 3"End SubPrivate Sub Command1_Click()List1.List(List1.ListCount) = "AAAA"End Sub程序运行后，单击命令按钮，其结果为
A.把字符串“AAAA”添加到列表框中，但位置不能确定
B.把字符串“AAAA”添加到列表框的最后（即“Item 3”的后面）
C.把列表框中原有的最后一项改为“AAAA”
D.把字符串“AAAA”插入到列表框的最前面（即“Item 1”的前面）
开始考试点击查看答案
10假定有如下事件过程：Private Sub Form_Click()Dim x As Integer, n As Integerx = 1n = 0Do While x < 28x = x * 3n = n + 1LoopPrint x, nEnd Sub程序运行后，单击窗体，输出结果是
A.81 4
B.56 3
C.28 1
D.243 5
开始考试点击查看答案

设a = 5，b = 10，则执行c = Int((b - a) * Rnd + a) + 1后，c值的范围为

试卷相关题目