VB技能初赛试题

《VB技能初赛试题》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、2011职计春《VB可视化编程》技能比赛试题姓名：总分：调试运行下列程序并写出结果(每题15分，共75分)：1．PrivateSubForm_Click()StaticSumAsIntegerForI=1To5Sum=Sum+INextIPrintSumEndSub写出程序运行时单击窗体后，Form1上的输出结果。2．PrivateSubForm_Click()DimcAsInteger,jAsInteger,kAsIntegerk=0c=1Forj=1To6Ifj>4Thenc=c+5ExitForElsek=k+1EndIfNextjPrintc,kEndSub写

2、出程序运行时单击窗体后，c,k的值分别是：3．.PrivateSubCommand1_Click()DimsAsDoubleDimiAsIntegers=5i=1DoWhilei<91=i+25=s+iLoopText1.Text=sEndSub文本框Text1的输出结果是：4.PrivateSubCommand1_Click()3DimXAsInteger,YAsIntegerX=0:Y=1Fori=1To3Forj=1ToiY=YjNextjX=X+YNextiPrintXForml上的输出结果。EndSub写出程序运行时单击命令按钮后，窗体5.FunctionF

3、(aAsInteger)DimbAsIntegerStaticcAsIntegerb=b+2c=c+2F=a+b+cEndFunctionPrivateSubCommand1_Click()DimaAsIntegera=6Fori=1To3PrintF(a)NextiEndSub写出程序运行时，单击命令按钮在窗体上的输出结果。编程（25分）：1、编写一个统计大奖赛选手得分的程序，界面设计如下图。（13分）33要求：⑴单击得分显示按钮，用随机函数生成选手的得分（80〜99）,并添加到文本框中；⑵单击“计算最后得分”按钮，可计算该选手的最后得分（去掉一个最高分和最低分，3

4、让后把剩下的得分求平均值）除文本框中所有的内容。2、编写一收款计算程序。“计算”按钮显示“应付款”面如下图所示。（12分）,并将得分显示到相应的文本框中；⑶单击“清除”按钮，清要求用户输入商品的“单价”、“数量”和“折扣”后，单击,单击“清除”按钮，清除文本框中所有的数据。程序运行界TextlText4Text3CommandlCommand2Text23