华工最新版VB习题答案VIP专享VIP免费

《VB.NET语言程序设计》习题答案第1章概述1．1填空题1．答案：低级语言、高级语言2．答案：编译、解释3．答案：编译、运行、逻辑1．2问答题略1．3编程题1．解答:ImportsSystem.ConsoleModuleModule1SubMain()WriteLine("欢迎使用VisualBasic！")EndSubEndModule2.解答:ImportsSystem.ConsoleModuleModule1SubMain()Dimx,yAsDoubleWrite("请输入的矩形的长:")x=ReadLine()Write("请输入的矩形的宽:")y=ReadLine()WriteLine("圆周长={0:f}",2*x+2*y)'计算输出周长WriteLine("圆面积={0:f}",x*y)'计算输出面积EndSubEndModule第2章基本数据类型与表达式2．1填空题1．答案：关键字2.答案：标识符3．答案：4、8、4、8、164．答案：整、单精度浮点、货币5．答案：函数运算、算术运算、关系运算、逻辑运算16．答案：Round(1234.567,0)7．答案：Mid(“VisualBASIC6.0”,8,5)8．答案：Int((b-a+1)*Rnd+a)2．2选择题1．答案：c2．答案：d3．答案：c4．答案：c5．答案：b6．答案：a7．答案：c8．答案：a9．答案：d10．答案：b2．3下列变量名哪些是正确的，哪些是错误的？答：1.n正确。2.3x错误。变量名必须以字母为开始。3.Abs错误。不能和关键字同名。4.85错误。变量名必须以字母开始。5.print_56正确6.名称正确。7.ab#正确。#是类型说明符。8.MyName错误。变量名内不能有空格字符。9.“年龄”错误。这是字符串常量。10.学校$正确。$是类型说明符。2．4把下列数学表达式写成VB表达式。答案：1.1/(1+(1/(1+1/(x+y))))2.x*(x*(x*(a*x+b)+c)+d)+e3.Log(1+Abs((a+b)/(a-b))^10)4.Sqrt(1+3.14159/2*Cos(48*3.14159/180))5.1/Tan((1-x*x)/(1+x*x))或者Cos((1-x*x)/(1+x*x))/Sin((1-x*x)/(1+x*x))6.Log10(a*a+a*b+b*b)2．5写出下列函数的值。答案：1.-123462.12343.12.344.1234.575.1006.27.Visual8.09.$$$22．6写出下列表达式的值。答案：1.42.03.abc123abc4.True5.True6.True7.False8.True2．7用关系表达式或逻辑表达式表示下列条件。答案：1.iModj=02.n0OrYearMod400=02．8问答题略2．9阅读下列程序，写出执行结果1.答案：-3VisualBasicFalse0.75x=12.342.答案：3E81.000000E0031,000.00x=1000，y=12.34,x*y=123402．10编程题1.解答:ImportsSystem.ConsoleModuleModule1SubMain()Dimx%,i%,j%,k%Write("请输入x的值:")x=ReadLine()i=x\100j=(x-i*100)/10k=x-i*100-j*10WriteLine("{0}{1}{2}",k,j,i)'或WriteLine("{0}",100*k+10*j+i)EndSubEndModule2.解答:ImportsSystem.ConsoleModuleModule13SubMain()DimxAsSingle,yAsSingle,bAsBooleanWrite("请输入x的值:")x=ReadLine()Write("请输入y的值:")y=ReadLine()b=(-2<=x)And(x<=2)And(-2<=y)And(y<=2)WriteLine("{0}",b)EndSubEndModule第3章程序流程控制3．1填空题1．答案：s=3.14159*r*r3．答案：IfiMod2=0Thenprintx4．答案：Ifx>0Thens1=s1+xElses2=s2+x5．答案：Ifx>0Theny=2*x+1ElseIfx=0Theny=0Elsey=2*x-16．答案：Ifa=bThenPrint“aisequaltob”End7．答案：IfAsc(ch)>=97AndAsc(ch)<=122ThenPrint“Yes”ElsePrint“No”EndIf8．答案：这些常数中的某一个9．答案：这个范围内的值10．答案：Is后的关系11．答案：循环体、循环条件、结束循环条件12．答案：DoWhile…Loop语句13．答案：For…Next14．答案：循环条件15．答案：ExitFor3．2选择题１．答案：d2．答案：d3．答案：d4．答案：c45．答案：d56.答案：c7．答案：c8．答案：c9．答案：c10．答案：a、c11．答案：b12．答案：c13．答案：b3．3问答题略3．4阅读下列程序，写出执行结果1.答案：a=-1b=3c=2S=2w=0t=02.答案：x=2y=4x=8y=9x=4y=8x=15y=2263.答案：t=9454.答案：x=105y=3845.答案：s=366.答案:1020213031327．答案：s=363．5编程题1.解答ImportsSystem.Console1ModuleModule1SubMain()Dimscore!Write("请输入score的值:")score=ReadLine()Ifscore>=85ThenWriteLine("Verygood!")ElseIfscore>=60ThenWriteLine("Good!")ElseWriteLine("Nogood!")EndIfEndSubEndModule2.解答Import...