杭州市VB会考模拟卷

合集下载

浙江省高中信息技术选考加试题VB专项练习题十一及答案

浙江省高中信息技术选考加试题VB专项练习题十一及答案

浙江省高中信息技术选考加试题VB专项练习题十一一、选择题:本大题13小题,第小题2分,共26分。

在每小题给出的四个选项中,只有一个是符合题目要求的。

1.下列VB语句或函数表达式的数值小于-4的是:(A)Int(-5.6) (B)Abs(-3.6) (C)Cos(-3.6) (D)Len("-3.6")2.要存储如下形式的16个数据,合适的数组定义语句是:1 0 0 00 1 0 00 0 1 00 0 0 1(A)Dim s(16) as integer (B)Dim s(1 to 16) as integer(C)Dim s(1 to 4,1 to 4) as integer (D)Dim s(1 to 16,1 to 16) as integer3.下列可作为VB变量名的是:(A)text(B)Zhoushan! (C)1_dim (D)Caption_14.数学表达式log5写成VB表达式是:(A)log(5) (B)log5 (C)log(5)/log(10) (D)ln(5)5.在VB中定义变量s用于存放学生家庭地址,则正确的定义语句是:(A)Dim s as integer (B)Dim s as string(C)Dim s as single (D)Dim no as boolean6.已知s的逻辑值为false,m的逻辑值为true。

以下VB表达式的结果为false的是:(A)s and m (B)not s and m (C)s or m (D)not s or not m7.某VB程序代码如下:Private Sub Command1_Click()a = 30For i = 1 To 10 Step 2s = s + i \ 3Next iPrint sEnd Sub则程序运行后的a的值分别是:(A)4 (B)7 (C)10 (D)148.为了搜索出1000以内的所有素数,我们可以采用的算法是:(A)枚举算法(B)二分查找(C)解析算法(D)选择搜索9.下列能实现求两个数X和Y中较大数(用变量max保存较大数)的程序段个数是:①if x>=y then max=x else max=y②max=xIf y>max then max=y③if x<y thenT=x: x=y: y=tEnd ifmax=x④if x>=y then max=y else max=x(A)1 (B)2 (C)3 (D)410.在VB中用变量C表示计数器,则计数器的表达式是:(A)C=0 (B)C=1 (C)C+1=C (D)C=C+111.下列控件都有的属性是:(A)name (B)caption (C)text (D)click12.某数组有7个元素,依次是23、35、55、57、76、88、98,若采用二分查找法在该数组中查找数据98,需要查找的次数是:(A)1 (B)2 (C)3 (D)413.某VB程序代码如下:Private Sub Command1_Click()For i = 1 To 10s = s + sina(i)Next iPrint sEnd Sub其中sina是一个自定义函数,则程序运行后的出错信息是:A BC D二、综合题:本大题5小题,其中第14题2分,第15题4分,第17题4分,第18题5分,共19分。

浙教版VB学考专题训练(word版,无答案)

浙教版VB学考专题训练(word版,无答案)

浙教版VB 学考专题训练(word 版,无答案)1 / 12一. VB 学考题1.【2018 年 12 月浙江省重点中学期末热身联考】某多选题共有6个候选项(A 、B 、C 、D 、E 、F ),得分规则是:全部答对得2 分,部分答对得1 分,未作答或有错误答案0 分。

设计一个能够评分的程序,要求如下:在文本框Text1中输入标准答案,在文本框Text2 中输入学生答案。

点击评分按钮Command1 后,将得分显示在标签Label4 中。

程序界面如第14 题图所示:(1)要使程序运行后,窗体Form1的标题栏中显示“评分”,正确的做法是(单选,填字母:A .将窗体的Text 属性改为“评分”B .在Form1_Load()事件中输入代码Form1. Caption=“ 评分”C. 在Form1_Load() 事件中输入代码Form .Name=“评分”);(2)实现上述功能的程序如下,请在划线处填入合适的代码:Private Sub Command1_Click()Dim cans As String , ans As String ,c As String ,count As IntegerDim f(1 To 6) As Booleancans = Text1.Text:ans = Text2.Textcount = 0For i = 1 To Len(cans) c= Mid(cans, i, 1)f(Asc(c) - 64) = TrueNext i For i = 1 Toc = Mid(ans, i, 1)If f(Asc(c) - 64) = False Thencount = 0: Exit ForElsecount = count + 1End IfNext iIf count = 0 ThenLabel4.Caption = "0 分"ElseIf ThenLabel4.Caption = "2 分"ElseLabel4.Caption = "1 分"End IfEnd Sub(3)若去除加框处代码,且将文本框Text2 的内容改为“BCD ”,标签Label4 显示的内容 是 。

vb第五套模拟题及答案

vb第五套模拟题及答案

学 院: 专 业: 学 号: 姓 名: 教学班号:云南农业大学计算机公共课VB 第五套模拟题本试题满分100分,考试时间120分钟。

一、选择题(每题2分,共50分)1.在正确的安装VB 后,可以通过多种方式启动VB ,在以下方式中不能启动VB 的是( ) A . 通过“开始”菜单中的“程序”命令B . 通过“我的电脑”找到VB6.exe ,双击该文件名C . 通过“开始”菜单中的“运行”命令D . 进入DOS 方式,执行VB6.exe 2.VB 窗体设计器的主要功能是( )A .建立用户界面B .编写源程序代码C .添加图D .显示文字 3.同时改变一个活动控件的高度和宽度,正确的操作是( ) A . 拖拉控件4个角上的某个小方块 B . 只能拖拉位于控件右下角的小方块 C . 只能拖拉位于控件左下角的小方块D . 不能同时改变控件的高度和宽度 4.下列变量命名正确的是( )A .myfileB .vb 1C .page @2D .cmd.1 5.以下关于变量类型说明符的使用正确的是( ) A .Dim a% : a=9000 B .Dim a : a=2000% C .Dim a : a#=”OK” D .Dim a : a&=True6.DataTime 是一个Data 类型的变量,以下赋值语句中错误的是() A .DataTime=#5/14/01# B .DataTime=#September 1,2001# C .DataTime=#12:15:00 AM# D .”8/8/99”7.语句Print Sgn(-6^2)+Abs(-6^2)+Int(-6^2)的输出结果是( ) A .-36 B .1 C .-1 D .-728.窗体上有一组合框Combo1,并将下列项“Chardonnay ”、“FunBlanc ”、“Gewrzt ”和“Zinfande ”放置到组合框中,当窗体加载时的代码如下: Private Sub Form_Load()Combo1.AddItem "Chardonnay" Combo1.AddItem "FunBlanc" Combo1.AddItem "Gewrzt" Combo1.AddItem "Zinfande"第1页(共 7 页)密封线End Sub要在文本框Text1中显示列表中的第三个项目的正确语句是()A.Text1.Text=Combo1.List(0) B.Text1.Text=Combo1.List(1)C.Text1.Text=Combo1.List(2) D.Text1.Text=Combo1.List(3)9.假定窗体上有一个文本框,名为Txt1,为了使该文本框的内容能够换行,并且具有水平的垂直滚动条,正确的属性设置为()A.Txt1.MultiLine = True B.Txt1.MultiLine = TrueTxt1.ScrollBars = 0 Txt1.ScrollBars = 3C.Txt1.MultiLine = False D.Txt1.MultiLine = FalseTxt1.ScrollBars = 0 Txt1.ScrollBars = 310.执行下面的语句后,所产生的信息框的标题是()a = MsgBox("AAAA", "BBBB", "", 5)A.BBBB B.空C.AAAA D.出错,不能产生信息框11.为了了取消窗体的最大化功能,需要把它的一个属性设置为False,这个属性是()A.ControlBox B.MinButton C.Enabled D.MaxButton12.当拖动滚动条中的滚动块时,将触发滚动条的事件是()A.Move B.Change C.Scoll D.SetFocus13.下列可以把当前目录下的图形文件pic1.jpg装入图片框Picture1中的语句是()A.picture=”pic1.jpg”B.Picture1.Handle=”pic1.jpg”C.Picture1.Picture=LoadPicture(”pic1.jpg”)D.Picture=LoadPicture(”pic1.jpg”)14.在用通用对话框控件建立“打开”或“保存”文件对话框时,如果需要指定文件列表框所列出的文件类型是doc文件,则正确的描述格式是()A.”text(.doc)|(*.doc)”B.”文本文件(.doc)|(*.doc)”C.”text(.doc)||(*.doc)”D.”text(.doc)(*.doc)”15.文件列表框的Pattern属性的作用是()A.显示当前驱动器或指定驱动器上的目录结构B.显示当前驱动器或指定驱动器上的某目录下的文件名C.显示某一类型的文件D.显示该路径下的文件16. 要改变新建对象的缺省名称,应使用属性____。

