vb模拟练习参考答案

《vb模拟练习参考答案》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。

1、第一套1.下列关于程序设计的说法正确的是（B）A、程序设计就是指示计算机如何去解决问题或完成一组可执行指令的过程B、程序设计就是寻求解决问题的方法，并将其实现步骤编写成计算机可以执行的程序的过程C、程序设计语言的发展经历了机器语言、汇编语言到高级语言的过程，比较流行的高级语言是Pascal、FORTRAN、Excel.c++等。D、程序设计语言和计算机语言是同一概念的两个方面2.图形符号在算法流程图描述中表示（C）八、算法的开始或结束B、输入输出操作C、处理或运算的功能D、用来判断条件是否满足需求3.Integer类型的变量可存的最大整数为（C）。Integer范围-32768〜32767A、

2、256B、32768C、32767D、655364.代数表达式*g八改成VB表达式后，错误的是（D）'其他三个都是正确的g*「2/2Bxg*t*t/2C、l/2*g*「2D、g「2/25.对于窗体，click（单击）是它的一个（C)A、重要对象B、重要方法c、重要事件D、重要属性6.下列变量名写法错误的是（D）A、abcBsabcl23C^abc123D.123abc7.在VB屮，下列（B）函数是求绝对值的。A>int(x)B>abs(x)C、sqr(x)D.gn(x)'《X的最大整数'求X的平方根'判断X的符号，如是整数则为1,0则为0,负数则为-18.在VB屮，设置控件的大小，可改变下列（

3、A）属性A>height与widthheight与topC、left与topD^left与width9.以下是一段vb程序:b=a+lc=a+b它的基本结构属于（A）A、顺序结构B、选择结构C、循环结构D、树型结构10、下列程序段运行后，Value的值为（A）X二20ifx>=10thenValue=5*xElseValue二4*xEndifA、100B、80C、90D、7011、下面是判断变量x是不是能被5整除的偶数的程序，横线上的逻辑表达式应为（AB）PrivateSubCommand1Click（）DimxAsIntegerx=Vai(textl.Text)IfThenlabell.Ca

4、ption二〃这个数是能被5整除的偶数〃Elselabel1.Caption二"这个数不是能被5整除的偶数"EndIfEndSubA、(xMod5)=0And(xMod2)=0B、xMod10=0C、xMod5=0D、xMod2=012、阅读下面程序，单击窗体后，在窗体上输出的是(A)PrivateSubform_Click()Dim•1AsIntegerDimsAsTntegers二0For■1=1To5s二s+i累加，求1+2+3+4+5NextI循环结束后i=5+l=6Prints,iEndSubA.156s二15i二613、阅读下面程序，单击窗体后，在文本框textl中显示的内容是(A

5、)PrivateSubform_Click()DimintiAsIntegerDimint2AsIntegerinti=1int2=0DoWhileinti<20int2=inti+int2inti=inti*(inti+1)LoopTextl.Text=int2①int2=l②int2=3③int2=9①intl=2②int2=6③int2=42EndSubA、9B、8C、714、下列程序段中，循环体执行的次数是(B)y二2D、6dowhiley<=8y二y+y①y=2②y=4③y=8执行3次loopA、2B、3C、415、设计一个程序，打印下面所示的图案程序：PrivateSubForm_

6、click()DimiAsInteger定义i为整型变量DimjAsInteger定义j为整型变量D、5*********Fori=-3To3PrintTab(Abs(i)+5)'确定每行的起始位置Forj=1To(4-Abs(i))-1Print"*”；NextjPrintNextiEndSub16、编写程序，求歹

7、的值。(x的值在程序中调用inputbox函数,在[x2-x+l(x>0)j弹出的标准输入对话框中输入)。完成所有操作后，按“ctrl+s”保存PrivateSubFormclick()DimxAsSingle'定义x为单精度型变量，由标准输入对话框输入DimyAsSingle'

8、定义y为单精度型变量，值由窗体显示x=Val(InputBoxC请输入变量x"))Ifx<=0Theny=x*x+1Elsey=x*x-x+lEndIfPrintyEndSub17、编程计算$=1—丄+---+•••+-——o23499100PrivateSubForm_click()DimsAsSingle'定义s为单精度型数DimiAsInteger定义循环变量s=0Fori=1To100If