VB操作题部分
vb试题及答案(共10篇)
vb试题及答案(共10篇)篇1:计算机vb试题及答案计算机vb试题及答案(1)下面叙述正确的是(C)A.算法的执行效率与数据的存储结构无关B.算法的空间复杂度是指算法程序中指令(或语句)的条数C.算法的有穷性是指算法必须能在执行有限个步骤之后终止D.以上三种描述都不对(2)以下数据结构中不属于线性数据结构的是(C)A.队列B.线性表C.二叉树D.栈(3)在一棵二叉树上第5层的结点数最多是(B)注:由公式2k-1得A.8B.16C.32D.15(4)下面描述中,符合结构化程序设计风格的是(A)A.使用顺序、选择和重复(循环)三种基本控制结构表示程序的控制逻辑B.模块只有一个入口,可以有多个出口C.注重提高程序的执行效率D.不使用goto语句(5)下面概念中,不属于面向对象方法的是(D)A.对象B.继承C.类D.过程调用(6)在结构化方法中,用数据流程图(DFD)作为描述工具的软件开发阶段是(B)A.可行性分析B.需求分析C.详细设计D.程序编码(7)在软件开发中,下面任务不属于设计阶段的是(D)A.数据结构设计B.给出系统模块结构C.定义模块算法D.定义需求并建立系统模型(8)数据库系统的核心是(B)A.数据模型B.数据库管理系统C.软件工具D.数据库(9)下列叙述中正确的是(C)A.数据库是一个独立的系统,不需要操作系统的支持B.数据库设计是指设计数据库管理系统C.数据库技术的根本目标是要解决数据共享的问题D.数据库系统中,数据的物理结构必须与逻辑结构一致(10)下列模式中,能够给出数据库物理存储结构与物理存取方法的是(A)A.内模式B.外模式C.概念模式D.逻辑模式(11)算法的时间复杂度是指(C)A.执行算法程序所需要的时间B.算法程序的长度C.算法执行过程中所需要的基本运算次数D.算法程序中的指令条数(12)算法的空间复杂度是指(D)A.算法程序的长度B.算法程序中的指令条数C.算法程序所占的存储空间D.算法执行过程中所需要的存储空间(13)设一棵完全二叉树共有699个结点,则在该二叉树中的叶子结点数为(B)注:利用公式n=n0+n1+n2、n0=n2+1和完全二叉数的特点可求出A.349B.350C.255D.351(14)结构化程序设计主要强调的是(B)A.程序的规模B.程序的易读性C.程序的执行效率D.程序的可移植性(15)在软件生命周期中,能准确地确定软件系统必须做什么和必须具备哪些功能的阶段是(D)注:即第一个阶段A.概要设计B.详细设计C.可行性分析D.需求分析(16)数据流图用于抽象描述一个软件的逻辑模型,数据流图由一些特定的图符构成。
VB考试练习题(上机操作)
第一部分1 在窗体上添加一个命令按钮(名称为Cmd1,标题为"输出平均值")。
程序运行后,单击命令按钮完成以下工作:①随机产生20个0到1000的整数,将其放入一个一维数组中②求出所有元素的平均值,并显示在窗体上(如下图所示)2 请在名称为Form1的窗体上添加一个名称为Text1的文本框和一个名称为C1、标题为"转换"的命令按钮,如下图所示。
在程序运行时,单击"转换"按钮,可以把Text1中的小写字母转换为大写,把大写字母转换为小写,其他字符不变。
3 在窗体上添加一个命令按钮(名称为MyCmd1,标题为"输出最大值")。
程序运行后,单击命令按钮完成以下工作:①随机产生30个0~1000的整数,将其放入一个一维数组中②求出其中的最大值,并显示在窗体上。
4 请设计如下图所示窗体界面。
程序运行时,在选中一个或两个复选框和一个单选按钮时,单击命令按钮,则对文本框中的文本内容做相应的设置。
请编写适当的事件过程,完成上述功能。
5 在名称为Form1的窗体上添加一个名称为Text1的文本框;添加两个标题分别为"对齐方式"、"字体",名称分别为Fm1、Fm2的框架;在Fm1框架中添加三个单选按钮,标题分别为"左对齐"、"居中"、"右对齐",名称分别为Opt1、Opt2、Opt3;在Fm2框架中添加两个单选按钮,标题分别为"宋体"、"黑体",名称分别为Opt4、Opt5。
要求:编写五个单选按钮的Click事件过程,使程序运行时,单击这些单选按钮,可以对文本框中的内容实现相应的操作(如图所示)。
6 请设计如下图所示窗体界面。
运行程序时,先向左侧文本框中输入一个不超过10的正整数,然后选择"N的阶乘"或"(N+2)的阶乘"单选钮,即可进行计算,计算结果在右侧文本框中显示。
VB6.0课后题及常见操作题代码
第四章1、从键盘上输入4个数,编写程序,计算并输出这4个数的和及平均值。
通过inputbox 函数输入数据,在窗体上显示和及平均值。
Dim a as singleFor i=1 to 4a=inputbox(“请输入一个数:”,“数据输入”)sum=sum+an=n+1avg=sum/nnext iprint “和是:”,sumprint “平均值是:”,avg2、编写程序,要求用户输入下列信息:姓名、年龄、通信地址、邮政编码、电话,然后将输入的数据用适当的格式在窗体上显示出来。
Dim a as variantFontsize=20a=inputbox(“请输入姓名:”,“数据输入”)print “姓名:”;aa=inputbox(“请输入年龄:”,“数据输入”)print “年龄:”;aa=inputbox(“请输入通信地址:”,“数据输入”)print “通信地址:”;aa=inputbox(“请输入邮政编码:”,“数据输入”)print “邮政编码:”;aa=inputbox(“请输入电话:”,“数据输入”)print “电话:”;a3.a=5,b=2.5,c=7.8,编程序计算:y=(πab)/(a+bc)程序:Dim a as single,b as single,c as singlea=5b=2.5c=7.8pi=3.14y=(pi*a*b)/(a+b*c)print “结果是:”;y4、输入以秒为单位表示的时间,编写程序,将其转换为几日几时几秒。
Dim a as long,d as integer ,h as integer,s as integera=inputbox(“请输入秒数:”,“数据输入”)d=int(a/86400)h=int((a-d*86400)/3600)s=a-d*86400-h*3600print d;“日”;h;“时”;s;“秒”5、自由落体位移公式为:s=gt2/2+v0t其中v0为初始速度,g为重力加速度,t为经历的时间,编写程序,求位移量s。
VB教材课后习题答案
<大学程序设计基础-Visual Basic>教材课后习题答案第1章一、选择题1 2 3 4 5 6 7B D BC B B D第2章一、选择题1 2 3 4 5 6 7 8 9 10B C B C B C A A A A11 12 13 14A B A A二、填空题1.rem或’ _ :2.“” # #3.5x2-3x-2sinA/34.3214565.300三、操作题1、程序段:Private Sub Command1_Click()Dim x As Integer, y As IntegerDim s As Long, c As Longx = Text1.Texty = Text2.Texts = x * yc = (x + y) * 2Label3.Caption = "长方形的面积为" + Str(s)Label4.Caption = "长方形的周长为" + Str(c)End Sub3、程序段:Private Sub Command1_Click()Text1.Text = "第一"End SubPrivate Sub Command2_Click()Text1.Text = "第二"End Sub4、程序代码:Private Sub Text1_Change()Text1.MaxLength = 10End Sub5、程序代码:Private Sub Text1_Click()Text1.SelStart = 0Text1.SelLength = Len(Text1.Text)End Sub第3章一、选择题1 2 3 4 5 6 7D A D B A D B二、填空题1. False2.B^2-4*a*c else三、操作题1.从键盘输入三个值,判断它们能否构成三角形的三个边。
如果能构成一个三角形,则计算三角形的面积。
Vb操作题题库(含答案)
VB填空题:1、Visual Basic 6.0分为3种版本,这3种版本是______、______和______。
其中,最完整的是______。
答案:1:学习版#专业版#企业版2:学习版#专业版#企业版3:学习版#专业版#企业版4:企业版知识点:VB知识点/第一章2、可以通过______快捷键或______快捷键退出Visual Basic。
答案:1:Alt+F4#Alt+Q2:Alt+F4#Alt+Q知识点:VB知识点/第一章3、传统的程序设计语言主要是面向______的,而现在涌现出的许多可视化程序设计语言,如Visual Basic主要是面向______进行程序设计的。
答案:1:过程#问题2:对象知识点:VB知识点/第一章4、在面向对象程序设计中,对象是由______和______组成的概念。
答案:1:代码#数据2:代码#数据知识点:VB知识点/第一章5、Visual Basic开发环境中,在标题栏的方括号内能指出目前正处在______、______状态或______状态。
答案:1:设计#中断#运行#设计状态#中断状态#运行状态2:设计#中断#运行#设计状态#中断状态#运行状态3:设计#中断#运行#设计状态#中断状态#运行状态知识点:VB知识点/第一章6、在设计模式下,工程中的某个窗体没有出现,可通过双击______窗口中的相应窗体名来使之出现。
答案:1:工程资源管理器知识点:VB知识点/第一章7、Visual Basic开发环境中,当属性窗口在界面上末出现时,可使用______菜单中的______选项让它显示出来。
答案:1:视图2:属性窗口知识点:VB知识点/第一章8、在属性窗口中,属性显示方式分为两种,即按______顺序和按______顺序,分别通过单击相应的按钮来实现。
答案:1:字母#分类2:字母#分类知识点:VB知识点/第一章9、菜单命令中有"…"标记表示该命令是一个______的命令。
山东交通学院计算机VB考试上机操作题11
设a=2,b=3,c=4,d=5,则NOT a<=c OR 4*c=b^2 AND b<> a+c的值为【1】.
答案:1). False
━━━━━━━━━━━━━━━
二、判断共10题(共计10分)
━━━━━━━━━━━━━━━
第1题(1.0分)题号:227
单击并拖拽工具箱中所需的控件到窗体上即可完成添加控件任务.
答案:D
第6题(1.0分)题号:298
激活主菜单的按键是().
A:F1或Ctrl键B:Ctrl键或Atl键
C:F10或Ctrl键D:F10或Atl键
答案:B
第7题(1.0分)题号:361
下列不能打开属性窗口的操作是().
A:执行"视图"菜单中的"属性窗口"命令B:按F4键
C:按Ctrl+T D:单击工具栏上的"属性窗口"按钮
D:格式输出函数Format()可以使数值、日期或字符串按用户指定的格式输出
答案:ABD
第4题(2.0分)题号:280
请把下面说法中正确的选出来()。
A:在函数调用过程中数值型函数的默认返回值为0,可变型函数的默认返回值为空串
B:在调用Sub过程中使用Call语句时,参数必须在括号内
C:过程本身使用的参数列表称为“形参”,而主程序传递给过程的真正参数称为“实参”
C:矩形D:三角形
答案:D
第10题(1.0分)题号:860
组合框的三种不同风格:下拉组合框、简单组合框和下拉列表框由
()属性决定.
A:StyleB:BoderStyle
C:FillStyleD:DrawStyle
二级VB培训资料
二级VB培训内容一、基本操作题【考试要求】掌握窗体和控件的属性、事件和方法以及控件的画法。
【考试操作要点】1.窗体(1)属性①Name:窗体的名称②Caption:窗体标题栏中显示的标题③BackColor:窗体的背景颜色④BorderStyle:窗体的边框风格⑤ControlBox:决定窗体是否具有控制菜单⑥MaxButton :决定窗体右上角是否有最大化按钮⑦WindowState:决定窗体的正常、最大、小化状态(2)事件①Click事件:鼠标单击窗体时触发的事件②DblClick事件:鼠标单击窗体时触发的事件③Load事件:在窗体被装入内存时触发的事件(3)方法①Print方法:打印或显示信息②Cls方法:清除运行时在窗体中显示的内容注:(培训题库2,11,42,46,47,48,49,50套的题目中均有操作要求)2.标签(1)属性①Caption属性:标签中显示的内容②Name属性:标签的名称③Alignment属性:指定在标签上显示的信息的位置④BorderStyle属性:指定标签有无边框⑤AutoSize属性:指定标签是否能自动调整大小以显示所有内容⑥WordWrap属性:指定标签中文字是否能自动换行(2)事件①Click事件:鼠标单击标签时触发的事件②DblClick事件:鼠标单击标签时触发的事件注:(培训题库1,7,9,10,17,19,34,36,37,38,39,40,42,47,48,49套的题目中均有操作要求)(1)属性①Name属性:文本框控件的名称②Text属性:文本框中包含的文本内容③MaxLength属性:表示最大长度④Locked属性:决定文本框是否可以被编辑修改⑤PasswordChar属性:口令属性⑥MultiLine属性:多行属性⑦ScrollBars属性:滚动条属性⑧SelStart属性:决定选定文本的开始位置⑨SelLength属性:决定选定文本的长度⑩SelText属性:设定或存放由前两个属性选定的文本内容(2)事件①KeyPress事件:当用户按下并松开键盘上某个按键时触发该事件②Change事件:当文本的内容发生变化时触发该事件③GotFocus事件:当文本框得到焦点时触发该事件④LostFocus事件:当文本框失去焦点时触发该事件(3)方法①SetFocus方法:设置焦点,可使指定的文本框成为焦点,即将光标定位在当前文本框。
VB程序设计考试(1)
VB程序设计考试(1)一、单选题(每题1分,共50题)1.Visual Basic 6.0集成环境的主窗口中不包括( C )。
正确A.标题栏B.菜单栏C.状态栏D.工具栏2.以下不属于Visual basic的工作模式的是()模式。
正确答案:AA.编译B.设计C.运行D.中断3.如果文本框的Enabled属性被设置为False,则运行时()。
正确答案:AA.文本框中的文本将变成灰色,并且此时用户不能将光标置于文本框上B.文本框中的文本将变成灰色,用户仍然能将光标置于文本框上,但是不能改变文本框中的内容C.文本框中的文本将变成灰色,用户仍然能改变文本框中的内容D.文本框的文本正常显示,用户能将光标置于文本框上,但是不能改变文本框中的内容4.控制名称都是系统的默认控件名,下列语句错误是()。
正确答案:Dmand1.Caption=List1.Text;bel1.Caption=List1.List(1);C.List1.List(2)=List1.Text+Str(List1.ListIndex);D.Text1.Text=+Text1.Caption。
5.以下叙述中正确的是()。
正确答案:A属性用来标识对象B.窗体Name属性值显示在标题栏中C.运行时对象Name属性可变D.对象的Name属性值可以为空6.Abc%,abc!,abc$,abc#分别声明abc是()。
正确答案:AA.整型、单精度、字符串、双精度变量B.整型、整型、字符串、双精度变量C.单精度、整型、字符串、双精度变量D.整型、双精度、字符串、双精度变量7.Visual Basic的逻辑类型数据占( A )字节内存。
正确A.2B.4C.8D.168.如果逻辑与(AnD)运算的结果为真,与它所连接的两个条件必须是( C )。
正确A.前一个为真,后一个为假B.前一个为假,后一个也为假C.前一个为真,后一个也为真D.前一个为假,后一个为真9.设a=6,则执行 x=iif(a>5,-1,0)后,x 的值为( D )。
VB操作题选择结构操作题本
VB7—选择结构操作题一、操作题,每题10分,9题共90分【第1题】打开“Z:\50\工程1.vbp”,完善程序并保存。
实现功能:在文本框text1、text2、text3中输入3根小木棒的长度(假设都是整数),判断能否用它们搭成一个三角形,并把结果输出到文本框text4中。
操作要求:(1)在窗体中加载“CommandButton”控件,命名为“Command1”并设置该控件“Caption”属性值为“判断”;(2)完善程序,执行command1_click事件,判断出结果,如果能搭成三角形则在文本框text4中输出“OK”,否则输出“NO”。
Private Sub Command1_Click()Dim a, b, c As ①Let a = Val(Text1.Text)Let b = Val(Text2.Text)Let c = Val(Text3.Text)If (a + b > c) And (a + c > b) And (b + c > a) ThenLet Text4.Text = "OK"ElseLet Text4.Text = "NO"②End Sub【第2题】打开文件“考生文件夹\108\工程1.vbp”,完善Command1_Click事件代码并保存。
实现功能:判断从文本框Text1中输入的数据,如果该数据满足条件:除以3余2,除以5余3,则将该数据输出在窗体上。
Private Sub Command1_Click()Dim x As Integerx = Val(①)If x Mod 3 = 2 ThenIf ② = 3 Then Print ③End IfEnd IfEnd Sub【第3题】打开“Z:\13\工程1.vbp”,完善Command1_Click事件代码并保存。
实现功能:在Text1、Text2、Text3中输入三个整数后,单击“输出最大值”按钮后,在Label3中显示这3个数中的最大值。
VB测试题1-2章
VB第一章测试题(1)1、激活主菜单的按键是()A.F1或Ctrl键 B.Ctrl键或Atl键C.F10或Ctrl键 D.F10或Atl键2.如果设计时在属性窗口将命令按钮的()属性设置为False,则运行时按钮从窗体上消失.A.Visible B.EnabledC.DisabledPicture D.Default3.退出Visual Basic的快捷键是()A.Ctrl +Q B.Shift +QC.Alt+Q D.Ctrl+Alt+Q4.除了系统默认的工具箱布局外,在Visual Basic中还可以通过()方法来定义选项卡组织安排控件.A.在工具箱单击鼠标右键,执行快捷菜单中的“添加选项卡”命令B.执行“文件”菜单中的“添加工程”命令C.执行“工程”菜单中的“添加窗体”命令D.执行“工程”菜单中的“部件”命令5.窗体设计器是用来设计()A.应用程序的代码段 B.应用程序的界面C.对象的属性 D.对象的事件6.启动Visual Basic后,系统为用户新建的工程起一个名为()的临时名称.A.工程1 B.窗体1C.工程 D.窗体7.工程资源管理器窗口中包含的文件类型有()种.A.2 B.3C.4 D.58.Visual Basic的编程机制是()A.可视化 B.面向对象C.面向图形 D.事件驱动9.Visual Basic集成环境的大部分窗口都可以从主菜单项()的下拉菜单中找到相应的打开命令.A.编辑 B.视图C.格式 D.调试10.要在窗体上显示图片,需设置窗体的()属性.A.Caption B.IconC.Picture D.ControlBox11.每个窗体对应一个窗体文件,窗体文件的扩展名是()A..bas B..clsC..frm D..vbp12.双击窗体的任何地方,可以打开的窗口是()A.代码窗口 B.属性窗口 C.工程管理窗口 D.以上3个选项都不对13.工具栏中的“启动”按钮的作用是()A.运行一个应用程序 B.运行一个窗体C.工程管理窗口 D.打开被选中对象的代码窗口14.运行时,单击窗体将窗体的前景色设置为红色的事件过程是()A. Private Sub Form_Click( ) B.Private Sub Form_Click( )BackColor=vbRed Form1.ForeColor=vbRedEnd Sub End SubC.Private Sub Form_Click( ) D.Private Sub Form_Click( )Form1.BackColor=vbRed ForeColor=vbRedEnd Sub End Sub15.如果要在命令按钮上显示图形文件,应设置命令按钮的()A.Style属性和Graphics属性 B.Style属性和Picture属性C.Picture属性D.Graphics属性16.英文缩写OLE的含义是()A.面向对象程序设计 B.对象链接C.对象嵌入 D.对象链接与嵌入17.在设计阶段,双击窗体Form1的空白处,打开代码窗口,显示()事件过程模板.A.Form_Click B.Form_Load C.Form1_Click D.Form1_Load18.每建立一个窗体,工程管理器窗口中就会增加一个()A.工程文件 B.窗体文件C.程序模块文件 D.类模块文件19.激活属性窗口使用的键是()A.F2 B.F3 C.F4 D.F520.Visual Basic是一种()程序设计语言.A.过程式 B.非过程式C.机器 D.低级21.不能在运行期间设置窗体的()属性.A.BorderStyle B.Caption C.Icon D.MaxButton22.设在窗体上有两个命令按钮,其中一个命令按钮的名称为cmda,则另一个命令按钮的名称不能是()A.cmdc B.cmdb C.cmdA D.Command1二、填空题1. 如果要在单击钮时执行一段代码,则应将这段代码写在_______________事件过程中.2. 一个工程可以包括多种类型的文件,其中,扩展名为.vbp的文件表示___________文件;扩展名为.frm的文件表示_____________文件;扩展名为.bas的文件表示_____________文件;包含ActiveX控件的文件扩展名为__________.3. Visual Basic 6.0用于开发__________环境下的应用程序.如果要使用命令按钮表面显示文字“退出(X)”(在字符X之下加下划线),则其Caption属性设置为___________,其括号中的X表示在运行时按下____________键与单击该按钮效果相同.打开“工程窗口”的方法之一是按下______________组合键.Visual Basic的控件通常分为3种类型,即___________、___________、____________.其中,____________不能从工具箱中被删除,_____________单独保存在.OCX文件中,在必要进可以加入到工具箱中.VB第一章测试题(2)一、选择题1. 标准模块文件的扩展名为_________。
大学vb操作题解析
1,下面程序对已知数组a,删除数组中数组元素中某个元素Private Sub Command1_Click()Dim a(), key%, i%, j%a = Array(1, 6, 8, 3, 5, 9, 10, 2, 7, 4)key = Val(InputBox("输入要删除的值"))For i = 0 To UBound(a)If key = a(i) T henFor j = i + 1 To UBound(a)a(j - 1) = a(j)Next jReDim Preserve a(UBound(a) - 1)MsgBox ("删除完成")Exit SubEnd IfNext iMsgBox ("找不到要删除的元素")End Sub2,下列程序表示将输入的一个数插入到按递减的有序数列中,插入后使该序列仍有序Private Sub Form_Click()Dim a, i%, n%, m%a = Array(19, 17, 15, 13, 11, 9, 7, 5, 3, 1)n = UBound(a)ReDim Preserve a(n + 1)m = Val(InputBox("输入欲插入的数"))For i = UBound(a) - 1 To 0 Step -1If m >= a(i) Thena(i + 1) = a(i)If i = 0 Then a(i) = mElsea(i + 1) = mExit ForEnd IfNext iFor i = 0 To UBound(a)Print a(i)Next iEnd Sub3,下列程序在1000~9999之间查找满足如下条件的整数:该整数,逆向排列得到的另一个四位数是它自身的倍数(2倍以上)。
查找结果和逆向排列数分别显示在对应的列表框Private Sub Command1_Click()Dim n As IntegerDim m As IntegerDim i As IntegerFor i = 1000 To 9999m = 0n = iDo While n > 0m = m * 10 + n Mod 10n = n \ 10LoopIf m Mod i=0And m \ i > 1 Thenlist1.AddItem ilist2.AddItem m & "=" & i & "*" & m \ iEnd IfNext iEnd Sub4,将100~150之间的偶数,拆分成两个素数之和,最后输出格式如图。
vb的操作题(有答案)
vb的操作题(有答案)第一篇:vb的操作题(有答案)1.(1)在考生文件夹中有工程文件sj126.vbp,其中的窗体如图所示。
程序刚运行时,会生成一个有10个元素的整型数组。
若选中“查找最大值”(或“查找最小值”)单选按钮,再单击“查找”按钮,则找出数组中的最大值(或最小值),并显示在标签Label2中。
请去掉程序中的注释符,把程序中的?改为正确的内容。
注意:考生不得修改窗体文件中已经存在的程序。
最后把修改后的文件按原文件名存盘。
Private Sub Command1_Click()x = a(1)y = a(1)For i = 2 To 10 If Option1.Value = True Then If a(i)x Thenx = a(i)End If ElseIf a(i)< y Then y = a(i)End If Next If Option1.Value = True Then Label2.Caption = x Else Label2.Caption = y End If End Sub 2.(2)在名称为Form1的窗体上画一个名称Shape1的形状控件,在属性窗口中将其设置为圆形。
画一个名称为List1的列表框,并在属性窗口中设置列表项的值分别为1、2、3、4、5。
将窗体的标题设为“图形控件”。
单击列表框中的某一项,则将所选的值作为形状控件的填充参数。
例如,选择3,则形状控件中被竖线填充。
如图所示。
要求:程序中不得使用变量,每个事件过程中只能写一条语句。
存盘时必须存放在考生文件夹下,工程文件名为sj107.vbp,窗体文件名为sj107.frm。
在Shape控件中,可以用FillStyle属性设置图形的填充图案,0:透明,2:虚线,3:点线,4:点划线,5:双点划线,6:内实线。
List控件的Click事件过程为: Private Sub List1_Click() Shape1.FillStyle = List1.Text End Sub 3.(1)在名称为Form1的窗体上画一个文本框,名称为T ext1;再画二个命令按钮,名称分别为C1、C2,标题分别为“隐藏”、“显示”(如图所示)。
VB操作操
四、填充题(题数:2道,总分:10分)1、(选修)将数学表达式“a2+2ab+b2”按原顺序转换为VB表达式为:a^2 + 2*a*b + b^22、(选修)在字符串“Visual Basic 6.0”中截取字符串“Visual Basic”的表达式为:LEFT("Visual Basic 6.0",12)VB操作题’(1)删除①②③及下划线,填空完成程序。
'(2)从键盘输入10个100以内的整数,单击命令按钮后在窗体上输出其中的最大数,最小数和平均值'注:请不要更改原程序结构,删除①、②、③及下划线,并在对应位置填写正确的代码。
Private Sub Command1_Click()Dim x As Integerx = InputBox("请输入您的数:")Print "您输入的数有:" & x; "、";Max = x: Min = x: Sum = xFor i = 2 To 10x = InputBox("请输入您的数:"): Print x;Sum = Sum + xIf x > Max Then Max = xIf x < Min Then Min = xNext iPrint "平均值" & Sum / 10Print "最大数" & Max, "最小数" & MinEnd Sub四、填充题1、(选修)阅读如下VB程序段,运行程序后,当n的值为5时,a 的值为( 120 )。
a = 1For i=1 to na = a*iNext i2、(选修)有如下VB程序段,功能是找出100以内的奇数中能被7整除的正整数,并将它们累加起来。
程序中划线处的语句有错,正确的语名应该是:if i mod 7 =0 Then Y=Y+iY=0For i=1 to 100 step 2if i\7=0 Then Y=i+iNext iVB操作题'删除程序中的①②③及下划线,填空完成程序,运行程序使能打印下面所示的图案。
VB作业1
一、选择题(1)以下叙述中正确的是()(A)窗体的Name属性是指定窗体的名称,用来标识一个窗体(B)窗体的Name属性的值是显示在窗体的标题栏中的文本(C)可以在运行期间改变对象的Name属性值(D)Name属性值可以为空(2)若VB应用程序由一个窗体模块和一个标准模块构成,为了确保程序能够正确运行,正确的操作是()(A)只保存窗体模块文件(B)分别保存窗体模块、标准模块和工程文件(C)只保存窗体模块和标准模块文件(D)只保存工程文件(3)以下关于VB描述错误的是()(A)VB是一种可视化编程工具(B)VB是面向过程的程序设计语言(C)VB具有很强的数据库管理(D)VB采用的是事件驱动编程机制(4)以下可以激活或打开属性窗口的操作是()(A)用鼠标双击窗体的任意位置(B)执行“工程”菜单中的“属性窗口”命令(C)用鼠标窗体上的控件的任何部分(D)按F4键(5)如果在VB编程时,只有主窗口而其他窗口都是关闭的,应该从()中打开其他窗口(A)“文件”菜单(B)“插入”菜单(C)“视图”菜单(D)“工具”菜单(6)以下正确的语句是()(A)Label1.Caption = "贵州大学"(B)Label1 Caption = "贵州大学"(C)Label1. Caption "贵州大学"(D)Label1.Caption = 贵州大学(7)以下正确的语句是()(A)Label1.Print = "贵州大学"(B)Caption = "贵州大学"(C)Form1 = "贵州大学"(D)Command1.Print = 贵州大学二、操作题1、设计一个窗体,要求将窗体的最大化和最小化按钮隐藏,并将窗体的标题设为“我的第一个窗体”,窗体颜色设为红色。
当单击“显示”命令按钮时在窗体上显示“贵州大学高级设计语言VB编程”,和你的班级名和姓名;当单击“刷新”命令按钮时改变窗体颜色,并删除所有文字,如同以下界面。
VB操作题部分
Vb填空题、操作题部分试题切勿丢失VB操作题部分VB——1打开“考生文件夹\18”文件夹中的文件“工程1.vbp”,进行以下操作后并保存!填空完成程序,使程序实现如下功能:从键盘输入10个100以内的整数,单击命令按钮后在窗体上输出其中的最大数,最小数和平均值。
Private Sub Command1_Click()Dim x As Integerx = InputBox("请输入您的数:")Print "您输入的数有" & x; "、";Max = x: Min = x: Sum = xFor i = 2 To 10x = InputBox("请输入您的数"): Print x; Sum = Sum + xIf Max>x Then Max = xIf Min<x Then Min = xNext iPrint "平均值" & Sum/10Print "最大数" & Max, "最小数" & MinEnd SubVB——2打开“考生文件夹\15”文件夹中的文件“工程1.vbp”,进行以下操作后并保存!填空完成程序,使程序实现如下功能:点击“计算”按钮后,在窗体上输出“1+2+……+100”的和,并求出1到100之间能被19整除的整数的个数。
运行结果如下图:Private Sub Command1_Click()Dim i As Integer, x As IntegerDim s As Integers = 0x = 0For i = 1 To 100s=s+iIf i mod 19 =0 Then x=x+1Next iPrint "1+2+3+4...+100=" & sPrint "1到100之间能被19整除有:" & x & "个数"End SubVB——3打开“考生文件夹\9”文件夹中的文件“工程1.vbp”,进行以下操作后并保存!利用字符串函数Ucase(x)和转换函数Asc(x)填空完成程序,当单击窗体后在窗体上显示如下图所示的结果:Private Sub Form_Click()Dim str1 As String, str2 As StringDim str3 As String, i As Integerstr1 = "f"For i = 1 To 2str2 = UCase(str1)str1 = str2 & str1str3 = str3 & str1str1 = Chr(Asc(str1) + i)Next iPrint str3End SubVB——4打开“考生文件夹\8”文件夹中的文件“工程1.vbp”,进行以下操作后并保存!填空完成程序,当点击“画图”按钮时,程序能打印出下面所示的图案:@@@@@@@@@@@@@@@@@@@@@Private Sub Command1_Click()Dim i As IntegerDim j As IntegerFor i = 1 To 6Print Tab(10);For j = 1 To iPrint “@”;Next jPrintNext iEnd SubVB——5打开“考生文件夹\7”文件夹中的文件“hn-01.vbp”,进行以下操作后并保存!填空完成程序,使程序实现如下功能:已知三角形的两边分别为15、18,它们的夹角为41度,圆周率取3.14,单击“计算”按钮,在文本框Text1中显示出三角形的面积,操作完成后保存并关闭应用程序。
vb程序设计试题(含答案)
第一套试题一、选择题〔每题 2 分,共 30 分〕1.在 VB环境中,工程文件的扩展名是 ( C )〔 A〕 .frm〔B〕.bas〔C〕.vbp〔D〕.frx2.下面 4 项中不属于面向对象系统三要素的是 ( A )〔 A〕变量〔B〕事件〔C〕属性〔D〕方法、/ 、Mod、 * 这 4 个算述运算符中,优先级别最低的是( C )〔 A〕 \〔B〕/〔C〕Mod〔D〕*4.要使 Print 方法在 Form_Load事件中起作用,要对窗体的 ( C ) 属性进行设置〔 A〕 BackColor〔B〕ForeColor〔 C〕 AutoRedraw〔D〕Caption5.不管何控件,共同具有的属性是 ( B )〔 A〕 Text〔B〕Name〔 C〕 ForeColor〔D〕Caption6.要使 Form1窗体的标题栏显示“欢送使用 VB〞,以下语句正确的选项是 ( D )A〕 Form1.Caption= “欢送使用 VB〞〔B〕Form1.Caption= ˊ欢送使用 VBˊ〔 C〕 Form1.Caption= 欢送使用 VB〔D〕Form1.Caption=〞欢送使用VB〞7.VB 提供了结构化程序设计的 3 种根本结构,这 3 种根本结构是 ( D )〔 A〕递归结构,选择结构,循环结构〔B〕选择结构,过程结构,顺序结构(C〕过程结构,输入、输出结构,转向结构〔D〕选择结构,循环结构,顺序结构8. 给变量赋值 a=123+MID(“123456〞 ,3,2) ,a 变量中的值是 ( D )〔 A〕“ 12334〞〔B〕123〔C〕12334〔D〕157 下面 If 语句统计满足性别为男、职称为副教授以上、年龄小于 40 岁条件的人数,不正确的语句是 ( D )〔 A〕 If sex= “男〞 And age<40 And InStr(duty,“教授〞)>0 Then n=n+1B〕 If sex= “男〞 And age<40 And (duty= “教授〞 Or duty= “副教授〞 ) Then n=n+1〔 C〕 If sex= “男〞 And age<40 And Right(duty,2)=“教授〞Then n=n+1〔 D〕 If sex=“男〞 And age< 40 And duty= “教授〞 And duty= “副教授〞 Thenn=n+110. 假设要去除列表框的所有内容,可用来实现的方法是( C )〔 A〕 RemoveItem〔B〕Cls〔 C〕 Clear〔D〕以上均不可以11.要使时钟控件 Timer1 的 Timer 事件不起作用,以下正确的语句是 ( B ) 〔 A〕 Timer1.Visible=False〔B〕Timer1.Enabled=False〔 A〕 Timer1.Interval=1000〔D〕Timer1.Index=0引用列表框 (List1) 最后一个数据项应使用的语 ( B )(A)List1.List(List1.ListCount) (B)List1.List(List1.ListCount-1)(C)List1.List(ListCount)(D)List1.List(ListCount-1)13.如下数组声明语句,正确的选项是 ( B )〔 A〕 Dim a[3,4]As Integer 〔 C〕 Dim a(n,n) As Integer 〔B〕Dim a(3,4)As Integer 〔D〕Dim a(3,4)As Integer14.下面子过程语句说明合法的是 (A 、D )〔 A〕 Sub f1(ByVal n%) 〔 C〕 Function f1%(f1%) 〔B〕Sub f1(n%)As Integer 〔D〕Function f1(ByVal n%)15.假定有如下的命令按钮 ( 名称为 Command1)事件过程:Private Sub Command1_Click()x=InputBox(" 输入: " , " 输入整数 ")MsgBox"输入的数据是:〞,,〞输入数据:"+xEnd Sub16. 程序运行后,单击命令按钮,如果从键盘上输入整数10,那么以下表达中错误的是(A)〔 A〕x 的值是数值 10〔B〕输入对话框的标题是“输入整数〞(C〕信息框的标题是“输入数据: 10〞〔 D〕信息框中显示的是“输入的数据是:〞二、填空题〔每题 2 分,共 20 分〕1、当进入 VB集成环境后,发现没有显示“工具箱〞窗口,应选择视图菜单的工具箱选项,使“工具箱〞窗口显示。
全国计算机二级VB操作试题及答案
全国计算机二级VB操作试题及答案全国计算机二级VB操作试题及答案现如今,我们最熟悉的就是试题了,试题是考核某种技能水平的标准。
什么样的试题才能有效帮助到我们呢?下面是店铺带来的.全国计算机二级VB操作试题及答案,希望对你有帮助。
一、选择题(每小题1分,共40小题,共40分。
)1数据库系统的三级模式不包括()。
A.概念模式B.内模式C.外模式D.数据模式2下列描述中正确的是()。
A.VisualBasic只能通过过程调用执行通用过程B.可以在Sub过程的代码中包含另一个Sub过程的代码C.可以像通用过程一样指定事件过程的名字D.Sub过程和Function过程都有返回值3下列数据结构中,能够按照“先进后出”原则存取数据的是()。
A.循环队列B.栈C.队列D.二叉树4在窗体上面画一个命令按钮和一个标签,其名称分别为Command1和Label1,然后编写如下代码:SubS(XAsInteger,yAsInteger)StaticzAsIntegery=x*x+Zz=yEndSubPrivateSubCommand1Click()DimiAsInteger.zAsIntegerm=0z=0Fori=1T03Si,Zm=m+zNextiLabel1.Caption=Str(m)程序运行后,单击命令按钮,在标签中显示的内容是()。
A.50B.20C.14D.75下列关于文件的叙述中,错误的是()。
A.使用Append方式打开文件时,文件指针被定位于文件尾B.当以Input打开文件时,如果文件不存在,则自动建立一个新文件C.顺序文件的各个记录的长度可以不同D.随机文件打开后.既可以进行读操作,也可以进行写操作【全国计算机二级VB操作试题及答案】。
- 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。
1Next iPrint str3End SubVB——4打开“考生文件夹\8”文件夹中的文件“工程1.vbp”,进行以下操作后并保存!填空完成程序,当点击“画图”按钮时,程序能打印出下面所示的图案:@@@@@@@@@@@@@@@@@@@@@Private Sub Command1_Click()Dim i As IntegerDim j As IntegerFor i = 1 To 6Print Tab(10);For j = 1 To iPrint “@”;Next jPrintNext iEnd SubVB——5打开“考生文件夹\7”文件夹中的文件“hn-01.vbp”,进行以下操作后并保存!填空完成程序,使程序实现如下功能:已知三角形的两边分别为15、18,它们的夹角为41度,圆周率取3.14,单击“计算”按钮,在文本框Text1中显示出三角形的面积,操作完成后保存并关闭应用程序。
Private Sub Command1_Click()a = 15b = 18s = 0.5 * a * b * sin(41 * 3.14 / 180)text1.text = sEnd SubVB——6打开“考生文件夹\14”文件夹中的文件“工程1.vbp”,进行以下操作后并保存!填空完成程序,使程序实现如下功能:制作一个成绩等级程序,要求在文本框Text1中输入成绩,点击“等级”按钮时,显示相应的等级。
具体等级划分为:90分以上为“优”,80到89分为“好”,70到79分为“良”,60到69分为“及格”,60分以下为“不及格”。
Private Sub Command1_Click()Dim x As Integer, grade As Stringx = text1.textSelect Case xCase 90 To 100grade = "优"Case 80 To 89grade = "好"Case 70 To 79grade = "良"Case 60 To 69grade = "及格"Case Is < 60grade = “不及格”Case ElseMsgBox "请重新输入"End SelectPrint "该学生成绩为:" + gradeEnd SubVB——7打开“考生文件夹\12”文件夹中的文件“工程1.vbp”,进行以下操作后并保存!填空完善程序,使程序实现如下功能:在窗体上有Text1、Text2两个文本框,在文本框Text1中输入1到20之间的整数(包括1和20),然后单击命令按钮Command1则在Text2中显示50。
Private Sub Command1_Click()n = Text1.textSelect Case nCase 1 to 20x = 50 Case 2, 4, 6 x = 20Case Is < -10 x = 30Case 15x = 40End SelectText2.Text = x End SubVB——9打开“考生文件夹\11”文件夹中的文件“工程1.vbp”,进行以下操作后并保存!填空完成程序,使程序实现如下功能:程序运行后,在文本框Text1中输入“abcd”,单击命令按钮,在标签Label1中显示出“bcd”。
Private Sub Command1_Click()strtext = InputBox("请输入")Text1.Text = strtextEnd SubPrivate Sub Text1_Change()Label1.Caption = Right(Trim(Text1.text),3) End SubVB——10打开“考生文件夹\21”文件夹中的文件“工程1.vbp”,进行以下操作后并保存!填空完成程序,使程序实现如下功能:输入车程公里数,单击按钮“应收车费”后,在Label1输出车程,在Label2中输出车费。
收费标准:车程在3公里以内(包括3公里)的统一收费12元;超过3公里但不超过10公里的(包括10公里),则超过3公里的部分每公里收费2元;如果车程超过10公里,则超过10公里的部分每公里收费3元。
Private Sub Command1_Click()x = Val(Text1.Text)If x > 0 And x <= 3 Then y=12If x > 3 And x < 10 Then y = 12 + (x - 3) * 2If x > 10 Then y = 26+(x-10)* 3 If x <= 0 Then y = 0Label1.Caption = x & "公里"Label2.Caption = y & "元"End SubVB——8打开“考生文件夹\10”文件夹中的文件“工程1.vbp”,进行以下操作后并保存!填空完成程序,使程序实现如下功能:填空完成程序,使程序实现如下功能:程序运行后,单击“初始值”命令按钮对数组a的各元素赋值;单击“求和”命令按钮,求出数组a的各元素之和,并在Text1中显示出来,最后的结果如下图所示。
Dim a(4, 3) As IntegerDim i, j As IntegerPrivate Sub Command1_Click()For i = 1 To 4For j = 1 To 3a(i,j)= i + jNext jNext iEnd SubPrivate Sub Command2_Click()For j = 1 To 4For i = 1 To 3s = s + a(j,i)Next iNext jText1.Text = Text1.textEnd Sub四Array程IfcPrivate Sub Command1_Click()注:表达式中多余的空格不要保留,例如a应写成“a+b=c”,而不要写成“a + b = c”的形式,但形如“a or b”表达式中的空格要保留。
15. (选修)下面是一段Visual Basic程序,运行该程序后,语句sum=sum+i*(i+1)共执行了Text1中最后输出结果是190。
Private Sub Command1_Click( )Dim sum , i As Integersum = 0For i = 1 To 9 Step 2六“a 20.(选修)填空完成程序,实现向Text1文本框中输入七补充知识点121属性对象.属性=属性值对象中属性可以在设计界面时通过属性窗中设置,也可以在运行时通过程序代码设置,方法如下例:给文本框“Txt123”的“Text”属性赋值为字符串“20”,代码如下Txt123.text =”20”变量=对象.属性如果要获取对象的状态或特性,这时就要读取对象的属性值,方法如下例:读取文本框“txt123”的“Text”属性的代码如下a = txt123.text3.流程图标识八Trim函数实例Dim a as stringDim b as stringa=”I’am a student”b=trim(a)--------这时候b=”I’amastudent”Trim函数主要去掉语句中的空格。
4.循环语句格式一:Do While 条件循环体Loop当VB执行Do While-Loop循环时,先判断指定的条件是否为真,若条件为真,执行循环体,条件为假时退出循环。
(这种循环结构我们也称之为当循环)格式二:Do循环体Loop Until条件这种循环的执行过程如图所示。
进入循环体后,先执行一次循环体A,然后再检查条件P是否成立。
如果不成立,就重复执行循环体A,直到条件P成立退出循环体。
格式三:For...Next循环放置在另一个For...Next循环中,组成嵌套循环。
不过在每个循环中的counter 要使用不同的变量名。
下面的体系结构是正确的:For I = 1 To 10For J = 1 To 10For K = 1 To 10...Next KNext JNext I嵌套循环先执行内部的循环体后执行外不循环体,内外循环体是相对的。
内部循环体执行一个周期,外部循环体执行一次。
以这个实例,k执行了1000次,j执行了100次,i执行了10次。
5.数组数组是一组相同类型的数据的集合。
数组用一个统一的名字代表逻辑上相关的一批数据。
每个元素用下标变量来区分。
数组使用必须先声明后使用。
一维数组声明格式Dim 数组名([<下界>to]<上界>)[As<数据类型>]例1 dim a(1 to 10) As Integer ‘a数组有10个元素或者: Dim 数组名[<数据类型符>]([<下界>to]<上界>)dim a%(1 to 10)通过循环给数组赋值For i= 1 to 10a(i)=inputbox(“输入第(”& I &”)的值) ‘循环10次,每次填入一个数字分别存入a(1),Next I a(2),a(3)……a(10)九。