浙江省信息技术学考VB阶段练习(一)

浙江省信息技术学考VB阶段练习(一)

VB阶段练习(一)班级_________姓名_________学号____________一、综合练习1、赋值语句的一般形式。

2、当系统执行一个赋值语句时,先求出“=”的值,然后再把该值保存到“=”中,这就是“赋值”。

3、针对语句IfI=1thenJ=1,下列说法正确的是( )A. I=1 和J=1均为赋值语句B. 均为关系表达式C. I=1为关系表达式,J=1为赋值语句D.I=1为赋值语句,J=1为关系表达式4、下面给出的赋值语句中错误的是()A.x=x=y B.x+y=3 C.Label1.Caption="hello" D.x=-b5、以下是一段VB程序:a=1b=a+1c=a+b它的基本结构属于()A、顺序结构B、选择结构C、循环结构D、树型结构6、下列VB程序运行后,变量x的值为( ).x=2Printx+lPrintx+2A、2B、3C、5D、87、交换两个变量中的数据,把下面代码补充完整,并在右边画出两个变量交换示意图PrivateSubcmdSwap_Click()DimxAsSingle,yAsSingleDimmAsSinglex=Val(txtsx.Text)y=Val(txtsy.Text)'交换数据txtdx.Text=Str(x)txtdy.Text=Str(y)EndSub8、行If语句行If是指在一行中写完的If语句。

其一般格式为:格式一:If条件Then语句执行这种形式的If语句时,首先对条件进行判断。

若条件成立,则执行Then后面的语句;若条件不成立,则执行If语句后继程序行的语句例:if3>1then a=10格式二:If条件Then语句1Else语句2例:输入三个不相同的数,求出其中最小数。

PrivateSubForm_Click()Dima AsSingle,bAsSingle,cAsSingleDimMin AsSinglea=val(text1.text)b=val(text2.text)c=val(text3.text)Ifa<bThen ElseMin=bIf ThenMin=cPrint"最小数=";MinEndSub 1;否则执行语句2。

vb模拟试题全套

vb模拟试题全套

vb模拟试题全套1.下列关于程序设计的说法正确的是( B )A 、程序设计就是指示计算机如何去解决问题或完成一组可执行指令的过程B 、程序设计就是寻求解决问题的方法,并将其实现步骤编写成计算机可以执行的程序的过程C 、程序设计语言的发展经历了机器语言、汇编语言到高级语言的过程,比较流行的高级语言是pascal 、fortran 、excel 、c++等。

D 、程序设计语言和计算机语言是同一概念的两个方面2 C )A 、算法的开始或结束B 、输入输出操作C 、处理或运算的功能D 、用来判断条件是否满足需求3.Integer 类型的变量可存的最大整数为( C )。

A 、256B 、32768C 、32767D 、655364.代数表达式221gt 改成VB 表达式后,错误的是(D )A 、g*t^2/2 B 、g*t*t/2 C 、1/2*g*t^2 D 、gt^2/25.对于窗体,click (单击)是它的一个( C )A 、重要对象B 、重要方法C 、重要事件D 、重要属性6.下列变量名写法错误的是( D )B 、abc123C 、abc_123D 、123abc7.在VB 中,下列( B )函数是求绝对值的。

A 、int (x )B 、abs (x )C 、sqr (x )D 、gn (x )8.在VB 中,设置控件的大小,可改变下列( A )属性A 、height 与widthB 、heigth 与topC 、 left 与topD 、left 与width9.以下是一段vb 程序:a=1b=a+1c=a+b它的基本结构属于( A )A 、顺序结构B 、选择结构C 、循环结构D 、树型结构10、下列程序段运行后,V alue 的值为( A )x=20if x>=10 thenValue=5*xElseValue=4*xEnd ifB 、80C 、90D 、7011、下面是判断变量x 是不是能被5整除的偶数的程序,横线上的逻辑表达式应为(A 、B ) Private Sub Command1_Click() Dim x As Integerx = Val(text1.Text)If ________________ Thenlabel1.Caption = "这个数是能被5整除的偶数"label1.Caption = "这个数不是能被5整除的偶数"End IfEnd SubA、(x Mod 5) = 0 And (x Mod 2) = 0B、x Mod 10 = 0C、x Mod 5 = 0D、x Mod 2 = 012、阅读下面程序,单击窗体后,在窗体上输出的是(A )Private Sub form_Click()Dim i As IntegerDim s As Integers = 0For i = 1 To 5s = s + iNext iPrint s, iEnd SubA、15 6B、s=15 i=6C、6 5D、s=6 i=513、阅读下面程序,单击窗体后,在文本框text1中显示的内容是(A )Private Sub form_Click()Dim int1 As IntegerDim int2 As Integerint1 = 1int2 = 0Do While int1 < 20int2 = int1 + int2int1 = int1 * (int1 + 1)LoopText1.Text = int2End SubA、9B、8C、7D、614、下列程序段中,循环体执行的次数是(B )y=2do while y<=8y=y+yloopA、2B、3C、4D、515、设计一个程序,打印下面所示的图案程序:Private Sub Form_click()Dim i As Integer '定义i为整型变量Dim j As Integer '定义j为整型变量For i = -3 To 3Print Tab(Abs(i) + 5) '确定每行的起始位置For j = 1 To (4 -Abs(i)) - 1Print "*";Next jPrintNext iEnd Sub16、编写程序,求??>+-≤+=)0(1)0(122x x x x x y 的值。

