首页 VB教程第4章课堂讨论

VB教程第4章课堂讨论

VB教程第4章课堂讨论第4章习题讨论退出单选题多选题填空题编程题一、单选题（补充）1．“x是小于100的非负数”，用VB表达式表示的是A.00Thenx=aElsex=bPrintx-aA.0B.-4C.-3D.-1BB二、多选题1．下列语句中，有语法错误的是_______。A.y=(a-1)(b-1)B.x=2mC.Val(y)=mD.Form1.ShowE.B$=InputBox(Hello$)F.Text1.Text+"VB"=Text2.TextG.88Label.Caption="Label"H.x=Left("VisualB...

第4章习题讨论退出单选题多选题填空题编程题一、单选题（补充）1．“x是小于100的非负数”，用VB 表达式表示的是A.0<=x<100B.0<=xAndx<100C.00Thenx=aElsex=bPrintx-aA.0B.-4C.-3D.-1BB二、多选题1．下列语句中，有语法错误的是_______。A.y=(a-1)(b-1)B.x=2mC.Val(y)=mD.Form1.ShowE.B$=InputBox(Hello$)F.Text1.Text+"VB"=Text2.TextG.88Label.Caption="Label"H.x=Left("VisualBASIC")I.Ifa>b-2*3Theny=a=bJ.Ifa>1Not(Orb>3)Theny=1错误!缺一个乘号*；应为(a-1)*(b-1)错误!缺一个乘号*；2*m；2m不能是变量名错误！左边只能是变量名或对象属性名正确！正确！$是字符串类型符，B$表示B是字符串变量错误！左边不能是一个表达式错误！对象名不能以数字开头错误！Left函数格式不对；应为Left(s,n)正确！将表达式“a=b”的值赋给y错误！逻辑表达式不对；Or是双目运算2．假设t、s、w分别为整型、字符型、逻辑型变量，且s="ABC"，在下列表达式中错误的有______。A.t=5AndwB.s>90C.4*t–1D.s+"s"E.t+s3.假设a=-3，b=3，下列逻辑表达式中其值为真的有A.a>=0AndNotb<2B.a*b<-6And5*bMod3<>0C."ab">"b"Ora+b>=0OrNot(a-b>=0)D.2*a=-bOra>0Andb>0E.a>=0Anda-b>=0Orb>=aCEBE补充填空题1：写出下列程序段的运行结果。x=Val(InputBox("Enterx"))SelectCaseSgn(x)+2Case1x=x+1Case2x=x+2Case3x=x+3EndSelectPrintx+1当x的输入值为-3时，输出结果是_____；运行后x的值为____。三、填空题-1-2填空补充题1补充填空题2：当在文本框Text1中输入内容并按回车键后，立即跳到Text3文本框以供输入，事件过程是：PrivateSubText1_KeyPress(KeyAsciiAsInteger)IfKeyAscii=13Then________EndIfEndSubText3.SetFocus编程及上机调试第1题(出错在什么地方?)第4章的第1道编程题，有的学生用selectcase语句编写如下程序:PrivateSubCommand1_Click()x=Val(Text1.Text)SelectCasexCaseInt(x/2)=x/2Text2.Text="偶数"CaseElseText2.Text="奇数"EndSelectEndSub为什么结果总是奇数？无论你输入偶数还是奇数。1.编制一个程序，输入一个整数，判断该数的奇偶性。如输入89，则输出“奇数”。利用文本框来实现数据的输入和输出。错例PrivateSubCommand1_Click()x=Val(Text1.Text)SelectCasexCaseInt(x/2)=x/2Text2.Text="偶数"CaseElseText2.Text="奇数"EndSelectEndSub正例(例4.4)……SelectCasescoreCase0To59Label2.Caption=temp+"不及格"Case60To69……EndSelect变量Score要与下列各表达式匹配变量Score与下列各表达式匹配变量Score要与下列各表达式匹配变量x要与下列各表达式不匹配另一解法PrivateSubCommand1_Click()x=Val(Text1.Text)IfInt(x/2)=x/2ThenText2.Text="偶数"ElseText2.Text="奇数"EndIfEndSub编程及上机调试第3题：显示学生的年级及学生类型已知学号由9个数字码组成，如012343001，其中从左算起前2位表示年级，第5个字符表示学生类型，学生类型规定如下：2——博士生，3——硕士生4——本科生，5——专科生设计程序，从文本框中输入一个学号，经过判断后，在另外两个文本框中显示该生的年级及学生类型。xxxxxxxxx年级学生类型编程第3题PrivateSubCommand1_Click()'“判断”事件过程DimtAsString,pAsStringt=Mid(Text1.Text,5,1)SelectCasetCase"2"p="博士生"Case"3"p="硕士生"Case"4"p="本科生"Case"5"p="专科生"CaseElsep="无效学号"EndSelectText2.Text=Left(Text1.Text,2)+"级"Text3.Text=pEndSub编程及上机调试第4题4.编制程序，利用三个复选框来代表红、绿、蓝三原色的颜色值，当选中复选框时表示颜色值255，不选中复选框时表示颜色值0，把通过RGB函数调配的颜色作为一个标签的背景色（BackColor）。编程第4题标签Label1PrivateSubCommand1_Click()r=0:g=0:b=0IfCheck1.Value=1Thenr=255EndIfIfCheck2.Value=1Theng=255EndIfIfCheck3.Value=1Thenb=255EndIfLabel1.BackColor=RGB(r,g,b)EndSubPrivateSubCommand2_Click()EndEndSub(1)建立应用程序的用户界面和设置对象属性(2)编写程序代码功能要求：用户从上面三个文本框(Text1、Text2、Text3)中输入数据，单击“排序”按钮(Command1)，则在第4个文本框(Text4)中显示结果编程补充题1：输入三个数，将它们从大到小排序编程补充题1PrivateSubCommand1_Click()a=Val(Text1.Text)b=Val(Text2.Text)c=Val(Text3.Text)Ifa=bt=a:a=b:b=tEndIfIfa=ct=a:a=c:c=tEndIfIfb=ct=b:b=c:c=tEndIfText4.Text=a&","&b&","&cEndSub程序代码

                    本文档为【VB教程第4章课堂讨论】，请使用软件OFFICE或WPS软件打开。作品中的文字与图均可以修改和编辑，
                    图片更改请在作品中右键图片并更换，文字修改请直接点击文字进行修改，也可以新增和删除文档中的内容。 
 该文档来自用户分享，如有侵权行为请发邮件ishare@vip.sina.com联系网站客服，我们会及时删除。

                    [版权声明] 本站所有资料为用户分享产生，若发现您的权利被侵害，请联系客服邮件isharekefu@iask.cn，我们尽快处理。

                    本作品所展示的图片、画像、字体、音乐的版权可能需版权方额外授权，请谨慎使用。

                    网站提供的党政主题相关内容(国旗、国徽、党徽..)目的在于配合国家政策宣传，仅限个人学习分享使用，禁止用于任何广告和商用目的。
                

下载需要：免费已有0 人下载

立即下载

VB教程第4章课堂讨论

你可能还喜欢