vb补充习题答案.docVIP

下载本文档

6
0
约2.11千字
约 2页
2017-08-13 发布于河南
举报
版权申诉

vb补充习题答案.doc

1、原创力文档（book118）网站文档一经付费（服务费），不意味着购买了该文档的版权，仅供个人/单位学习、研究之用，不得用于商业用途，未经授权，严禁复制、发行、汇编、翻译或者网络传播等，侵权必究。。
2、本站所有内容均由合作方或网友上传，本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺！文档内容仅供研究参考，付费前请自行鉴别。如您付费，意味着您自己接受本站规则且自行承担风险，本站不退款、不进行额外附加服务；查看《如何避免下载的几个坑》。如果您已付费下载过本站文档，您可以点击这里二次下载。
3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等，请点击“版权申诉”（推荐），也可以打举报电话：400-050-0827(电话支持时间：9:00-18:30)。
4、该文档为VIP文档，如果想要下载，成为VIP会员后，下载免费。
5、成为VIP后，下载本文档将扣除1次下载权益。下载后，不支持退款、换文档。如有疑问请联系我们。
6、成为VIP后，您将拥有八大权益，权益包括：VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
7、VIP文档为合作方或网友上传，每下载1次，网站将根据用户上传文档的质量评分、类型等，对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档

VB程序设计习题参考答案一、单选题 1—5 DDADC 6—10 CDBCB 11—15 CBCCD 16—20 BCCDC 21—25 ADCCD 26—30 BBDAC 31—35 BBBBA 36—40 ABAAA 41—45 DCBBD 46—50 DDACD 51—55 BCDBA 56—60 ACCA B 61—65 DCDBB 66—70 ACDDD 71—75 BCAAD 76—81 ABBDB 二、填空题（1） 1 、2 4 、 3 6 9 （2） 13、5 8 11、1 4 7 10 （3） 12 、3 、 3 、 GCD(27,12)=3 （4） 11 、-20 （5） 16 （6） 16 9 4 1 、9 4 1 16 、 4 1 16 9、 1 16 9 4 （7） 3 、7 、11 （8） 4 、 5 、 6 （9） 1 3 2 、1 12 2 （10） x 、DDDyCyCx （11） ABC 、 BCD （12） 5 1 、 10 5 （13） 5 6、0 0 （14） 21 13 8、5 3 2、1 1 （15） oe 、 s 、 Visual （16） DCB 、 D 、 3 （17） B 、 A （18） A 、 C 、 D （19） C 、 A （20） B 、 A 、 A （21） D 、 A 、 B （22） A 、 C 、 B （23） 14 、 17 、 20 、2 （24） 5 、 *(前有两个空格)、 ***** 三、完善程序（1）As Boolean 、 Len(CStr(x)) 、sum+s^n 、sum=x （2）Print 、Max=a(i,1)、k=5、flag=false或Not flag （3）13、f( n , p , x )= f(n,p,x)、f=(n-x+1)*p*f(n,p,x-1)/(x*q) （4）Mid(str1, i, 1)、ReDim Preserve char(k)、str2 = 、 Text2 char(i) （5）（m+n）Mod 2 =0 And mn And n Mod 3 =0 、 (m ^ 2 - n ^ 2) / 2、a1 As Long, a2 As Long、s Mid(CStr(a1), i, 1) （6）a=string(L, 0) a、 c = c zh(b)、 p = p + 1、 zh = Chr(n + 55) （7）Call sort(a)或者sort a、Picture1.Print j ，值为 a(n)或b(j)、10 （8）b = b \ 10、i = i + 2 （9）s = CStr(i)、t = t s = change(s) *9 Chr(13) Chr(10)、p = p Mid(s, i, 1) （10）rewind(L)或rewind(L)=true 、ReDim a(n)、rewind = True （11）i = 9 、 k = x Mod 10、 i = i + 1 （12）C、B、A、C （13）sign * x ^ (2*i+1) / fact(i)、Until Abs(t) = 1E-6、fact=1 （14）A、D （15）B、C、B、B （16）A、C、D、A、C （17）C、D、A、D （18）A、B、C、D 四、编程题（1）D （2）B （3）A （4）D （5）D （6）B 五、程序改错（今年期末考试新增加题型）（1）B 提示： a As Single Text2.Text = Str(s)应该移至do-loop语句之后，不应该在循环体里面 Loop Until Abs(a) =