2023年7月浙江省杭州市普通高中学业水平合格考试模拟数学试题 (2)

2023年7月浙江省杭州市普通高中学业水平合格考试模拟数学试题 (2)

一、单选题二、多选题1.已知命题,,则为( )A.,B .,C.,D .,2. 已知则A.B.C.D.3. 若,则=( )A.B .7C.D .-74. 下列关于函数的命题正确的是A .函数在区间上单调递增B.函数的对称轴方程是()C.函数的对称中心是()()D .函数以由函数向右平移个单位得到5. 给出以下四个命题:①依次首尾相接的四条线段必共面;②过不在同一条直线上的三点,有且只有一个平面;③空间中如果一个角的两边与另一个角的两边分别平行,那么这两个角必相等;④垂直于同一直线的两条直线必平行.其中正确命题的个数是( )A .0B .1C .2D .36. 设数列的前项和为,若,则( )A .0B .-2C .4D .27. 关于复数的命题,下列正确的为A .复数的模为1B .复数的虚部为C.D .若(,),则8. 函数的所有零点的乘积为,则( )A.B.C.D.9.如图,正方体的棱长为1,P是线段上的动点,则下列结论正确的是()A.四面体的体积为定值2023年7月浙江省杭州市普通高中学业水平合格考试模拟数学试题 (2)2023年7月浙江省杭州市普通高中学业水平合格考试模拟数学试题 (2)三、填空题四、解答题B.的最小值为C .平面D .当直线与AC 所成的角最大时,四面体的外接球的体积为10. 点在函数的图象上,当,则可能等于( )A .-1B.C.D .011.如图所示,在正方体中,E 是棱的中点,F 是侧面,(包含边界)内的动点,且平面,下列说法正确的是()A .与BE 是异面直线B .不可能与平行C .DF 不可能与平面垂直D .三棱锥的体积为定值12.已知向量满足,,且,则( )A.B.C.与的夹角为D.与的夹角为13.已知命题, 则:_______.14. 如图,已知正方体的棱长为分别是棱的中点,点为底面四边形内(包括边界)的一动点,若直线与平面无公共点,则点在四边形内运动所形成轨迹的长度为__________.15. 已知f (x )=sin(ω>0),f ()=f (),且f (x)在区间上有最小值,无最大值,则ω=_____.16. 已知函数.(1)若函数为偶函数,求a 的值;(2)若函数的最小值为8.求a 的值.17. 某商场在开业当天进行有奖促销活动,规定该商场购物金额前200名的顾客,均可获得3次抽奖机会,每次中奖的概率为,每次中奖与否相互不影响,中奖1次可获得50元奖金,中奖2次可获得100元奖金,中奖3次可获得200元奖金.(1)求顾客甲获得了100元奖金的条件下,甲第一次抽奖就中奖的概率;(2)若该商场开业促销活动的经费为1.5万元,则该活动是否会超过预算?请说明理由.18. 已知复数(是虚数单位)在复平面上对应的点依次为,点是坐标原点.(1)若,求的值;(2)若点的横坐标为,求.19. 2015年7月9日21时15分,台风“莲花”在我国广东省陆丰市甲东镇沿海登陆,造成165.17万人受灾, 5.6万人紧急转移安置,288间房屋倒塌,46.5千公顷农田受灾,直接经济损失12.99亿元,距离陆丰市222千米的梅州也受到了台风的影响,适逢暑假,小明调查了梅州某小区的50户居民由于台风造成的经济损失,将收集的数据分成,,,,五组,并作出如下频率分布直方图(图1):(1)试根据频率分布直方图估计小区平均每户居民的平均损失;(同一组中的数据用该组区间的中点值作代表);(2)小明向班级同学发出倡议,为该小区居民捐款,现从损失超过4000元的居民中随机抽出2户进行捐款援助,求抽出的2户居民损失均超过8000元的概率;(3)台风后区委会号召该小区居民为台风重灾区捐款,小明调查的50户居民捐款情况如下表,在图2表格空白外填写正确数字,并说明是否有95%以上的把握认为捐款数额超过或不超过500元和自身经济损失是否超过4000元有关?经济损失不超过4000元经济损失超过4000元合计捐款超过500元30捐款不超过500元6合计附:临界值参考公式:,.0.150.100.050.0250.0100.0050.0012.072 2.7063.841 5.024 6.6357.87910.82820. 设数列满足.(1)求的通项公式(2)记数列的前n项和为,是否存在实数k,使得对任意恒成立?若存在,求出k的最小值;若不存在,请说明理由.21. 某晚报曾刊登过一则生活趣事,某市民唐某乘坐出租车时,在半途中骂骂咧咧要求司机临时停靠,打表计价结账,然后重新计价,继续前行,该市民解释说,根据经验,这样分开支付车费比一次性付费便宜一些,他的这一说法有道理吗?确实,由于出租车运价上调,有些人出行时会估计一下可能的价格,再决定是否乘坐出租车.据了解,2018年上海出租车在5时到23时之间起租价为14元/3千米,超起租里程单价为2.50元/千米,总里程超过15千米(不含15千米)部分按超起租里程单价加50%.此外,相关部门还规定了低速等候费和其他时段的计价办法,以及适合其他车型的计价办法.你乘坐过出租车吗?你会仿效那位市民唐某的做法吗?为什么?(1)根据上述情境你能提出什么数学问题?为了解决你的问题,你能否作出一些合理假设?(2)你能否根据你的假设建立数学模型,并回答你所提出的问题.。

高中会考vb试题及答案

高中会考vb试题及答案

高中会考vb试题及答案高中会考VB试题及答案一、选择题(每题2分,共20分)1. 在Visual Basic中,以下哪个是正确的变量声明方式?A. Dim xB. Dim x As IntegerC. Dim x = 10D. Dim x As Integer = 10答案:B2. 下列哪个是Visual Basic中的循环结构?A. IfB. ForC. Select CaseD. Sub答案:B3. Visual Basic中的“End”语句用于结束什么?A. 程序B. 过程C. 循环D. 条件答案:B4. 在Visual Basic中,以下哪个不是内置的控件?A. LabelB. TextBoxC. ButtonD. Slider答案:D5. 下列哪个是Visual Basic中的数组声明方式?A. Dim arr(5) As IntegerB. Dim arr As Integer = 5C. Dim arr = New Integer(5)D. Dim arr As Integer(5)答案:A6. 在Visual Basic中,以下哪个是正确的条件语句?A. If x > 10 ThenB. If x > 10C. If x > 10D. If x > 10 End If答案:A7. Visual Basic中,以下哪个是正确的函数调用?A. Call Print("Hello World")B. Print "Hello World"C. Call Print("Hello World")D. Print("Hello World")答案:D8. 下列哪个是Visual Basic中的事件?A. ClickB. EventC. FunctionD. Procedure答案:A9. 在Visual Basic中,以下哪个是正确的类声明方式?A. Class MyClassB. Dim MyClassC. Sub MyClassD. Function MyClass答案:A10. 下列哪个是Visual Basic中的错误处理语句?A. TryB. CatchC. FinallyD. All of the above答案:D二、填空题(每空2分,共20分)1. 在Visual Basic中,使用________来定义一个类。

