【vb】大一期末考试试题vb[1][1]

【vb】大一期末考试试题vb[1][1]

ID:5640737

大小:140.00 KB

页数:16页

时间:2017-12-20

【vb】大一期末考试试题vb[1][1]_第1页
【vb】大一期末考试试题vb[1][1]_第2页
【vb】大一期末考试试题vb[1][1]_第3页
【vb】大一期末考试试题vb[1][1]_第4页
【vb】大一期末考试试题vb[1][1]_第5页
资源描述:

《【vb】大一期末考试试题vb[1][1]》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库

1、一、单项选择题(共10分)1.在代码中引用一个控件时,应使用控件的(B)属性。A.CaptionB.NameC.TextD.Index2.设变量x=4,y=-1,a=7,b=-8,下面表达式(A)的值为“假”。A.x+a<=b-yB.x>0ANDy<0C.a=bORx>yD.x+y>a+bANDNOT(y

2、.货币型D.长整型6.下列变量名中正确的是(D)。A.3SB.PrintC.SelectMyNameD.Select_17.下列赋值语句(A)是有效的。A.sum=sum-sumB.x+2=x+2C.x+y=sumD.last=y/08.以下的控件或方法具有输入和输出双重功能的为(B)。A.PrintB.TextboxC.OptionbuttonD.Checkbox9.若要获得列表框中被选中的列表项的内容,可以通过访问(D)属性来实现。A.NameB.ListIndexC.ListCountD.Text10.下列代码的运行结果为(B)。PrivateSubcommand1_click(

3、)Dimm(10)Fork=1To10m(k)=11-kNextkx=5Printm(2+m(x))EndSubA.2B.3C.4D.5二、填空题(10分)1.写出整数n能同时被13和17整除的Basic表达式。2.代码窗口中有两个下拉列表框:左侧是列表框,右侧是过程列表框。3.写出在字符串”VisualBasic6.0”中截取”Visual”的Basic表达式。4.函数Len(“abcdef”)的返回值是。5.设a=2,b=5,c=-2,d=100,则a>b>=cANDa=d的值为。6.要使标签的大小自动与所显示的文本相适应,可以通过设置属性为True来实现。7.若要在一行书写

4、多条语句,则各语句间应加分隔符,VisualBasic的语句分隔符为。8.要强制显式声明变量,使用__________语句完成。9.在VB中,用户定义常量使用语句,声明变量使用语句。三、将下列数学表达式转换为VB表达式。(6分)1.a2+2ab+b2__________________________2.__________________________3.8exln10__________________________4.2sin(450)cos(450)_______________________________5.______________________________

5、_____________6.___________________________________________四、判断题,正确打“√”,错误打“×”(10分)1.在VB中,控件的事件只能通过用户的操作触发。()2.字符型数据以双引号作为定界符,输出时双引号本身不会显示在屏幕上。()3.保存工程时,窗体文件和工程文件的文件名不能相同。()4.改变控件的大小,可以使用鼠标和键盘,还可以通过修改代码。()5.同一过程中,数组和简单变量可以同名。()6.VB函数中的参数可以是常量、变量、表达式,还可以是另一个函数。()7.代码ConstNumber1=15:Number1=10合法。()

6、8.允许将块If-Then语句结构中的所有语句都写在一行上()9.定义数组语句Dima(b)AsInteger是正确的()10.在过程调用中,“实参表”和“形参表”中对应的变量名不必相同,但是变量的个数必须相等,而且实际参数的类型必须与相应形式参数的类型相符。()五、根据题意,将下列程序补充完整。(16分)1.产生20个[10,100]之间的随机整数,每行输出10个数据。PrivateSubcommand1_click()Dima(1To20)AsIntegerRandomizei=0DoWhilei<20i=i+1a(i)=()If()ThenPrinta(i);EndIfIfi=1

7、0ThenPrinta(i)Ifi>10ThenPrinta(i);LoopEndSub2.打印九九乘法表PrivateSubcommand1_click()Fori=1To9Forj=1To9Print()NextjPrint()EndSub3.判断一个数是否素数PrivateSubcommand1_click()x=InputBox("请输入一个整数")flag=1Fori=2To()IfxModi=0Thenflag=0EndIfNext

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。