Visual-Basic程序设计形成性考核册作业答案二

上传人:我*** 文档编号:127084167 上传时间:2020-03-30 格式:DOCX 页数:12 大小:16.22KB
返回 下载 相关 举报
Visual-Basic程序设计形成性考核册作业答案二_第1页
第1页 / 共12页
Visual-Basic程序设计形成性考核册作业答案二_第2页
第2页 / 共12页
Visual-Basic程序设计形成性考核册作业答案二_第3页
第3页 / 共12页
Visual-Basic程序设计形成性考核册作业答案二_第4页
第4页 / 共12页
Visual-Basic程序设计形成性考核册作业答案二_第5页
第5页 / 共12页
点击查看更多>>
资源描述

《Visual-Basic程序设计形成性考核册作业答案二》由会员分享,可在线阅读,更多相关《Visual-Basic程序设计形成性考核册作业答案二(12页珍藏版)》请在金锄头文库上搜索。

1、Visual Bsdic程序设计形成性考核册作业答案二一、选择题1按照变量的作用域可将变量划分为( B )。A、公有、私有、系统 B、全局变量、模块级变量、过程变量C、动态、常数、静态 D、Public、Private、Protected2. 可获得字符的ASCII码的函数是(C)。、Val、Fix、Asc 、Chr3、要退出Do.Loop循环,可使用的语句的(D)语句。A、Exit B、Exit For C、End Do D、Exit Do4. 把数值型转换为字符串型需要使用的函数是(B)。A、Val B、Str C、Asc D、Chr5.关于语句行,下列说法正确的是(B)。一行只能写一条语

2、句一条语句可以分多行书写每行的首字符必须大写 长度不能超过255个字符表达式6+10 Mod 4*2+1的值是(A)11 C D.37.以下可以作为isual Basic 变量名的是(B)SIN B.CO1 C.COS(X) D.X(-1)8.表达式bs(-5)+Len(“ABCDE”)的值为(C)5ABCDE.5ABCDE C.10 D.09.在代码编辑器中,如果一条语句太长,无法在一行内写下(不包括注释),要折行书写,可以在行末使用续行字符(A),表示下一行是当前行的继续一个空格加一个下划字符()一个下划字符()直接回车 一个空格加一个字符()10.Sub过程与Function过程最根本的

3、区别是(D)Sub过程可以使用all语句或直接使用过程名调用,而Function过程不可以Function过程可以有参数,Sub过程不可以两种过程参数的传递方式不同Sub过程的过程名不能返回值,而Function过程能够通过过程名返回值11.是小于80的非负数,用VB表达式表示正确的是(C). A.0X80 B.0=X80 C.0=x and x80 D.0=x Orx8012.在设计菜单时,如果要在菜单中加入一个菜单分隔条,则菜单分隔条的标题必须设置为(B )A.加号(+) B.减号(-) C.星号(*) D.感叹号(!)13.如果要在程序中显示一个弹出式菜单,那么要调用Visual Bas

4、ic中提供的方法是(D). A.Print B.Move C.Refresh D.PopupMenu14.下列可以用来存储图像供其他对象使用的控件是(C ). A.ToolBar B.StatursBar C.ImageList D.TreeView15.当单击工具拦上的按扭时,会触发的事件是(A ). A.ButtonClick B.Change C.Load D.KeyPress16.要利用公用对话框控件来显示”打开文件”对话框,需要调用控件的(B )方法. A.ShowPrinter B.ShowOpen C.ShowSave D.ShowColor17.对于窗体级变量,下列说法中错误的

5、是(C ).A.所在窗体的各子程序都可以访问B.其他窗体的子程序不能访问C.所在窗体发子程序不能访问用Private定义的窗体级变量D.一定要在所在窗体的通用区内定义18.从一个字符串中的第3个字符开始,获取5个字符,应使用(B) A.Len函数 B.Mid函数 C.Left函数 D.Right函数19.用下面的语句所定义的数组的元素的个数是(D ). DimA(-3 To 5)As Integer A.6 B.7 C.8 D.920.有如下程序段:Dim strl As String*5Strl=”Visual Basic”当该段程序被执行完时,变量strl的值为(B ). A.”Visua