浙江省高中信息技术选考加试题VB专项练习题三及答案

浙江省高中信息技术选考加试题VB专项练习题三及答案

浙江省高中信息技术选考加试题VB专项练习题三一、选择题:本大题13小题,第小题2分,共26分。

在每小题给出的四个选项中,只有一个是符合题目要求的。

1.下列问题能用算法解决的是:(A)求出所有偶数的和(B)利用计算机证明任何一个偶数都可以用二个素数的和来表示(C)要求计算机在1年内统计出宇宙中所有星星的数量(D)为了鉴定一篇文章是否抄袭了另外一篇文章,用计算机比较两篇文章的相似度2.下列可作为VB变量名的是:(A)len (B)sqrter (C)93edu (D)dim3.下面语句中的等号“=”作用与其它选项不同的是:(A)if a=b then (B)do while x=y+5(C)if not(F) then x=5 (D)if Mpos+w10=9 then4.将数学表达式ln5+2ab写成VB表达式,正确的是:(A)Log(5)+2ab(B)Ln(5)+2*a*b(C)log(5)+2*a*b (D)Log(5)/log(10)+2ab5.有如下VB程序段x="45"y="25"c=val(x+y)该段程序执行后,变量c的值是:(A)4525 (B)70 (C)25 (D)456.某VB程序代码如下:Private Sub Command1_Click()a = "330903"For i = 1 To Len(a)x = Mid(a, i, 1) + xNext iPrint xEnd Sub则程序运行后的输出结果是:(A)330903 (B)030933 (C)309033 (D)3303097.已知x是一个字符,下面有关VB语句“y=chr(asc(x)+1)”的作用说法正确的是:(A)y代表x后面一个字符(B)y代表x后面一个字符的ASCII码值(C)x代表y后面一个字符(D)x代表y后面一个字符的ASCII码值8.有如下VB程序段用于计算并联电阻的值,假设输入的电阻值都大于10。

VB会考理论题(张整理汇总情况)

VB会考理论题(张整理汇总情况)

VB会考理论题练习姓名学号一、选择题C 1.计算机能够直接识别和处理的语言是。

A、汇编语言B、自然语言C、机器语言D、高级语言D 2.Visual Basic是一种语言。

A、汇编B、自然C、机器D、高级C 3.Visual Basic语言是一种面向的高级语言。

A、机器B、过程C、对象D、用户B 4.Visual Basic集成环境的大部分窗口都可以从主菜单项的下拉菜单中找到相应的打开命令。

A、编辑B、视图C、格式D、调试A 5.新建一个工程,将其窗体的Name属性设置为MyFirst,则默认的窗体文件名为。

A、Form1.frmB、工程1.frmC、MyFirst.frmD、Form1.vbpB 6.窗体设计器是用来设计。

A、应用程序的代码段B、应用程序的界面C、对象的属性D、对象的事件C 7.在Visual Basic中,建立一个文本编辑区域,可采用下列控件。

A、命令按钮B、标签C、文本框D、时钟控件B 8.每建立一个窗体,工程管理器窗口中就会增加一个。

A、工程文件B、窗体文件C、程序模块文件D、类模块文件B 9.在设计阶段,双击窗体Form1的空白处,打开代码窗口,显示事件过程模板。

A、Form_Click B、Form_Load C、Form1_Click D、Form1_LoadD 10.要改变控件的左边位置,应改变属性。

A、HeightB、WidthC、TopD、LeftC 11.要改变新建对象的缺省名称,应使用属性。

A、FontB、ForeColorC、NameD、CaptionC 12.要使一个命令按钮显示文字“确定”,正确的设置是把该命令的。

A、属性Font设置为“确定”B、属性FontColor设置为“确定”C、属性Caption设置为“确定”D、属性BorderStyle设置为“确定”C 13.要把一个命令按钮设置为默认按钮,应设置其属性值为True。

A、VisibleB、EnabledC、DefaultD、CancelD 14.把窗体设置为不可见,应该将其属性设置为False。

VB会考试题

VB会考试题

VB程序设计语言命题试卷一、选择题(2分/题,共30分)()1.下列不属于对象的基本特征的是 _A、属性B、方法C、事件D、类()2.如果要改变窗体的标题,需要设置窗体对象的属性。

A、NameB、CaptionC、BackColorD、BorderStyle()3A、双击鼠标可以触发DblClick事件B、窗体或控件的事件的名称可以由编程人员确定C、移动鼠标时,会触发MouseMove事件D、控件的名称可以由编程人员设定()4.在VB中程序注解可以加在下列哪个符号之后A、’B、/C、:D、!()5. 通过改变单选按钮(OptionButton)控件的 _属性值,可以改变单选按钮的选取状态。

A、ValueB、StyleC、AppearanceD、Caption()6. 下列 _关键字用于定义常量..A、DimB、PublicC、ConstD、Private()7.若A≤B或C≤D,则E=2,写作VB语句应为:If A<=B _C<=D then E=2A、XorB、AndC、<>D、Or()A、 Width和HeightB、 Width或HeightC、 Top和LeftD、 Top或LeftA.Mid$(S,2,3) B、Middle(S,2,3)C、Right$(S,2,3)D、Left$(S,2,3)()10.以下关系表达式中,其值为False的是 _A.“ABC”>“AbC” B.“the”< >“they”C.“9”=“8” D.“Integer”>“Int”()11.在VB中,以下控件不能作为其他控件窗口的是A、框架B、图片框C、影像框D、窗体()12.下列VB程序语句正确的是 _A、If A≥B Then T=A : A=B : B=TB、If A≥B Then T=A ; A=B ; B=TC、If A>=B Then T=A A=B B=TD、If A>=B Then T=A : A=B : B=T()13.下面程序的循环次数是 _For j=8 To 35 Step 3Print jNext jEndA、10B、9C、27D、28()14.在窗体中添加一个命令按钮Command1,并编写如下程序:Private Sub Command1_Click( )x=InputBox(x)If x^2=9 Then y=xIf x^2<9 Then y=1/xIf x^2>9 Then y=x^2+1Print yEnd Sub程序运行后,在InputBox中输入3,单击命令按钮,程序的运行结果是 _A.3 B.0.33 C.17 D.0.25()15.下列程序段:Private Sub Form_Click()Dim i as integer,s As Integers=0:i=0while i>5i=i+1s=s+iwendPrint sEnd Sub程序运行后,窗体上显示的内容是 _A.0B.10C.15D.21二、填空题(2分/空,共20分)1.VB6.0是基于____________环境的程序开发工具。

浙江省高中信息技术选考加试题VB专项练习题十及答案

浙江省高中信息技术选考加试题VB专项练习题十及答案

浙江省高中信息技术选考加试题VB专项练习题十一、选择题:本大题13小题,第小题2分,共26分。

在每小题给出的四个选项中,只有一个是符合题目要求的。

