立信 VB书面习题(1-3章)答案
大学VB实验答案
上海立信会计学院本科实验报告班级：学号：姓名：指导教师：系部：专业：实验时间：实验4 循环结构一、实验目的1．掌握For语句的使用2．掌握Do语句的各种形式的使用。
3．掌握如何控制循环条件，防止死循环或不循环。
二、实验要求1．在C:\下建立子文件夹“VB实验4”，按照题目要求，在该文件夹下为各题保存相应的文件，如本实验中的第一题，需保存的文件有：工程文件(41.vbp)、窗体文件(41.frm) 及可执行文件（41.exe），本实验中的第二题，需保存的文件有：工程文件(42.vbp)、窗体文件(42.frm) 及可执行文件（42.exe），其余实验依此类推。
2．撰写实验过程中出现了哪些问题、错误，你是如何解决的，做一个小结。
三、实验内容：1.编一程序利用单循环结构显示如图4-1所示的界面。
要求：循环体内显示的内容用String函数来实现，找出循环控制变量与String函数内字符个数的关系：即String(2*i-1,Trim(Str(i)))。
窗体显示字体默认、大小为小四，通过单击窗体触发程序运行。
图4-1Private Sub Form_Click()For i = 1 To 9Print Tab(15 - i); String(2 * i - 1, Trim(Str(i)))Next iEnd Sub2.计算π的近似值，π的计算公式为：)12()12()2(75653431222222+⨯-⨯⋅⋅⋅⨯⨯⨯⨯⨯⨯⨯=n n n π，要求：单击按钮同时显示当n=10、100、1000时的结果，利用Format 函数保留5位小数。
窗体中所有控件字体默认、大小为小四。
效果如图4-2所示。
图4-2Private Sub Command1_Click()pi = 2For i = 1 To 10pi = pi * (2 * i) ^ 2 / ((2 * i - 1) * (2 * i + 1))Next iPrint " n=10 ∏近似值="; Format(pi, "0.00000")pi = 2For i = 1 To 100pi = pi * (2 * i) ^ 2 / ((2 * i - 1) * (2 * i + 1))Next iPrint " n=100 ∏近似值="; Format(pi, "0.00000")pi = 2For i = 1 To 1000pi = pi * (2 * i) ^ 2 / ((2 * i - 1) * (2 * i + 1))Next iPrint " n=1000 ∏近似值="; Format(pi, "0.00000")End Sub3. 求Sn=a+aa+aaa+aaaa+…+aa …aaa(n 个a)，其中a 是一个由随机数产生的1～9（包括1、9）中的一个正整数，n 是一个由随机数产生的4～9（包括4、9）中的一个正整数，产生随机数需使用Randomize 语句。
会计书本的答案(立信会计出版的版本)
第一章总论二、单项选择题1 B2 D3 B4 B5 D6 A7 C8 B9 B 10 D 11 D 12 D 13 A14 D 15 A 16 D17 D 18 D三、多项选择题1 ACD2 BC3 ABC4 ABD5 ABD6 ABC7 ABD8 AC 9AB10 ACB 11 ABC 12 BCD 13 BCD 14 ABD 15 BC 16 BD四、判断题1 ×2 √3 ×4 ×5 ×6 ×7 √8 ×9 √10 ×五、计算题第二章会计核算基础二、单项选择题1 A2 A3 B4 B5 A6 B7 C8 A9 A 10 C 11 D 12 D 13 A 14 D 15 C16 A 17 B 18 B 19 C 20 C三、多项选择题1 ABCD2 ACD3 AC4 ABCD5 BCD6 AD7 ABCD8 ABC9 ABC10 ABCD 11 AC 12 ABC 13 ABD 14 ABC 15 AD 16 AC 17 AC 18AB19 ABC 20 ABD四、判断题1×2× 3 √ 4 √5×6×7×8×9×10×五、计算题账户余额及发生额表六、业务处理题(1) 编制会计分录1．借：固定资产10000 2 借：库存现金1000贷：银行存款10000 贷：银行存款10003 借：原材料200004 借：生产成本40000贷：实收资本20000 贷：原材料40000 5．借：应付账款22500 6 借：银行存款159999贷：银行存款22500 贷：长期借款1599997 借：应交税费—应交所得税9000 8 借：库存现金5000贷：银行存款9000 贷：营业外收入50009 借：银行存款16000 10 借：应付账款28000库存现金2000 短期借款20000贷：应收帐款18000 贷：银行存款48000记入有关账户银行存款应交税费资本公积总分类账户本期发生额及余额试算平衡表单位：元第三章会计循环一、略二、单项选择题1.B2.D3.C4.B5.B6.C7.B8. D 9.D 10.A 11.B 12.B 13.C 14.C15.D 16.D 17.A 18.C 19.C 20.D21.B 22.B 23.C 24.C 25.B 26.A27.A 28.D 29.B 30.D 31.B 32.A33.B 34.B 35.C 36.A 37.C 38.B39.D 40.A 41.B 42.C三、多项选择题1.ABCD2.ABD3.ABCD4.ABD5.ABCD6.ABCD7.ABD 8.ABC 9.CD 10.BC 11.ABD 12.BD13.ABD 14.BD 15.ABCD 16.ABC 17.AC 18.BCD19.BD 20.ABD 21.BCD 22.ABD 23.ABC 24.ABCD25.AB 26.ABCD 27.ABC 28.BCD四、判断题1.×2.√3.×4. √5. √6. √7.×8.×9. √ 10. √11.× 12.× 13.× 14.× 15.× 16. √ 17. √ 18. √ 19. √ 20.×21.× 22. √ 23.× 24. √ 25. √ 26. √ 27. √ 28× 29.× 30.×五、综合业务题收款凭证借方科目：银行存款 2008 年 7 月 1 日银收字第 001 号附件 1 张摘要贷方科目金额过账总账科目明细科目百十万千百十元角分收到投资者款项实收资本 3 0 0 0 0 0 0 0合计￥ 3 0 0 0 0 0 0 0会计主管记账出纳审核制单张山收款凭证借方科目：银行存款 2008年 7 月 10 日银收字第 002 号附件 2 张摘要贷方科目金额过账总账科目明细科目百十万千百十元角分销售商品收款主营业务收入 1 0 0 0 0 0 0 0 应交税费应交增值税 1 7 0 0 0 0 0合计￥ 1 1 7 0 0 0 0 0 会计主管记账出纳审核制单张山付款凭证贷方科目：银行存款 2008 年 7 月 5 日银付字第 001 号附件 1 张摘要借方科目金额过账总账科目明细科目百十万千百十元角分提取现金现金 2 0 0 0 0 0 0 0合计￥ 2 0 0 0 0 0 0 0 会计主管记账出纳审核制单张山付款凭证贷方科目：银行存款 2008年 7 月 9 日银付字第 002 号附件 2 张摘要借方科目金额过账总账科目明细科目百十万千百十元角分支付材料款原材料A材料8 0 0 0 0 0 0 应交税费应交增值税 1 3 6 0 0 0 0合计￥9 3 6 0 0 0 0会计主管记账出纳审核制单张山付款凭证贷方科目：银行存款 2008年 7月 15 日银付字第 003 号附件 2 张摘要借方科目金额过账总账科目明细科目百十万千百十元角分支付广告费销售费用广告费 6 0 0 0 0 0合计￥ 6 0 0 0 0 0 会计主管记账出纳审核制单张山银行存款日记账第页第四章货币资金及应收款一、名词解释（略）二、单项选择题1.A2.B3.A4.B5.C6.C7.B8.A9.C 10.C 11.B 12.B 13.C 14.C 15.A 16.A17.B 18.D 19.C 20.A三、多项选择题1.AB2.BC3.ABD4.ABC5.ABCD6.BCD7.CD 8.CD 9.ABC 10.ACD 11.ABCD 12.AD13.ABD 14.ABC 15.ABCD 16.ABC四、判断题1.×2.√3.×4. √5. ×6.×7. √8.×9. √ 10. √ 11.× 12.× 13.× 14. √ 15.× 16. √17.× 18.× 19. √五、综合业务题1.答案（1）借：现金 2 000贷：银行存款 2 000（2）借：其他应收款——张山1500贷：现金1500（3）借：银行存款50000贷：应收账款——绿水公司50000（4）借：原材料——A材料10000应交税费——应交增值税（进项税额）1700贷：银行存款11700 （5）借：应付账款——江滩公司20000贷：银行存款20000（6）借：管理费用——差旅费1650贷：其他应收款——张山 1500现金 1502. 答案（1）借：其他货币资金——银行汇票存款100 000贷：银行存款100 000 （2）借：其他货币资金——外埠存款200 000贷：银行存款200 000 （3）借：原材料——甲材料90 000应交税费——应交增值税（进项税额）15 300贷：其他货币资金——银行汇票存款100 000银行存款 5 300 （4）借：原材料——乙材料160 000应交税金——应交增值税（进项税额）27 200贷：其他货币资金——外埠存款187 200 借：银行存款12 800贷：其他货币资金——外埠存款12 8003. 答案（1）2008年9月1日销售商品时，记：借：应收账款--乙公司 210 600贷：主营业务收入 180 000 应交税费--应交增值税（销项税额） 30 600 （2）2008年9月30日结转销售成本时，记：借：主营业务成本 102 000 贷：库存商品 102 000 （3）2008年11月1日取得短期借款时，记：借：银行存款 145 000 贷：短期借款 145 000 （5）2008年12月31日计提坏账准备时，记：应计提坏账准备金额＝210 600×2%＝4 212（元）借：资产减值损失 4 212贷：坏账准备 4 212 （6）2009年1月1日偿付短期借款本金及利息时，记：借：短期借款 145 000 财务费用（145 000×4%÷12×2） 966.66贷：银行存款 145 966.66 4.答案坏账准备计算表（账龄分析法）2008年应计提的坏账准备=225+100+450+450+375=1 600（元）“坏账准备”账户贷方余额=2 000（元）本月实际应提坏账准备=1 600-2 000=-400 （元）即应忡减400元借：坏账准备 400贷：资产减值损失 4005. 答案（1）2008年末借：资产减值损失 30 000贷：坏账准备 30 000（2）2009年5月25日核销坏账损失时，记：借：坏账准备 60 000贷：应收账款 60 000（3）2009年12月31日计提坏账准备时，记：借：资产减值损失 66 000贷：坏账准备 66 000（4）2010年8月5日已核销的应收账款又收回时，记：借：应收账款 50 000贷：坏账准备 50 000 借：银行存款 50 000贷：应收账款 50 000（5）2010年12月31日冲减已计提的坏账准备时，记：借：坏账准备 47 000贷：资产减值损失 47 000（6）2011年12月31日计提坏账准备时，记：借：资产减值损失 3 000贷：坏账准备 3 000第五章存货一、名词解释 (略)二、单项选择题1.D2.A3.D4.A5.B6.C7.D8.B9.D 10.B 11.D 12.A 13.B 14.D 15.B 16.D三、多项选择题1.ABC2.BCD3.ACD4.ABCD5.ABCD6.CD7.ACD 8.ABC 9.ABD 10.BCD 11.ABCD12.ABC 13.AB 14.ABC 15.AC四、判断题1.×2.×3.√4.×5. √6. √ 7√8.× 9.× 10. √ 11. √ 12.× 13. √ 14.× 15.×五、综合业务题（1）6月1日，冲回上月暂估入账的材料借：原材料 50 000（红字）贷：应付账款 50 000（红字）（2） 6月3日收到在途物资借：原材料 200 000贷：在途物资 200 000（3）6月8日，购入材料借：原材料1 010 000应交税费——应交增值税(进项税额) 170 000贷：银行存款 1 180 000(4)6月10日，收回委托加工的包装物借：周转材料——包装物 40 000贷：委托加工物资 40 000(5)6月13日，用银行汇票购入材料借：原材料 208000应交税费——应交增值税(进项税额) 34000贷：其他货币资金 242000借：银行存款 58000贷：其他货币资金 58000(6)6月18日，收到原暂估入账材料的发票，用商业汇票结算材料款借：原材料 5 0000应交税费——应交增值税(进项税额) 8 500贷：应付票据 58 500(7)6月22日，收到预付款购入的材料借：原材料 44 000应交税费——应交增值税(进项税额) 6 800贷：预付账款 50 800借：预付账款 30 800贷：银行存款 30 800(8)6月25日，接受材料捐赠借：原材料 100 000应交税费——应交增值税(进项税额) 17 000贷：营业外收入 117 000(9)6月30日，材料盘盈借：原材料 10 000贷：待处理财产损溢 10 000(10)6月30日，结转包装物成本借：其他业务成本4贷：周转材料——包装物4(11)6月30日，结转原材料成本借：生产成本——基本生产成本 800 000——辅助生产成本 120 000制造费用 20 000管理费用 30 000贷：原材料 970 0000(1)8月5日用商业汇票采购材料借：材料采购 600 000应交税费——应交增值税(进项税额)102 000贷：应付票据 702 000(2)8月8日材料入库借：原材料 650 000贷：材料采购 600 000材料成本差异 50 000(3)8月20日用银行存款购入材料借：材料采购 1 050 000应交税费——应交增值税(进项税额) 170 000贷：银行存款 1220 000借：原材料 1 040 000材料成本差异 10 000贷：材料采购 1 050 000(4)8月31日结转发出材料成本①结转材料的计划成本借：生产成本 1 400 000管理费用 80 000制造费用 20 000贷：原材料 1 500 000②结转材料成本差异材料成本差异率=(月初结存材料的成本差异+本月入库材料的成本差异)÷(月初结存材料的数量+本月入库材料的数量)=(10.69-5+1)÷［500+65+104］×100%=1%借：生产成本(140万×1%) 14 000管理费用(8万×1%) 800制造费用(2万×1%) 200贷：材料成本差异 15 0003. 答案(1)计算甲商品应提的跌价准备甲商品可变现净值=甲商品的估计售价-甲商品估计的销售费用及相关税金=2300-60=2240(万元)因甲商品的账面成本为2000万元，低于可变现净值，存货跌价准备余额应为零；年末计提跌价准备前，甲商品的跌价准备余额为110万元，故应冲回跌价准备110万元。
最新版VB教材习题参考答案
最新版VB教材习题参考答案P18-19选择题CAACB CDADC填空题1．对象、Windows、事件驱动2．窗体、工程3．查看对象、查看代码4．CmdExam、Click、lbldisp5．工具栏“启动”按钮、菜单“运行| 启动”、F5键6．命令按钮7．Cancel8．Label1P37-38选择题ACDBC ABABD写出下列表达式的值１．４２．０３．８４．False５．False6．True７．－１8．16.79．C10．Basic11．VISUAL12．5将下列代数式或命题改写成Visual Basic 表达式1．(A + b) / (c * d - Sqr(1 - A * A)) + 5 ^ (1 / 3) * (Cos(3.14159 / 3)) ^ 2 2．Sin(3.14159 / 4) + Abs(x - y)3．2 * Exp(x) + Log(x * y)4．(Log(50) / Log(10) - Log(20)) / (9 * Exp(3))5．Abs(x) >= y And Abs(x) <> z6．m >= 0 And m < 1007．A Mod 3 = 0 Or A Mod 7 = 0 或A / 3 = A \ 3 Or A / 7 = A \ 7 8．N Mod 4 = 0 And N Mod 100 <> 0 Or N Mod 400 = 0P74-80选择题(CD)BBBC AD(BD)CD AADAA D填空题1．15 152．x = 3 y =103．4．（1）12345 54321 （2）逆序并输出5．ABCDE6．327．K、If x < n Then n = x : nk = i 、mk 、m8．Then Exit For 、f1 And f2 Then 、f1 = f29．n 、Len(Cstr(n))-1 、c-1 、Loop Until nn = 0 或Loop Until c < 0 、m = n Then 10．Opt1 、Opt2 、Opt3 、Cstr(k) 、k Mod 10或k – 10、Asc(“A”)P100-102选择题BADC填空题1．Option Base 12．Redim、Preserve3．LBound、UBound4．Variant（可变）5．Index6．4 117．278．Arr(1) : Fmin = 1 、min = arr(i) : Fmin = iP142-145选择题CBABD DD(DA)(BC)A ABAAA填空题1．部件2．Style3．Print lstEx.List(2)4．CmdEx.Text = cmdEx.List(4)5．-（减号）6．Popupmenu7．Enabled、Interval、True、> 08．框架和图片框9．MultiLine、ScrollBars10．AutoSize、Stretch11．Image1.Picture = LoadPicture(“C:\pic1.jpg”)12．Scroll13．另存为14．顶级（非最底层）15．（1）ListIndex、Text或List(Lst1.ListIndex)（2）List(2)（3）x, Lst1.ListIndex+1（4）ListCount – 1、Selected 、RemoveItem iP161-163选择题CCCAD填空题1．同一存储单元2．Exit Sub 、End Sub3．Function testAB(a!, b!) As Boolean4．函数名5．局部变量6．Static7．声明语句所在的过程、声明语句所在的模块、整个应用程序8．全局（公有Public）、模块（私有Private）9．程序设计技术、有递归表达式、有递归约束条件10．6 8 46 4 311．0.6 1.812．2 5 8 1113．3 1 30 1 34 1 30 1 31 1 3P177-178填空题1．112．MouseDown、MouseUp、MouseMove3．Shift、Ctrl 、Alt4．MouseDown、MouseUp、Click、DblClick、MouseUp5．Aa6．按<Ctrl + Alt >的同时按鼠标右键7．Form-66Text-66P197-198选择题CBADD填空题1．数据文件和程序文件、顺序文件和随机文件、文本文件和二进制文件。
VB课后练习答案.doc
VB课后练习答案P12第一章课后练习答案:一、选择题二、填空题第二章（P39）选择题答案：填空题答案：1.Cmdl, Click2.Text 1.Text二"Hello"P64第三章课后练习答案一、选择题二、填空题1.(Y Mod 4=0 And Y Mod 10000) Or Y Mod 400=0 2.a<>0 And b*2-4*a*c>=0 3.X Mod 5=0 And X Mod 2=0 或 Tnt(x/5)=X/5 And Int(X/2)=X/2 4. 注意：返回的均是字符型。
第四章课后答案：P79一、选择题答案为：$$41.50010二、填空题三、程序设计题（提示）1、鸡的头数为x,兔的头数为y,则可列方程式:\x-\- y = h （兀 * 2 + y * 4 =于求得x, y 的值再在窗体上输出结果。
2、 利用Format 格式函数，再通过窗体的Print 将格式化后的信息输出到窗体上。
3、 厶员I 的周长=2加" $岡的面积=加25、通过Inputbox 函数或用文本框输入三边和圆的半径a,b,c, r,利用公式：. a + b + cn 二 ---------2 S 三角形面积=Jh （h - - b ）（h - c ）P97第五章课后练习答案:第9题| D一、选择题答案D 改为:30二、填空题第］题Y Mod 4二0 And Y Mod 100二0 Or Y Mod 400二0 第2题笫3题笫4题Private Sub Command l_Click()X=Val(Textl.Text)Select Case XCase Is>200. Isv-10()Print “xv 100 Or x>200"Case ls<=0Y=l()()-XCase Isv二100Y=100+XCase Is<=200Y=400End SelectText2.Text=yEnd Sub三、程序设计题(提示)1、判断条件：假设一个整数为xX Mod 3=0 Or x Mod 5=0 或x/3=x\3 Or x/5=x\52、选项按钮的知识点在P182,利用该控件的Wlue属性判断是否选中该项。
立信 VB书面习题(1-3章)答案
习题三 P581， 2 ， 3 ， 4 ， 5 ， 7 ，91. 下列哪些是VB 的合法常量，分别指出其类型。
（1）100.0 单精度型 （2）%100 非法 （3）1E1 单精度（4）123D3 双精度型 （5）123,456 非法 （6）0100 整型（7）”ASDF ” 字符型 （8）“1234” 非法 （9）#2000/10/7# 日期型 （10）100# 双精度型 （11）π 非法 （12）&O100 八进制整型（13）&O78 非法 （14）&H123 十六进制整型 （15）True 逻辑型（16）T 非法 （17） &H12ag 非法 （18）-1123! 单精度型2. 下列符号中，哪些是VB 的合法变量名？（1）a123 合法 （2）a12_3 合法 （3）123_a 非法 （4）a 123 非法（5）Integer 非法 （6）XYZ 合法 （7）False 非法 （8）sin(x) 非法（9）sinx 合法 （10）变量名 合法 （11）abcdefg 合法 （12）π 非法3. 把下列算术表达式写成VB 表达式。
(1) 5||z y x ++答：Abs(x+y)+z^5（2） 6)1(xy +答： (1+x*y ）^6（3）xyy x 310+ 答：(10*x+Sqr(3*y))/x/y(4) ac a b b 242-+- 答：(–b+sqr(b^2-4*a*c))/(2*a)（5） 3211111r r r ++ 答：1/(1/r1+1/r2+1/r3)(6) 110ln 45sin 10++++y x e答：sin(45*3.14/180)+(exp(10)+ log(10))/sqr(x+y+1)4. 根据条件写出相应的VB 表达式。
（1）产生”C ”~”L ”范围内的一个大写字符。
答：Chr(int(Rnd*10+67))(2) 产生100~200（包括100和200）范围内的一个正整数。
【精品】VB课后习题答案.doc
第1章参考答案1.选择题(1) B (2) B2.综合题(1)属性有：蓝色、带有纹路；方法有：踢、按住；事件有：滚动、静止。
(2)VB应用程序开发的一般步骤有：①创建用户界面；②设置对象的属性；③编写代码；④程序运行与调试；⑤保存与编译。
第2章参考答案1.选择题(1) A (2) C (3) D (4) B (5) A (6) C2.操作题Private Sub Command1_C1ick ()Label1. Caption 二Textl.TextEnd SubPrivate Sub Command2_Click()Label1. Caption 二〃〃Textl.Text 二End SubPrivate Sub Form Load ()Label1. Caption 二Textl. PasswordChar 二"$〃End Sub第3章参考答案1.选择题(1)B、C 分析：(B) 3Acd以数字开头；(C)IF是VB的关键字(2) B 分析：逻辑常量的值只有两个True和False,特别注意” false”是字符串常量。
(3) C 分析：VB表达式不区分大小写。
(4) C 分析：Long是长整型，Byte是字节型，Interge是整型。
2.综合题(1) a = Int(Rnd * (100))分析：产生一个区间在［m, n］之间的随机整数，其表达式为Int(Rnd*(n-m+1)+m)(2)Int (X*100+0. 5)/100 分析：Int (X*100+0. 5)的作用是将X 扩大100 倍后，第三位小数小于0.5,则舍掉，大于0.5,则产生进位，取整后就是四舍五入的作用，再除以100,是还原为原值。
(3)Private Sub Command1_C1ick()a 二Int (99 * Rnd + 1)b 二Int (99 * Rnd + 1)Label1. Caption 二 a & "+〃 & b & "二?“End Sub(3)①False ②True ③ 8 Mod 3+3八3/4\5 (有改动)答案：3第4章参考答案1.填空(1)T F (2)F (3) HEIGHT>160 AND HEIGHT<165 END IF(4) SC0RE>60^ LblSc. caption=、ELSE> LblSc. caption-., ENDIF (5)EXIT(6)21 (7)16 (8) 0 、 1 、>100 、Total+Num、Num+22.程序设计题(略)第5章章参考答案1.选择CCDBDDBCCABACBB2.操作题(1)实现多中选一的功能，通过用图片框和框架来实现单选按钮的分组，方法是，选中图片框或框架后，再在里面绘制单选按钮，另一种方法是将绘制好单选按钮剪切粘贴到图片框或框架中。
VB教程课后习题的答案及解析
=第二章标准控件和属性1．下列可以激活属性窗口的操作是（ D ）A）用鼠标双击窗体的任何部位 B）执行‘工程’菜单中的‘属性窗口’命令 C）按Ctrl+F4键 D）按F4键2．确定一个控件在窗体上的位置的属性是（ D ）A）Width或Height B）Width和Height C）Top或Left D）Top和Left3．确定一个窗体或控件的大小的属性是（ B ）A）Width或Height B）Width和Height C）Top或Left D）Top和Left4．在Visual Basic中，所有标准控件都具有的属性是( B )。
【2013年9月考试真题】A) Caption B) Name C) Text D) Value参考答案：B【解析】VB标准控件中不同控件具有不同属性，有的相同有的不同，但都具有Name属性。
故选B。
5．为了让计时器控件每隔10秒产生了一个Timer事件，应把Interval属性设置为（ B ）A) 1000 B) 10000 C) 10 D) 1006．下面关于单选按钮和复选框的叙述中正确的是（ D ）A) 单选按钮被选中则它的Value属性为True；复选框被选中则它的Value属性为2B) 单选按钮被选中则它的Value属性为True；复选框被选中则它的Value属性为TrueC) 单选按钮被选中则它的Value属性为1；复选框被选中则它的Value属性为1D) 单选按钮被选中则它的Value属性为True；复选框被选中则它的Value属性为17．将文本框的ScrollBar设置为2，文本框中却没有垂直滚动条，其原因为（ B ）A) 文本框的Locked属性值为True B) 文本框的MultiLine属性值为FalseC) 文本框的MultiLine属性值为True D) 文本框中没有内容第三章简单程序设计语句1.在面向对象的程序设计中，可被对象识别的动作称为( B )。
计算机VB第三章课后参考答案
第3章参考答案(P80)一．单选题1．D 2. A 3. C 4. D 5. B二、填空题1、SmallChange2、Locked3、Int(Rnd * 900 + 100)4、 2 * 3.1415926 * R + Exp(-5)) * Log(x + 15、续行符(空格加下划线)三．程序阅读题1、Hello LiLi Li2、Hello LiLi Hello实验部分：1．参考代码Private Sub Form_Click()Dim a As Single, b As Single, h As Single, s As Singlea = InputBox("输入梯形的上底")b = InputBox("输入梯形的下底")h = InputBox("输入梯形的高")s = (a + b) * h / 2MsgBox "梯形面积为：" & Round(s, 2)End Sub2、参考代码Private Sub Form_Load()Form1.Caption = "颜色示例"HScroll1.Max = 255HScroll1.SmallChange = 10rgeChange = 20HScroll2.Max = 255HScroll2.SmallChange = 10rgeChange = 20HScroll3.Max = 255HScroll3.SmallChange = 10rgeChange = 20Label1.Caption = "红"Label2.Caption = "绿"Label3.Caption = "蓝"Label4.Caption = 0Label5.Caption = 0Label6.Caption = 0Text1.Text = ""End Sub4、参考代码Private Sub Form_Load()Form1.FontSize = 16Form1.Caption = "字体示例" & TimeLabel1.Caption = "水光潋艳晴方好，山色空蒙雨亦奇" & Chr(10) & Chr(13) & "欲把西湖比西子，淡妆浓抹总相宜" End SubPrivate Sub Command1_Click()Label1.FontBold = FalseLabel1.FontItalic = FalseLabel1.FontUnderline = FalseEnd SubPrivate Sub Command2_Click()Label1.FontBold = TrueEnd SubPrivate Sub Command3_Click() Label1.FontItalic = TrueEnd SubPrivate Sub Command4_Click() Label1.FontUnderline = True End SubPrivate Sub Command5_Click() EndEnd Sub。
VB教材课后习题参考答案
二. 多项选择题三. 填空题1．事件驱动2．解释编译3．设计、运行和中断。
4．属性、事件和方法。
5．窗体单击（Form_Click）。
6．代码7． MyForm 。
习题2参考答案一．单选题二. 多项选择题三. 填空题1、⑴sin(50*3.14/180) ⑵(2+x*y)/(2-y^2)⑶a^2-(3*a*b/(3+a)) ⑷(x^3)^(1/8)+sqr(y^2+4*a^2/(x+y^3))2、int(rnd*(51)+50)3、⑴138 ⑵3 ⑶214 ⑷inchina ⑸70 (6)45⑺0习题3二．多项选择题三．填空题1． MultiLine,ScrollBars, 2 (或Vertical) 。
2． Label1.caption= "a*b=" 。
3． height 和 width 。
4． 2 。
5． Text1.SetFocus 。
6．编程技术，程序设计。
7．Change内容改变，将文本框内容显示在标签中。
GotFocus(获得焦点)，选中文本框内容。
8．(1)Value ,(2) Value习题4参考答案三．填空题1、s = True And a >= 18 And a <= 20 And h > 165 Or s = False And a >= 16 And a <= 18 And h > 1602、600003、6，-2，24、Select Case xCase Is <= 0y = 4Case Is < 10y = 0Case Is < 15y = 1Case Is < 20y = 2Case Is <= 30y = 3Case Elsey = 4End Select5、(1)x>100 And x Mod 5=0 (2)0 (3)len(Text1.Text) (4)Text1.Text6 (1)D (2)A (3)B第5章习题5一．单选题1． A 2． C 3.⑴ C⑵ B 4． B 5． C 6． A7．D 8.D 9.A 10.C 11.A二.多项选择题1. ABCDE 2． BE 3. ABCDE三．分析程序1．⑴(4 ,13) ⑵(3,8) ⑶(3,27) ⑷(5,11) ⑸(3,10)2．12343. 64. 175. (1)len(s) (2)mid(s,k,1) (3)c & t (4)text2.text6. (1)0 (2)n+1 (3)2^n7.(1) mid(x,p+3) (2) 3 (3) p8． (1)Text1.Text (2)len(s)(3)x>="a" and x<="z" or x>="A" and x<="Z"(4) y & x9. (1)change (2)value习题6参考答案一．单项选择题1、D2、A3、C4、(1)B,(2)B5、C6、C7、A8、(1)C (2)B (3)A (4)B (5)D二．多项选择题1、CE2、DE3、ABC三．填空题1、数组D为 2 维数组，共有 16 个元素，第一维下标从 0 到 3 ，第二下标从 -1 到 2 。
VB-课本标准答案
VB-课本答案————————————————————————————————作者：————————————————————————————————日期：第三部分习题与解答第1章程序设计语言与程序设计1．1填空题1．VB是以（事件驱动）作为运行机制的新一代可视化程序设计语言。
2．程序设计语言是（人）与（计算机）交流的工具。
3．若从机器执行的角度来对程序设计语言进行分类，则可以分为（低级语言）和（高级语言）两种。
4．计算机系统中，对高级语言的翻译工具称为（编译）程序或（解释）程序。
5．源程序中的错误一般分为（编译）错误、（运行）错误和（逻辑）错误等三种。
6．VB把一个应用程序称为一个（工程），它包含各种文件。
1．2 选择题1．把a和b的乘积写成ab的错误属于（c ）错误。
a) 编译b) 运行c) 逻辑d) 编译和运行2．用户在什么时候都可以按（b ）键来查看与当前进行的工作相关的帮助。
a) Held b) F1 c) ESC d) F104 窗体文件的扩展名为（d ）。
a) .vbp b) .bas c) .exe d) .frm4．指示一个窗体位置的值是窗体的（c ）。
a) 对象b) 事件c) 属性d) 方法5．下面选项中不能运行VB程序的操作是（a ）。
a) 双击窗体b) 单击“启动”按钮图标c) 从菜单栏运行菜单中选“全编译执行”菜单命令d) 按F5键1．3 问答题1．低级语言和高级语言的各自特点是什么？答：参见教材1.1。
2．什么是数据描述和数据处理？答：参见教材1.2。
3．源程序的翻译方式有哪两种，简述它们的工作过程。
答：参见教材1.1。
4．一个好程序的基本要求是什么？答：参见教材1.2。
5．Visual BASIC 集成开发环境的主窗口由哪些部分构成？各自的主要功能是什么？答：参见教材1.3。
6．简述在VB的环境下，对象、属性、方法、事件和事件驱动程序的概念，并用例子进行说明。
答：在VB的环境下，对象是系统中的基本运行实体，它封装了数据和操作。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
习题三 P58
1， 2 ， 3 ， 4 ， 5 ， 7 ，9
1. 下列哪些是VB 的合法常量，分别指出其类型。
（1）100.0 单精度型 （2）%100 非法 （3）1E1 单精度
（4）123D3 双精度型 （5）123,456 非法 （6）0100 整型
（7）”ASDF ” 字符型 （8）“1234” 非法 （9）#2000/10/7# 日期型 （10）100# 双精度型 （11）π 非法 （12）&O100 八进制整型
（13）&O78 非法 （14）&H123 十六进制整型 （15）True 逻辑型
（16）T 非法 （17） &H12ag 非法 （18）-1123! 单精度型
2. 下列符号中，哪些是VB 的合法变量名？
（1）a123 合法 （2）a12_3 合法 （3）123_a 非法 （4）a 123 非法
（5）Integer 非法 （6）XYZ 合法 （7）False 非法 （8）sin(x) 非法
（9）sinx 合法 （10）变量名 合法 （11）abcdefg 合法 （12）π 非法
3. 把下列算术表达式写成VB 表达式。
(1) 5||z y x ++
答：Abs(x+y)+z^5
（2） 6)1(xy +
答： (1+x*y ）^6
（3）xy
y x 310+ 答：(10*x+Sqr(3*y))/x/y
(4) a
c a b b 242-+- 答：(–b+sqr(b^2-4*a*c))/(2*a)
（5） 3
211111r r r ++ 答：1/(1/r1+1/r2+1/r3)
(6) 110ln 45sin 10++++y x e
答：sin(45*3.14/180)+(exp(10)+ log(10))/sqr(x+y+1)
4. 根据条件写出相应的VB 表达式。
（1）产生”C ”~”L ”范围内的一个大写字符。
答：Chr(int(Rnd*10+67))
(2) 产生100~200（包括100和200）范围内的一个正整数。
答：Int(Rnd*101+100)
（3）已知直角坐标系中任意一点的坐标（x,y ），表示其位于第一或第三象限内。
答： x*y>0
(4) 表示x 是5或7的倍数。
答：x Mod 5=0 or x Mod 7=0
（5）将任意一个两位数x 的个位数与十位数对换。
例如，x=78,则表达式的值应为87.
答：(x Mod 10)*10+x\10
(6) 将变量x 的值按四舍五入保留小数点后两位。
例如，x 的值为123.2389，则表达式的值应为123.24。
答：Round(x*100)/100 （或Round(x,2)）
（7）表示字符型变量C 是字母字符（不区分大小写字母）。
答：Ucase(c)>=”A ” And Ucase(c)<=”Z ”
或 Lcase(c)>=”a ” And Lcase(c)<=”z ”
(8) 取字符型变量S 中从第5个字符起的6个字符。
答：Mid(S,5,6)
（9）表示关系表达式2010<≤x 。
答：x>=10 And x<20
(10) x, y 之一小于z 。
答：x<z And y>=z Or y<z And x>=z
（11）x 和 y 都大于z 。
答：x>z And y>z
5. 写出下列表达式的值：
（1）123+23 mod 10 \ 7+Asc(“A ”)
答：188
(2) 100+”100”& 100
答：”200100”
（3）Int(68.555*100+0.5)/100
答：68.56
(4) 已知A$=”87654321”,求表达式Val(Left$(A$,4)+Mid$(A$,4,2))
答： 876554
（5）DateAdd(“m ”,1,#1/30/2000#)
答：#2/29/2000#
(6) Len (“VB 程序设计”)
答： 6
7. Visual Basic 提供了哪些标准数据类型？声明类型时，其类型关键字分别是什么？其类型符又是什么？
答： 课本P39页表3.1
9. 将数字字符串转换成数值，使用什么函数？判断是否是数字字符串，使用什么函数？取字符串中的某几个字符，使用什么函数？实现大小写字母间的转换，使用什么函数？
答：数字字符串转换成数值，用Val( )函数；IsNumeric( )函数判断是否是数字字符串；Mid( )函数用于取字符串中的某几个字符；Ucase( )函数用于将小写字母转换成大写字母；Lcase( )函数用于将大写字母转换成小写字母。