大学vb实验报告册答案含编程

《大学vb实验报告册答案含编程》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。

1、实验一：一、选择I.D2.D3.B4.A5.B6.C7.CD&D9.D10.BCII.A12.D13.D14.C15.A二、填空1.windows2.中断3.工具箱4.代码5.分类12.工20.对象6.form2.show7.出现语法错误8.错9.事件10.面向对象11.工程文件结构程13.设计程序代码14.双击窗体15.C:ProgramFilesMicrosoftVisualStudioVB98或者VB的安装文件夹16.属性17.方法1&font19.form_load()实验二：一、选择I.B2.C3.B4.C5.C6.C7.B8.

2、B9.D10.AII.C12.C13.C14.B15.116.C17.B1&D19.C20.C二、填空1.Form_Click()2.Intervals50003..vbp.frm4.lefttopHeightsWidthtwip5.picture6.load7.locked8.font/lignmcnt9.GotFocusOLostFocusO10.属性窗口程序代码实验三：一、选择1.A2.BC3.BC4.A5.A6.A7.BCD8.1)9.B10.B11.B二、判断题不合法的变量：3.4.5.6.8.10.11.14.15.16.三、1

3、abs(x+y)2.(3+x*y)"23.(-b+sqr(b"2-4*a*c))/(2*a)4.sin(30*3.14/180)+exp(2)四、1.int(rnd*71+20)或int(rnd*71)+202.x<0andy>0orx>0andy<0或者x*y<03.xmod3=0orxmod7=0或x/3二x3orx/7=x74.x>=10andx<203.x>二"A"andxU〃Z"6.left(s,3)实验四：一、选择l.C2.D3.C4.D5.A6・D7.B8.B9.A10.C二填空1.4&71E-01,-4.87122.关系、逻

4、辑、算术3.900,100,mid(s,2,1)4.nu1,2,3、printm&"月是第二季度".endselect1.X=42.10y=13实验五一、选择BCBAC二、填空(1)forx=2to10s*(l-1/x)t>lE-65(2)1(3)jt(4)511实验六一、选择BCCCDDDDCA实验七一、选择1C2C3D4A5B6D7AB8A9A10A二、填空(1)n!(2)1+1+2+3+4+……+n(3)n是否是素数(4)冒泡排序(5)递归调用产牛斐波那契数列(6)求最大公约数和最小公倍数实验二PrivateSubCommand1Clic

5、k()Labcl3=Vai(Tcxtl)*Vai(Tcxt2)EndSubPrivateSubConmiand2_Click()Labe13=Val(Textl)/Vai(Text2)EndSub2-2PrivateSubConimandl_Click()Picturel.Picture二LoadPicture("d:tul.jpg")EndSubPrivateSubCommand2_Click0Picturel.Picture=LoadPicture("d:lu2.jpg")EndSubPrivateSubCommand3_Click()

6、Picturel.Visible=FalseEndSub2-4PrivateSubConimandl_Click()Text2=Text1EndSubPrivateSubCommand2_Click()Textl=””Text2二”"EndSubPrivateSubFormLoadOCommandl.Visible=FalseComniand2.Visible=FalseEndSubPrivateSubTextl_Change()Commandl.Visible=TrueConmiand2・Visible=TrueEndSub2-5Privat

7、eSubEorm^Load()Image1・Picturc=LoadPicturc(Z，C:DocumcntsandScttings'AllUscrsDocumcntsMyPictures示例图片Sunset.jpg")EndSubPrivateSubCommandl_Click()Timerl.Enabled=TrueEndSubPrivateSubCommand2Click()Timer1.Enabled=FalseEndSubPrivateSubImage1Click()Timer1・Enabled=FalseEndSubPri

8、vateSubTimerl_Timer()Image1.Loft=Int(Rnd*(Forml.ScaleWidth-Imagol.Width))Im