1.下列有关VB程序说法正确的是:(A)程序只有选择、分支、顺序三种基本结构(B)流程图符号的表示必须符合国家标准(C)正确的程序必须有1个或1个以上输入,有1个或1个以上输出(D)用二分查找算法求解二元一次方程的数学解,如果方程无解,则可以没有输出语句2.下列数组定义错误的是:(A)Dim a(1 to 10) as integer (B)Dim a(10) as integer(C)Dim a(1 to 4, 4 to 10) as integer (D)Dim a(20 To 2) As Integer3.将数学表达式z byaxex +++22写成VB表达式,正确的是:(A)x^2+e^2+(a*x+b*y)/z (B)x*x+e*e+(a*x+b*y)/z(C)z byaxex +++22(D)x^2+exp(2)+(a*x+b*y)/z4.VB表达式3*3 \ 5 mod 5的值是:(A)0 (B)1 (C)3 (D)55.VB语句mid("",5)的运行结果是:(A)bbs.y (B) (C) (D)6.VB表达式"ABCD">"abcd"的值是:(A)True (B)False (C)T (D)F7.能表示“两个整数型变量X和Y不能一起为0,但其中一个一定是0”的逻辑表达式是:(A)x*y=0 and (x=0 or y=0) (B)x*y=0 and x+y<>0(C)Not(x=0 and y=0) and (x=0 or y=0) (D)(x=0 or y=0) and (x<>0 or y<>0)8.某VB程序段代码如下:Private Sub Command1_Click()s = 25For i = 1 To 10 Step 3s = s + i Mod 4Next iPrint sEnd Sub则程序运行后s的值是:(A)29 (B)30.5 (C)31 (D)409.下面程序可以实现“当文本框text1中输入任何字符时,文本框text2中能马上同步显示”。

浙江省2019年中职vb模拟试卷

浙江省2019年中职vb模拟试卷

浙江省2019年中职vb模拟试卷一、选择题1、()可以作为VisualBasic中变量名。

A、a+bB、abcC、2aD、Then2、符合VisualBasic6.0规范的表达式是()A、a2+abB、a(a+b)C、ax[a+b]D、ax(a+b)3、表示x位于闭区间-3,3|的VisualBasic表达式是()A、-3&lt;=x&lt;=3B、x&gt;=-3Orx&lt;=3C、r&gt;=-3Andx&lt;=3D、x&gt;=-3Xorx&lt;=34、表达式16/4--2^5x8/4MOD5\2的值为()。

A、14、B、4C、20D、25、下列四个运算符中,优先级别最低的是()。

A、\B、AndC、ModD、&lt;&gt;6、要使标签控件中的文本水平居中对齐,应将其Alignment属性设置为()A、0B、1C、2D、37、向列表框中添加项目,应调用()方法。

A、AddB、AddltemC、FillD、Fllltem8、假设变量a=3456,执行语句t=(a\100)Mod10后,t的值是()A、3B、4C、5D、69、()不是鼠标事件。

A、MouseUPB、MousePressC、MouseDownD、MouseMove10、标签控件的()属性用来设置控件中文本和图形的前景颜色。

A、BackColorB、FontC、ForeColorD、BackStyle11、()控件将文本框控件和列表框控件的特性结合在一-起,既可以在控件的文本框部分输入信息,也可以在控件的列表框部分进行选择。

A、复选框B、菜单C、组合框D、框架12、要创建一个下拉式组合框(包括-一个下拉式列表和一个文本框),应将Style属性设置为()A、0B、1C、2D、313、为了使文本框控件具有垂直滚动条,应把SerollBars属性值设置为()A、0B、1C、2D、314、()用于显示项目列表,从其中可以选择一项或多项。

杭州vb会考模拟试卷评分标准

杭州vb会考模拟试卷评分标准

20XX年杭州市VB会考模拟试卷评分标准说明:1、试卷共分二部分,第一部分为理论卷,第二部分为考试卷。

2、考试时间为90分钟,理论卷将正确答案填到括号内,考试卷请按照试卷要求.......上机完成相应操作并保存。

............3、考试卷中请按照“试卷套数+VB+考生学籍号”为名建立考生文件夹,如考题为第一套,考生学籍号为09160444020003的考生文件夹名为:1VB09160444020003。

所有的需上交的答卷均需保存在此文件夹中,否则不得分。

4、在考生文件夹中建立工程文件,并保存相关内容(工程文件、窗体文件等)。

注意:请创建一个工程文件,结果同效果.EXE文件,工程文件内包含4个窗体。

第一部分:理论卷(共10分)单项选择题,每小题1分1、B2、B3、A4、D5、A6、A7、D8、B9、C 10、B第二部分:考试卷(共90分)若文件命名错扣5分,除明确说明的外,界面设计要求大致相同(位置、字体字号可有微小差别),功能相同。

考题:请创建工程1文件,结果同效果1.EXE文件,工程文件包含4个窗体,具体要求如下:一、窗体1:主界面窗体(25分)1、界面设计合理(控件位置、大小、对齐等)2分2、属性设置15分:窗体属性(2分): caption——窗口标题为20XX年杭州市VB会考模拟试卷——1分Picture——背景图片选择——背景图片1分标签属性(3分):: caption——内容为20XX年杭州市VB模拟会考试卷——1分字体字号——隶书初号加粗——1分前景颜色、背景透明——1分按钮属性(6分):四个标题及大小设置——每个按钮1分共4分Style和backcolor设置——各1分共2分菜单设计(4分):“文件”及菜单项:基本操作、简单应用、综合应用“关闭”及菜单项退出——各2分3、代码(8分):单击菜单或命令按钮打开对应窗体或退出考试。

相应代码1分一个,共8分。

对应代码如下(参考)Private Sub Command1_Click() 1分Form2.Showunload meEnd SubPrivate Sub Command2_Click() 1分Form3.ShowUnload meEnd SubPrivate Sub Command3_Click() 1分Form4.ShowUnload meEnd SubPrivate Sub Command4_Click() 1分EndEnd SubPrivate Sub s1_Click() 1分Form2.ShowUnload meEnd SubPrivate Sub s2_Click() 1分Form3.ShowUnload meEnd SubPrivate Sub s3_Click() 1分Form4.ShowForm1.hideEnd SubPrivate Sub tc_Click() 1分EndEnd Sub二、窗体2:单击基本操作进入“字体字号字型“窗体。

2015学年第一学期VB会考模拟试卷3

