VB程序设计基础(终稿)06级试卷A答案.doc

《VB程序设计基础(终稿)06级试卷A答案.doc》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。

1、浙江工业大学2006/2007学年第二学期期终试卷VB程序设计基础A卷答案系洛专业姓名学号_任课教师、选择题（每题1分，共1。分）1、C2、D3、C4、D5、C6、D7、D8、C9、B1()、B二、填空题（每空格1分，共H分）1、72、按地址传递3、&4、ALT+Y5、286、模块级量7、全局量8、（xA5・cos（29*3.1415/180））/（sqr（exp（x）+log（y））+5）9、commondialogl.showfont或commondialog1.action=410、flags11、smallchange12、通用对话框三、是非题（每题1分，共10分，请在括号中填"或

2、X）1、（X）2、（v/）3、（X）4、（X）5、（X）6、（丿）7、（丿）8、（X）9、（丿）10、（X）四、程序阅读题（每题2分，共12分，评分标准：内容正确格式不对扣1分）1、24711162、053、_aaabaababcaababcabcd4、151503015045150601505、wWWWwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww6、y=8y=18五、程序填空题(每空格2分，共20分)1、n二Text1.Text2、(n100)二(nMod10)3、a()asdouble,nasinteger4、n・l5、a(k)>a(i)6、Constpi二3.1

3、4159267、Picturel.FillSfyle=08、・2*pi,・a*x9、Picturel.FillColor二RGB(0,0,255)10、KeyAscii二0六、程序设计题（每题10分，共30分）xx'11、编程计算数学表达式1--+-—+•••+（-1）〃——2!3!4!（h+1）!（函数过程1分）PrivateSubFoiTn_click()DimiAsInteger,sAsSingle,xAsSingle,nAsInteger,siAsSinglen=InputBox(Hn=H):x=InputBox(,'x=n)(变最输入各1分)s=1：sl=1Fori=2Ton+1

4、sl=sl*x/Is=s+(-1)人(i-1)*slNexti:PrintMs=M;s（初值设定各1分）（循环初值与终值设定各1分）（求某一个级数1分）（级数求和1分）（输出1分）EndSub2、PrivateSubForm_click()（函数过程1分）DimnAsInteger,iAsInteger,jAsIntegern=InputBox(nn=n)(数组长度输入1分)ReDinia(n)AsInteger(随机数组定义1分)RandomizeFori=1Ton(随机数组1分)a(i)=Int(Rnd*904-10)Printa(i);(随机数纽输出)NextiPrintPrintm

5、ax(a,n)（换行1分）（函数调用1分）EndSubPnvateFunctionmax(b()AsInteger,mAsInteger)AsInteger（参数传递1分）DimiAsIntegermax=b(1)Fori=2TomIfmax

6、()DimaAsString,iAsIntegerOpen(ne:a.txt")ForInputAs#1DoWhileNotEOF(l)LineInput#1,aList1.AdditemaLoopClose#1（初值设定1分）（最大值判断1分）（函数过程1分）（注意这里的s必须为long型，否则扣1分）（打开文件1分）（1〜10的5次方计算1分）（写文件1分）（关文件1分）（打开文件1分）（判断文件是否结束1分）（行输出1分）（添加到列衣框1分）（关文件1分）EndSub