冲刺vb答案

1、一.选择结构-题目：编写函数 fun，函数的功能是：根据一个百分制 成绩 mark（整数） ，显示对应五级制的评定。条件如下： mark 大于等于 90 显示“优秀“ mark 小于 90 且大于等于 80 显示“良好“ mark 小于 80 且大于等于 70 显示“中等“ mark 小于 70 且大于等于 60 显示“及格“ mark 小于 60 显示“不及格“ 要求使用 IF 语句来实现。-Private Function fun(mark As Integer) As String*Program*If mark = 90 Thenfun = “优秀“ElseIf mark = 80 。

2、最新 VB 题库及答案一、选择题第 1 部分1、在窗体（名称为 Form1）上画一个名称为 Text1 的文本框和一个名称为Command1 的命令按钮，然后编写一个事件过程。程序运行后，如果在文本框中输入一个字符，则把命令按钮的标题设置为“计算机等级考试” 。以下能实现上述操作的事件过程是 A、Private Sub Text1_Change()Command1.Caption = “计算机等级考试“End SubB、Private Sub Command1_Click()Caption = “计算机等级考试“End SubC、Private Sub Form_Click()Text1.Caption = “计算机等级考试 “End SubD、Private Sub Command1_Click(。

3、Vb 编程题1. 求自然数 1100 之间奇数之和。Private Sub Form_Click()Dim i%, sum%For i = 1 To 99 Step 2sum = sum + iNext iPrint “sum=“; sumEnd Sub2. 求自然数 1100 之间偶数之和。Private Sub Form_Click()Dim i%, sum%For i = 1 To 100 If i mod 2=0 thensum = sum + iend ifNext iPrint “sum=“; sumEnd Sub3. 编写程序，在窗体上随机输出一个 10-99之间的两位整数。Sub command1_click()Dim a%Randomizea=int(rnd*90+10)print aend sub4. 编程计算从 200到 1000之间的所有 4的倍数之和。Private Sub Form_Click()Dim sum As Lo。

4、一.选择结构题目：在下面的程序段中过程 pd 可以判断任意三个数能否构成三角形的三边，利用该过程的判定结果， 对能构成三角形的计算其面积，构不成的显示“不能构成三角形“-Option ExplicitPrivate Sub Form_Click()*FOUND*Dim x%, y%, z%, s%, b As Boolean, h As Singlex = InputBox(“请输入三角形的边长“)y = InputBox(“请输入三角形的边长“)z = InputBox(“请输入三角形的边长“)b = pd(x, y, z)h = (x + y + z) / 2*FOUND*If Not b Thens = Sqr(h * (h - x) * (h - y) * (h - z)Print “三角形面积是“; sElsePrint “不能构成。

5、实验教程实验三 顺序结构程序设计编程题参考答案 （第 47 页）1. 输入学生的语文、数学、英语、物理四门课程的成绩，计算该学生的总成绩和平均成绩并输出。要求使用 InputBox 分别进行输入，使用 Print 方法输出。2. 输入圆的半径，输出其周长、面积。要求使用 TextBox 控件进行输入，使用Label 控件输出。3. 输入一元二次方程 ax2+bx+c=0 的系数 a、b、c ，输出两个实根。要求使用TextBox 控件分别进行输入，使用 Label 控件输出。实验四 选择结构程序设计编程题参考答案 （第 58 页）1. 输入一个，判断其是否能同时被 3 和 7 整除。2. 。

6、 1 / 16大学计算机基础及 VB 程序设计作业答案教师：阳韬盐城工学院信息学院2 / 16第一次作业一、选择题5.算法的有穷行是指（A）。 A.算法程序的运行时间是有限的 B 算法程序所处理的数据量是有限的C.算法程序的长度是有限的 D.算法只能被有限的用户使用6.算法的时间复杂度是指（C）。A.算法的执行时间 B.算法所处理的数据量C.算法执行过程中所需要的基本运算次数 D.算法程序中的语句或指令条数7.算法的空间复杂度是指（B）。A.算法程序中的语句或指令条数 B.算法在执行过程中所需要的计算机存储空间 C.算法所处理的数据量 D.算法在执行过。

7、本卷共有 3 道大题:一、单项选择题（50 道小题，共 50 分）1、VB 程序中，通常不会产生错误提示的是( )。（1 分）A、编译错误 B、逻辑错误C、运行时错误 D、实时错误2、在设计阶段，双击窗体上任一空白处，打开的窗口是( )。（1 分）A、工程资源管理器窗口 B、代码窗口 C、工具箱窗口 D、属性窗口3、下列说法中，正确的说法是( )。（1 分）A、窗体名称和该窗体文件名必须一致 B、窗体名称和该窗体文件名可以不相同C、窗体名称和该窗体文件名不能使用汉字 D、窗体名称不能使用汉字、但该窗体文件名能使用汉字4、Visual Basic 有完备的 Help。

8、习题 5一判断题1.2.3.4567.8.9.10二选择题1 B2 B3 A4 C5 D6 D7 A8 C三程序阅读题1 窗体上的显示结果：2 窗体上的显示结果：四程序填空题1. (1) I+j-1(2) 7-I(3) print2. (1) Dim STR As String(2) inputbox(STR)(3) UCase(x) = “E“五程序设计题1Private Sub Form_Click()Dim i As IntegerDim j As IntegerDim n As Integer n+1 层为杨辉三角形的层数Dim a() As Integer 定义动态数组，因为层数未定n = InputBox(“请输入一个正整数 9 ThenPrint “输入的数太大，n a(0)a(j + 1) = a(j)j = j - 1Loopa(j + 1) = a(0)Print n; Spc(8);For 。

9、 第 1-2 章 Visual Basic 导论与算法一、选择题1 2 3 4 5 6 7 8 9C C B A B C B C B二、简答题1、属性：红色、充满氢气事件：松开手抓的引线、针刺方法：飞、爆破2、确定性、可行性、有穷性、输入性、输出性3、方法一：T=XX=YY=T方法二：X=X+YY=X-YX=X-Y第三章 常见控件与界面设计一、选择题1 2 3 4 5 6 7 8 9 10A A D B D B C D D B11 12 13 14 15 16 17 18 19 20C A B C B C C A A D二、编程题略第四章 数据类型和表达式一、 选择题（1）基本概念1 2 3B C B（2）数据溢出1 2 3 4 5 6 7D B C B A C A（3）将数学表达式改写成 VB 表达式1 。

10、（1）选择结构 （2）循环结构（3）数组 （4）过程1. 输入 3 个数，输出最大的数2. 有一元二次方程：aX 2+bX+c=0，依次输入 a，b，c，判断此方程是否有实根详细代码如下：Private Sub Command1_Click()Dim a As IntegerDim b As IntegerDim c As Integera = InputBox(“a“)b = InputBox(“b“)c = InputBox(“c“)If (b * b - 4 * a * c) = 0 ThenPrint “Yes“;ElsePrint “No“End IfEnd Sub3. 输入一个百分制的成绩，若大于等于 60，则用消息框弹出，显示“恭喜！成绩通过！”，若小于 60，则弹出消息框，显示“抱歉！成绩没有通过！”。

11、第一套（窗体标题 设置按钮属性 命令按钮 等级考试）运行后 命令按钮不可见 命令按钮标题 字号 字体用三号字黑体Private Sub Form_Click()Label1.Top = 0Label1.Left = Form1.Width - Label1.WidthEnd Sub参考答案第1个？处填入：1001第2个？处填入：Min第3个？处填入：arrN(i) arrN(i)Function Fun()Dim s As Integer, i As IntegerFor i = 0 To 1000If i Mod 7 a(j + 1) Thent = a(j + 1)a(j + 1) = a(j)a(j) = tEnd IfNext jNext iFor j = 1 To 50ch = ch + Str(a(j) + “Next jText2.Text = chEnd Sub第十套 Liable1 Liable2 姓名 年。

12、一、选择题（1-30 题每小题 1分，共 30分，31-45 题每小题 2分,共 30分，总计 60分）1、( ) 要使窗体 Form1的标题栏中显示“正在复制文件” ，正确的语句是：aAForm1.Caption=“正在复制文件”BForm1.Title=“正在复制文件”CForm1.Text=“正在复制文件”DForm1.名称=“正在复制文件”2、( ) 如果要求设置定时器时间间隔为 1秒钟，那么它的 Interval属性值应该等于：aA1000 B100 C10 D13、下列关于控件的基本操作中，错误的是A)当控件处于活动状态时，可以对控件进行缩放 B) 在设计阶段不能移动控件C) Visual Basic 6.0 允许对画好的控件。

13、1 通过文本框TextBook1舒服一个实数 单击计算按钮 在TextBook2 6中分别输出该数的相反数 平方 绝对值平方根 立方以及绝对值的立方根 需要在文本框前添加注释文本框内的数据 Public Class Form1 Private Sub Form1 Load ByVal sender As System Object ByVal e As System EventArgs Handl。

14、1 利用随机函数产生 25 个 100 到 999 之间的整数，构成 55 的矩阵，输出该矩阵。Private Sub Form_Click()Dim m%, n%For i = 1 To 25m = Int(Rnd * 900 + 100)Print m;If i Mod 5 = 0 Then PrintNext iEnd Sub2 利用随机函数产生 25 个 10 到 99 之间的整数，求其平均值 (要求保留 3 位小数，第 4 位四舍五入)。Private Sub Form_Click()Dim k#, n%n = 0For i = 1 To 25m = Int(Rnd * 90 + 10)Print m;n = n + mNext iPrintPrint “25 个数的和为：“, nk = n / 25Print “25 个数的平均值为：“, Format(k, “#.000“)End Sub3 利用随机。

15、1. 程序功能是产生 30 个30,50之间的随机整数，放入一个数组中，然后输出这 30 个整数的平均值,结果保留两位小数。例如：平均值为 28.3 时，应在窗体上显示 28.30。程序运行后，单击命令按钮名称为 Command1，标题为输。

16、 第 1 章 Visual Basic 6.0 程序 设计概述一、判断题1 23 说 明 ： 同 类 控 件 （ 如 两 个 标 签 ） 相 互 重 叠 ， 设 计 时 可 以 设 置 “置 前 ”、 “置 后 ”属 性 。4 5 6 7 8 9 10 11 1213 14 15 16 17 18 19 20二、选择题1. C 2. B 3D 4C 5B 6A 7D 8 A 9B 10A 11C 12D三、填空题1对象、事件 2属性、方法、事件 3控件、屏幕（Screen）4对象 5Left、Top 6属性、.=7网格 8F orm19Load 或 Initialize 或 Resize 或 Activate（自动执行的先后顺序也按此排列）10Activate、Deactivate。

17、VB 综合( 学考部分非选择题 )1. 2017 年 4 月学考题奇偶校验是一种校验数据传输正确性的方法。其中奇校验方法：统计二进制数据的数位中“1”的个数，若个数为奇数，则校验位值为 0，否则校验位值为 1。小李编写了一个计算奇校验位值得 VB 程序，功能如下：在文本框 Text1 中输入 1255 十进制待校验数，单击“计算”按钮 Command1 后，在文本框 Text2 中显示该数对应的二进制值，并在标签 Label3 中显示该数的校验位值。程序运行界面如图所示。（1）在设计程序界面时，要清空文本框中的显示内容，应修改该文本框中的 Text 属性。（2）实现。

18、1 VB 程序设计习题及答案1 选择题1. 下列选项中，不属于 Visual Basic 特点的是选项 。A）可视化程序设计 B）面向图形对象 C）事件驱动编程机制 D）VB 窗口中包含有菜单栏和工具栏解：D。菜单栏及工具栏是大部分程序的界面方式，不是 Visual Basic 的特点。2. Visual Basic 的编程机制是 。A）可视化 B）面向对象 C）面向图形 D）事件驱动解：D。这几个都是 Visual Basic 的特点，但说到编程机制，选“事件驱动”更合适。3. Visual Basic 是一种 程序设计语言。A）过程式 B）非过程式 C）机器 D）低级解：B。4. 窗体设计器是用来设计 。A。

19、一、选择题1在正确的安装 VB 后，可以通过多种方式启动 VB，在以下方式中不能启动 VB 的是（ ）A 通过“开始”菜单中的“程序”命令B 通过“我的电脑”找到 VB6.exe，双击该文件名C 通过“开始”菜单中的“运行”命令D 进入 DOS 方式，执行 VB6.exe2VB 窗体设计器的主要功能是（ ）A建立用户界面 B编写源程序代码 C添加图 D显示文字3下列不能打开工具箱窗口的操作是（ ）A 招待“视图”菜单中的“工具箱”命令B 按 Alt+F8 键C 单击工具栏上的“工具箱”按钮D 按 Alt+V，然后按 Alt+X 键4同时改变一个活动控件的高度和宽度，正确的操作是（。

20、3、打开“考生文件夹211“文件夹中的工程文件“工程1.vbp“进行以下操作后并保存！（在字符串相连接时不要使用“+“，应使用“ 打印空格For j = 1 To 10Print “*”; 第二空Next jPrintNext iEnd Sub5、打开“考生文件夹217“文件夹中的工程文件“工程1.vbp“进行以下操作后并保存！（在字符串相连接时不要使用“+“，应使用“输入大于100的整数则显示“输入的整数不能超过100“！注：(1) 删除、，填入正确的语句 (2) 不能删除注释语句Private Sub Command1_Click()Dim a As Integera = Val(Text1.Text)If a100 ThenText2.Text = “输入的。