2015学年第一学期VB会考模拟试卷3
25
2
界面设计
初始界面
5
运行界面
5
3
代码设计
Command1事件(计算话费)
正确代码及算法
10
Command2事件(退出)
正确代码及算法
3
4
文件
保存
将工程文件1.Vbp和窗体文件1.Frm保存在考生文件夹中
2
第2题:
序号
操作项目
操作要求
分值
得分
1
题目要求
打印如下图所示的图形。操作要求:(1)单击窗体,在窗体上显示结果。
正确代码及算法
5
Command2事件(计算)
正确代码及算法
10
Command2事件(退出)
正确代码及算法
3
4
文件
保存
将工程文件3.Vbp和窗体文件3.Frm保存在考生文件夹中
2
2
第3题:
序号
操作项目
操作要求
分值
得分
1
题目要求
随机产生10个2位正整数,将其按从小到大的顺序排序。操作要求:
(1)单击“产生”,在列表框1上显示这10个数。(2)单击“排序”,在列表框2上从小到大排列显示。(3)单击“清空”,列表框1和2全部数据清空。
30
2
界面设计
初始界面
5
运行界面
5
3
考模拟试卷(三)
班级:姓名:学号:
第1题:
序号
操作项目
操作要求
分值
得分
1
题目要求
中国电信推出A套餐;月费18元,300条短信,200MB流量,呼叫0.21元/分、国内漫游呼叫0.59元/分。初始界面如图所示,若超出该套餐的流量收费为0.001元/KB,超出该套餐的短信为0.08元/条,请计算话费。

浙江省高中信息技术选考加试题VB专项练习题八及答案

浙江省高中信息技术选考加试题VB专项练习题八及答案

浙江省⾼中信息技术选考加试题VB专项练习题⼋及答案浙江省⾼中信息技术选考加试题VB专项练习题⼋⼀、选择题:本⼤题13⼩题,第⼩题2分,共26分。

在每⼩题给出的四个选项中,只有⼀个是符合题⽬要求的。

1.某VB窗体上有⼀个⽂本框、⼀个命令按钮、⼀个列表框,对象如下表所⽰:对象类型⽂本框命令按钮列表框对象名passtxt checkcmd addlst程序运⾏过程中输⼊⼀些字符后,输⼊位置马上变成“*”号,则该控件是:(A)checkcmd (B)text (C)passtxt (D)addlst2.VB窗体⽂件的扩展名是:(A)frm (B)vbp (C)vbg (D)bas3.数学表达式x2-2|x|+1的VB表达式是:(A)x*x-2*abs(x)+1 (B)x*x-2*int(x)+1(C)sqr(x) -2*abs(x)+1 (D)x^2-2abs(x)+14.数学表达式cos30o写成VB表达式是:(A)cos30 (B)cos(30)(C)cos(30o) (D)cos(30*3.14/180)5.VB语句Form1.Cls的作⽤是:(A)把窗体从程序运⾏界⾯中清除(B)把窗体上打印的信息清除(C)把窗体上的控件清除(D)清除窗体上的控件和打印的信息6.同时定义变量a和b为整形的语句是:(A)Dim a,b as integer (B)Dim a as integer,b as integer(C)Dim a b as integer (D)Dim a as integer,b7.某VB程序代码如下:Private Sub Command1_Click()If 3 > 5 Thena = 10ElseIf (10 Mod 3) = 2 Thena = 15Elsea = 45End IfEnd If则程序运⾏后的a的值分别是:(A)45 (B)15 (C)10 (D)08.某VB程序段代码如下,它的作⽤是计算1*2*3*……*99*100的值:Private Sub Command1_Click()Dim s As Integer ------①s = 1 ------②For i = 1 To 100 ------③s = s * i ------④Next iPrint sEnd Sub程序运⾏后出现“溢出”错误信息,下⾯对于出错原因分析正确的是:(A)把语句①改为dim s as double,原来s的数据类型不适合(B)把语句②改为s=0,这样就不会出现数据溢出错误(C)把语句③改为do……loop 循环结构就不会出现数据溢出错误(D)VB不能⽤于计算1*2*3*……*99*100的值,否则⼀定会出现数据溢出错误9.某VB程序段代码如下,它的功能是查找100到999以内的⽔仙花数(所谓的⽔仙花数是指在三位整数中,百位数、⼗位数、个位数的⽴⽅和等于它本⾝,如153=1^3+5^3+3^3):Private Sub Command1_Click()Dim i As Integer, s As IntegerDim a As Integer, b As Integer, c As IntegerPrint "100到999所有⽔仙花数:";For i = 100 To 999a = i \ 100b = i \ 10 Mod 10c = i Mod 10___________________________________If s = i ThenPrint i;End Sub划线处应填的语句是:(A)s = i^ 3 (B)s = sqr(a ) + sqr(b) + sqr(c )(C)s = a ^ 3 + b ^ 3 + c ^ 3 (D)a ^ 3 + b ^ 3 + c ^ 3=s 10.在VB中,与函数val⽤法相反的是:(A)chr (B)len (C)mid (D)str11.在窗体上画⼀个⽂本框,然后编写如下事件过程:Private Sub Form_Load()a="5"。

信息技术浙江选考vb难题(21张PPT)

信息技术浙江选考vb难题(21张PPT)
m=Int((i+j)/2) If x=jf(m)Then
flag=False ____①____ ElseIf____②____Then i=m+1 Else j=m-1 End If Loop End Function Private Sub Form_Load()
′从数据库中读取学生编号和积分,分别存储到bh数组和jf数组中,并按积分值从小到大排序,
显示在列表框List1中
End Sub
Private Sub Command1_Click()
Dim Top As Integer,Bottom As Integer,Topxb As Integer,Bottomxb As Integer
List2.ClBiblioteka arTop=Val(Text1.Text)
Dim A As Integer,B As Integer Dim C As Integer ′变量C存储数字正确(含位置正确)的数字个数 Dim guess As String,i As Integer,t1 As String,t2 As String guess=Text1.Text A=0∶C=0 For i=1 To 4 t1=Mid(result,i,1) t2=Mid(guess,i,1) If t1=t2 Then A=A+1 If____②____Then C=C+1 Next i total=total+1 B=____③____ List1.AddItem Str(total)& ″. ″& guess &″ ″& Str(A)& ″A″& Str(B)& ″B″
Dim x As Integer,y As Integer,i As Integer,j As Integer

2024年浙江省杭州市九年级中考数学学业水平考试模拟B试题

2024年浙江省杭州市九年级中考数学学业水平考试模拟B试题