6、l” B.”Visua” C.”V” D.”Visual Basic”二、填空题1菜单一般有_下拉式_和_弹出式_两种基本类型。2通用对话框控件可显示的常用对话框有_打开_、_保存_、_颜色_、_字体_、_打印_。3组合框具有_文本框_和_列表框_两种控件的基本功能。4要使数组的默认下标从“1开始,则应在窗体或标准模块代码的声明部分使用语句_Option Base 1_。5调用Sub过程时,使用_call_语句,语句用于把程序控制传送到一个Visual Basic的Sub过程。6若已建立了Form1和Form2两个窗体,默认启动窗体为Form1。通过_工程_菜单_属性_命令的_通用_选项卡,可

7、将启动窗体设置为Form2。在程序中若要显示Form1窗体,则执行_Form1.show_语句。7列表框中项目的序号是从_0_开始的。8Sub过程与Function过程最根本的区别是_Sub过程名无返回值,Function过程名有返回值 。9VB的代码存储在模块中。在VB中提供了三种类型的模块:_类模块_、_窗体模块_和_标准模块_。10使用Hide方法会隐藏被调用的窗体,但是在调用Hide方法之后不会把窗体_卸载_,被调用的窗体中的属性等已处于_内存中_。11将下列数学式子写成VisualBasic表达式。 答:2*cos(a)*sin(a)/(2*a) 答:sqr(s*(s-a)*(s-b

8、)*(s-c) sin45:sin(45*2*3.1415/360)_12.将下列数学式子各条件写成VisualBasic逻辑表达式。 1x12: 1=x and x=C OR (a-c)=0 and b=0) or (a=0 and b=0)13设A=2,B=3,C=4,D=5。表达式Not A=C Or4*B2 And BA+C的值为_False_。14在Visual Basic语言中有三种形式的循环结构。其中,若循环的次数可以事先确定,可使用_Fornext_循环;若要求先判断循环进行的条件,可使用_Do whileloop_循环或_ whileWend_循环。15以下语句的输出结果是_

9、3_。a%=3.14159Print a%三、阅读下列程序,写出程序运行结果。1、Private Sub Form_Click( ) Static Sum As Integer For I= 1 to 100 Sum=Sum+I Next IPrint Sum End Sub程序运行结果为:1+2+.+99+100=50502、private Sub Form_Click( ) A=10: b=15:c=20:d=25 Print A;Spc(5);b;Spc(7);c Print A;Spc(8);b;Space$(5);c Print c;Spc(3);”+”;Spc(3);c+d End

10、 Sub10(5个空格)15(7个空格)2010(8个空格)15(5个空格)2020(三个空格)+(三个空格)453、Private Sub Form_click( ) For i% =1 to3 Forj% = 1 to i Print L Trim(Str(i%)+ “*”+L Trim(Str(j%)+ “=”;i% * j%; Next j% PrintNext i%End Sub1*1= 12*1= 2 2*2= 43*1= 3 3*2= 6 3*3= 9 4、Private Sub Command1_Click( ) Dim a,b As Integer A=3.4B=3.4Tex

11、t1.Text=aText2.Text=bEnd SubText1显示3 、4Text2显示35、Private Sub Form_Click() For I =1 to 5 Print Tab( 11 I ) For J =1 To I * 2 1 Print “*”; Next Next iEnd Sub * * * * *四、程序设计题1、购物优惠程序。某商场为了加速促成商品流通,采用购物打折的优惠办法,每位顾客一次购物(1)在100元以上者,按九五折优惠;(2)在200元以上者,按九折优惠;(3)300元以上者,按八折优惠;(4)500元以上者按七折优惠。在窗体上添加两个文本框和一个命

12、令按钮,要求在Text1中输入购物商品总金额,单击命令按钮,在Text2中输入优惠后的价格。程序运行结果如图解所示。If Val(text1)=500 then text2=Val(text1)*0.7Else if Val(text1)=300 then text2=Val(text1)*0.85 Else if Val(text1)=200 then text2=val(text1)*0.9 Else if val(text1)=100 then text2=val(text1)*0.95End if 2、输出100200之间不能被3整除的的数,要求用Do语句的一种形式来实现,程序运行结果如图5所示。窗体的装入事件中加入如下代码:Dim a as integerA=100Do while a =200If (a mod 3) 0 thenList1.additen str(a)End ifA=a+1loop3、编写程序,打印如下的乘积表:Dim I ,j as integerPrint”*”:space(5):For i=3 to 12 step 3Print str(i);space(5);Next iPrintFor I = 15 to18Print str(i);space(3);For j=3 to 12 step3Print st

展开阅读全文
相关资源
相关搜索

当前位置:首页 > 办公文档 > 事务文书

电脑版 |金锄头文库版权所有
经营许可证:蜀ICP备13022795号 | 川公网安备 51140202000112号