安徽大学vb教学资料【vb】大一期末考试试题vb

《安徽大学vb教学资料【vb】大一期末考试试题vb》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。

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

2、精度浮点数F列变量名中正确的是（A.3SB.Print卜•列赋值语句（A.sum=sum-sumlast=y/0C.Select）是有效的。B.D.以上都不对C.货币型D.长整型MyNamex+2=x+2D.Select1C.x+y=sum&以下的控件或方法具有输入和输出双重功能的为（A.PrintB.TextboxC.OptionbuttonD.Checkbox9.若要获得列表框屮被选屮的列表项的内容，可以通过访问（）属性来实现。A.NameB.ListlndexC.ListCountD.TextPrivateSubcommand

3、1_click()Dimm(10)Fork=1To10m(k)=11-kNextkx=5Printm(2+m(x))EndSubA.2B.3C・4D・5二、填空题(10分)1.写出整数n能同时被13和仃整除的Basic表达式。2.代码窗口中有两个下拉列表框：左侧是列表椎，右侧是过程列表框。3.写出在字符串”VisualBasic6.0”中截取”Visual”的Basic表达式。4.两数Len(“abcdef')的返回值是。5.设a=2,b=5,c=-2,d=100,贝0a>b>=cANDa=d的值为。6.要使标签的人小自动与所

4、显示的文木相适应，可以通过设置属性为True來实现。7.若要在一行书写多条语句，贝【J各语句间应加分隔符，VisualBasic的语句分隔符为。&要强制显式声明变量，使用语句完成。9.在VB屮，用户定义常量使用语句。语旬，声明变录使用三、将下列数学表达式转换为VB表达式。(6分)1.a2+2ab+b22.3.8exl4.2sin(450)cos(450)5.6.四、判断题，正确打％”，错课打“X”（10分）1.在VB屮，控件的事件只能通过用户的操作触发。（）2.字符型数据以双引号作为定界符，输岀时双引号木身不会显示在屏幕上。（）3.

5、保存工程时，窗体文件和工程文件的文件名不能相同。（）4.改变控件的人小，可以使用鼠标和键盘，还可以通过修改代码。（）5.同一过程屮，数组和简单变蜃可以同名。（）6.VB函数中的参数可以是常量、变量、表达式，还可以是另一个函数。（）7.代码ConstNumber1=15：Number1=10合法。（）&允许将块lf・Then语心结构屮的所有语旬都写在一行上（）9.定义数组语＜ijDima（b）AsInteger是正确的（）10.在过程调用屮，“实参表”和“形参表”屮对丿应的变竝名不必相同，但是变量的个数必须相等，而且实际参数的类型必须

6、与相应形式参数的类型相符。()五、根据题意，将下列程序补充完整。(16分)1.产牛20个［10,100］之间的随机整数，每行输出10个数据。PrivateSubcommand1_click()Dima(1To20)AsIntegerRandomizei=0DoWhilei<20i=i+1a(i)=()If()ThenPrinta(i);EndIfIfi=10ThenPrinta(i)Ifi>10ThenPrinta(i);LoopEndSub2.打卬九九乘法表PrivateSubcommand1_click()Fori=1To9Fo

7、rj=1To9NextjPrint()EndSub1.判断一个数是否索数PrivateSubcommand1_click()x=InputBoxf请输入一个整数”)flag=1Fori=2To()IfxModi=0Thenflag=0EndIfNextiIf()ThenPrintx;”是素数”ElsePrintx;”不是索数”EndSub2.利用数组输出Fibonacci数列的前45项。该数列的第1项和第2项为1,其余各项均为其前两项之和。PrivateSubCommand1_Click()()f(1)=1:f(2)=1Listl.

8、AddItemf(1):Listl.Additemf(2)Fori=3To15f(i)=()Listl.Additemf(i)NextiEndSub六、写出下面程序的输出结果。(每题3分，共18分)1.PrivateSubcomman