2024年浙江省杭州市九年级中考数学学业水平考试模拟B 试题一、单选题1.中国是最早采用正负数表示相反意义,并进行负数运算的国家.若把气温为零上10℃记作10+℃,则5-℃表示气温为( )A .零上5℃B .零下5℃C .零上10℃D .零下10℃ 2.中国海关总署于2024年1月12日发布消息称:2023年我国汽车出口量为522万辆,同比增加57.4%.数据“522万”用科学记数法表示应为( )A .75.2210⨯B .65.2210⨯C .452210⨯D .70.52210⨯ 3.如图,AB ,CD 被直线EF 所截,且AB CD ∥,EG 平分FEB ∠,过点G 作GH EF ⊥,若34FGH ∠=︒,则BEG ∠的度数为( )A .63︒B .62︒C .58︒D .57︒4.运用等式性质进行的下列变形,不正确的是( )A .如果a b =,那么a c b c -=-B .如果a b =,那么a c b c +=+C .如果a b =,那么11a b m m =++D .如果a b =,那么ac bc =5.在一次数学实践活动课上,老师指导学生进行折纸活动,下图是小睿、小志、小芳三位同学的折纸示意图(C 的对应点是C '),分析他们折纸情况说法正确的是( )A .小睿折出的是ABC V 中BAC ∠的平分线B .小志折出的是BC 边上的中线 C .小芳折出的是ABC V 中BC 边上的高D .上述说法都错误6.小明从A 地到B 地(两地相距40千米)的骑车速度为10千米/小时,则小明离B 地的距离y (千米)与骑车时间x (小时)之间的函数解析式(不写自变量的取值范围)为( )A .10y x =B .1040y x =-C .4010y x =-D .40y x =-7.某地区2017年底有贫困人口9万人,通过社会各界的努力,2019年底贫困人口减少至1万人.设2017年底至2019年底该地区贫困人口的年平均下降率为x ,根据题意列方程得( )A .()9121x -=B .()2911x -= C .()9121x += D .()2911x += 8.如图,平面直角坐标系中,等腰Rt ABC △的顶点()1,0A 在x 轴上,直角顶点()1,3C ,将ABC V 以点A 为旋转中心,顺时针每秒旋转45°,77秒后,点B 的坐标为( )A .()1+B .()1-C .(0,1+D .(0,1- 9.下列命题是真命题的是( )A .方程2230x x ++=有两个不相等的实数根;B .不等式2113x -<的最大整数解是2; C .顺次连接对角线相等的四边形各边中点得到的四边形是矩形;D .直角三角形的两条直角边长分别为6和8,则它的外接圆的半径为5.10.如图,在ABCD Y 中,4AB =,2AD =,60DAE ∠=︒,DE 为ADC ∠的角平分线,点F 为DE 上一动点,点G 为CF 的中点,连接AG ,则AG 的最小值是( )A .2B .C .4D .二、填空题11.计算:1=.12.在一个不透明袋子中,装有2个红球和一些白球,这些球除颜色外其他都一样,如果从袋中随机摸出一个球是红球的概率为0.25,那么白球的个数是.13.如图,函数3y x =-和y kx b =+的图象交于点()2A m -,,则关于x 的不等式3x kx b ->+的解集为.14.如图,一座水库大坝的横断面为梯形ABCD ,斜坡AB =AB 改为坡度为12:的斜坡AP .则新坡面AP =m .(结果保留根号)15.某商场购进一款年货大礼包,经调研发现,当该款大礼包每盒的售价为45元时,每天可售出100盒.每盒的售价每降低1元,每天的销量增加10盒.要使该款大礼包每天的销售额达到6000元,每盒的售价应降低多少元?若设该款大礼包每盒降价x 元,则可列方程为.16.如图,已知O e 的弦6AB =,以AB 为一边作正方形ABCD ,CD 边与O e 相切,切点为E ,则O e 半径为三、解答题17.计算:(1229116-⎛⎫⎪⎝⎭.18.为落实“双减”政策,某校随机调查了50名学生平均每天完成书面作业所需时间的情况,根据调查数据绘制了如下不完整的统计图表:(1)分别写出a、b的值并补全条形统计图;(2)若该校有学生1000人,估计每天完成书面作业的时间不足1.5小时的学生约有多少人?(3)学校需要深入了解影响作业时间因素,现从E组的4人中随机抽取2人进行谈话,已知E 组中七、八年级各1人,九年级2人,则抽取的2人都是九年级学生的概率为多少?19.如图,在四边形ABCD中,AB//DC,AB AD=,对角线AC,BD交于点O,AC平分BAD∠,过点C作CE AB⊥交AB的延长线于点E,连接OE.(1)求证:四边形ABCD是菱形;(2)若AB=2BD=,求OE的长.20.已知:如图,在平面直角坐标系中,一次函数1y x =+与反比例函数()0a y a x=≠的图象交于点()2,A m 和点B ,与x 轴交于点D .(1)求m ,a 及B 点坐标;(2)根据图象直接写出不等式1a x x+<的解集; (3)若P 是x 轴上一点,且满足PAB V 的面积等于5,求点P 坐标.21.在Rt ABC △中,90,BAC D ∠=︒是BC 的中点,E 是AD 的中点,过点A 作AF BC ∥交CE 的延长线于点F .(1)求证:四边形ADBF 是菱形;(2)若2AB =,60AFB ∠=︒,求CF 的长.22.如图,抛物线211342y x x =--的对称轴l 与x 轴交于点A ,与y 轴交于点B .(1)求点A 、B 的坐标;(2)C 为该抛物线上的一个动点,点D 为点C 关于直线l 的对称点(点D 在点C 的左侧),点M 在坐标平面内,请问是否存在这样的点C ,使得四边形ACMD 是正方形?若存在,请求出点C 的坐标;若不存在,请说明理由.23.如图,ABC V 内接于O e ,AB 是O e 的直径,OD AB ⊥交O e 于点E ,交AC 于点F ,且DF DC =.e的切线;(1)求证:CD是O(2)若OF6BC=,求DE的长.。

浙江信息技术学考VB函数与表达式习题

浙江信息技术学考VB函数与表达式习题

VB函数及表达式1、\,/,Mod,*四个算术符中.优先级最低的是().(A)\ (B) / (C) Mod (D) *2.表达式Int(2*sqr(36) +0.5)/3的值是().(A) 1 (B) 2 (C) 3 (D) 43.表达式2+5\2的值是().(A) 2 (B) 3 (C) 4 (D) 4.54.表达式5^2 Mod 25 \ 2^2的值是().(A)1 (B)0 (C)6 (D)45.Int(100*Rnd())+1产生的随机整数的闭区间是().(A) [0,99] (B) [1,100] (C) [0,100] (D) [1,99]6.表达式Int(-17.8) +Abs(-2)的值是().(A) 18 (B)-16 (C) -20 (D) 207.表达式Abs( -5) +Len("ABCDE")的值是().(A) 5ABCDE (B) -5ABCDE (C) 10 (D)08.表达式Str( -5) + "ABCDE"的值是().(A) 5ABCDE (B) -5ABCDE (C) 10 (D)09.表达式Mid("SHANGHAI",6,3)的值是().(A) SHANGH (B) SHA (C) ANGH (D) HAI10.函数Len(Str(Int(99+5/2)))的值为().(A) 1 (B) 2 (C) 3 (D) 411.已知字符“A”的ASCII码为65,表达式Asc(“D”)+Abs(-5)的值().(A)60 (B) 65 (C) 70 (D) 7512.已知字符“A”的ASCII码为65,表达式Chr(Asc(“A”)+3)的值().(A)“B”(B) “C”(C) “D” (D) “E”13.表达式“123”+“123”的值().(A) 123”(B) “123123”(C) “246” (D) 12312314.表达式Val(“123”)+ 123的值().(A) 123”(B) “123123”(C) “246” (D) 12312315.已知文本框Text1中的内容为12,则表达式Val(Text1.Text)+ 12的值().(A) 1212 (B) “1212”(C) “24” (D) 2416.已知文本框Text1中的内容为12,则表达式Text1.Text+ Str(12)的值().(A) 1212 (B) “1212”(C) “24” (D) 2417.在下面各关系中,当X取任意数值时都能成立的式子是().(A) Int(X) >= Abs(X) (B) Int(X) = Abs(X) (C) Int(X) <=Abs(X) (D) Int(X) <> Abs(X) 18.设a=1,b=-1,则以下表达式值为假的是( )(A) a>=b (B) Not(a = b) (C) b > a (D) b < a19.设a=3,b=5,则以下表达式值为真的是( )(A) a>=b And b>10 (B) (a>b)Or(b>0) (C) (a<0)Eqv(b>0) (D) (-3+5>a)And(b>0)20.如下程序,程序结束时,变量a和b的值为( )a = 1 :b = 2a = bb= a+b(A)1,2 (B)1,3 (C) 2,4 (D) 2,3知识点:注意:其中Chr()、Str()、Mid()三个函数的值为字符串型,结果要加双引号注意:关系运算中的等号“=”和赋值语句中的等号“=”含义不一样。

  1. 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
  2. 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
  3. 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。

杭州市中等职业学校VB试卷
第一部分:理论题
一、选择题:(0.5分/题×10)
1.一只漂亮的酒杯被摔碎了,则漂亮、酒杯、摔、碎了分别指()。

A.对象,属性,事件,方法
B.对象,属性,方法,事件
C.属性,对象,方法,事件
D.属性,对象,事件,方法
2.在下列变量名中,合法的VB变量名是()。

A. A.3
B.A3
C.ABS
D.3A
3.用下面语句定义的数组的元素个数是()。

Dim A(-3 To 3) As Integer
A.5
B.6
C.7
D.8
4.执行下列语句后,显示输入对话框,此时如果单击“确定”按钮,则变量strInput的值是()。

strInput = InputBox("请输入字符串:","字符串对话框","字符串")
A."请输入字符串"
B."字符串对话框"
C."字符串"
D.空字符串
5.设a=5,b=4,c=3,d=2,下面的表达式的值是()。

3>2*b Or a=c And b<>c Or c>d
A.1
B.True
C.False
D.0
6.变量定义语句“Dim index%”与等价()。

A.Dim index As Long
B.Dim index As Integer
C.Dim index As single
D.Dim index As Double
7.当窗体被加裁时运行,此时发生的事件是()。

A.Load
B.Unload
C.Resize
D.Paint
8.下面程序段运行后,显示的结果是()。

Dim x As Integer
If x Then Print x Else Print x + 1
A.1
B.0
C.-1
D.显示出错信息
9.下列程序共循环了次()。

For i = 1 To 10 Step 2
For j = 1 To 5 Step 2
Sum = Sum + j
Next j
If Sum > 10 Then Exit For
Next i
A.15
B.5
C.3
D.6
10.为窗体编写如下事件过程:
程序运行后,如果单击鼠标右键,则输出结果为()。

Private Sub Form_MouseDown(Button As Integer, _
Shift As Integer, X As Single, Y As Single)
If Button = 2 Then Print "AAAA"
End Sub
Private Sub Form_MouseUp(Button As Integer, _
Shift As Integer, X As Single, Y As Single)
Print "BBBB"
End Sub
A.AAAA
B.BBBB
C.AAAA
D.BBBB
BBBB AAAA
二、填空题:(0.5分/空×10)
1.VB应用程序中标准模块文件的扩展名是。

2.要改变计时器的时间间隔,需改变计时器的属性。

3.代数表达式 sinx - 8(e3y-1)x在VB中的表达式是。

4.表达式 Print Int(1234
5.6789*100+0.5)/100的值为。

5.执行下面的程序段后,a的值为,b的值为。

a=300
b=20
a=a+b
b=a-b
a=a-b
6.执行下面的程序段后,i的值为,s的值为。

s=2
For i = 3.2 to 4.9 Step 0.5
s = s + 1
Next i
7.下面的程序输出结果如下:
4
34
234
1234
试在程序空白处填上适当的语句。

a$ = "1234"
For i = 1 to 4
Print Tab(5-i);
Next i
8.程序运行后,在文本框Text1中输入"abcd12xyz&",写出文本框Text2中显示的内容。

Private Sub Text1_KeyPress(KeyAscii As Integer)
Dim k As Integer,c As String
k = KeyAscii
c = Ucase(Chr(k))
If c>="A" And c<="Z" then
k = k - 3
If k<Asc("A") Or k>"Z" And k<"a" Then k = k + 26 End If
Text2.Text = Text2.Text + Chr(k)
第二部分:实践操作题
提示:请创建一个工程文件,结果同效果1.EXE文件,工程文件内包含4个窗体;除主界面窗体外,均无最大化、最小化和关闭按钮。

一、窗体1:主界面窗体。

1.窗口标题为VB实践操作试题。

2.菜单栏:“文件”和“关闭”菜单,“文件”菜单下的菜单项为:基本操作、简单应用、综合应用,“关闭”菜单下内容为退出,单击各个子菜单进入各试题窗体或退出考试。

3.窗体内容如上图,标签“杭州市VB会考”为初号粗体隶书,窗体背景图片来自考生素材。

单击“基本操作”、“简单应用”、“综合应用”命令按钮能打开相应操作窗体,同时隐藏主窗体界面窗口:单击“退出”按钮退出程序运行;要求这四个命令按钮大小相同。

二、窗体2:单击基本操作进入“调整图片框”窗体。

效果如上图,窗体的标题为“调整图片框”;窗体内由一个图片框和6个按钮组成。

单击放大按钮,则图片框放大;单击缩小按钮,则图片框缩小(当缩小到最小时,会弹出提示信息);单击左对齐按钮,则图片框在窗体最左侧;单击右对齐按钮,则图片框在窗体最右侧;单击居中按钮,则图片框居中,单击返回按钮,则回到主界面窗体,本窗体消失。

(提示,放大和缩小宽高比例为4:3),当图片为最小时,单击缩小按钮则会出现提示信息。

如下图:
三、窗体3:单击简单应用进入“分类统计字符”窗体。

效果如上图,开始运行后,在文本框中输入字符后,分类统计按钮可用,在输入一串字符后,单击分类统计按钮,程序将分类统计字母字符、数字字符和其它字符,并将结果在相应文本框中显示(此文本框均不可输入文本)。

单击返回按钮后,返回到主界面窗体,本窗体消失。

(提示:输入文本框可以换行,所有文本框均使用4号字,标签均为4号字)
四、窗体4:单击综合应用进入“猜数字”窗体。

效果图如上,用户有8次猜数字的机会。

程序开始运行后,单击开始猜数按钮,则会弹出输入对话框,由用户输入要求范围内的数字(1-500之间)。

在单击确定按钮后,程序会判断用户输入的数字与系统生成的数字之间的关系,若偏大,则会弹出对话框,提示输入数字偏大及剩余机会次数,单击确定后,弹出输入对话框,提示输入的范围,上限到刚输入的数;若偏小,则会弹出对话框,提示输入数字偏小及剩余机会次数,单击确定后,弹出输入对话框,提示输入的范围,下限到刚输入的数;若刚好是系统生成的数,则会弹出猜数正确的信息。

单击返回按钮,回到主界面窗体,本窗体消失。

具体效果图如下:
输入对话框:
提示信息框:。

相关文档
最新文档