资源描述:
《visual basic程序设计教程实验答案》由会员上传分享,免费在线阅读,更多相关内容在工程资料-天天文库。
1、VisualBasic程序设计教程实验答案实验一1.PrivateSubCommand1_Click()Label3.Caption=Text1.TextEndSub2.PrivateSubCommand1_Click()'手动Timer1.Interval=0CallmymoveEndSubPrivateSubCommand2_Click()'自动Timer1.Interval=200EndSubPrivateSubForm_Load()Timer1.Interval=0EndSubPrivateSubTimer1_Timer()Cal
2、lmymoveotherstaffoftheCentre.Duringthewar,ZhuwastransferredbacktoJiangxi,andDirectorofthenewOfficeinJingdezhen,JiangxiCommitteeSecretary.Startingin1939servedasrecorderoftheWestNorthOrganization,SecretaryoftheSpecialCommitteeAfterthevictoryofthelongMarch,hehasbeentheNorthw
3、estOfficeoftheFederationofStateenterprisesMinister,ShenmufuguSARmissions,DirectorofNingxiaCountypartyCommitteeSecretaryandrecorderoftheCountypartyCommitteeSecretary,MinistersandEndSubSubmymove()Label1.Left=Label1.Left-50IfLabel1.Left<-Form1.WidthThenLabel1.Left=0EndSub3.P
4、rivateSubForm_Click()Text1.Text=Val(Text1.Text)+1EndSub5.PrivateSubCommand1_Click()Text2.Text=Text1.TextText2.FontName="隶书"Text2.FontSize="25"EndSubPrivateSubCommand2_Click()Text2.Text=Text1.SelTextText2.FontName="宋体"Text2.FontSize="15"EndSubotherstaffoftheCentre.Duringth
5、ewar,ZhuwastransferredbacktoJiangxi,andDirectorofthenewOfficeinJingdezhen,JiangxiCommitteeSecretary.Startingin1939servedasrecorderoftheWestNorthOrganization,SecretaryoftheSpecialCommitteeAfterthevictoryofthelongMarch,hehasbeentheNorthwestOfficeoftheFederationofStateenterp
6、risesMinister,ShenmufuguSARmissions,DirectorofNingxiaCountypartyCommitteeSecretaryandrecorderoftheCountypartyCommitteeSecretary,Ministersand6.Dimh%,w%PrivateSubCommand1_Click()Image1.Width=w/2Image1.Height=h/2EndSubPrivateSubCommand2_Click()Image1.Width=wImage1.Height=hEn
7、dSubPrivateSubForm_Load()w=Image1.Widthh=Image1.HeightEndSub实验二1.PrivateSubCommand1_Click()Text1.Text=Int(Rnd*(9-1+1)+1)Text2.Text=Int(Rnd*(99-10+1)+10)Text3.Text=Int(Rnd*(999-100+1)+100)EndSubotherstaffoftheCentre.Duringthewar,ZhuwastransferredbacktoJiangxi,andDirectorof
8、thenewOfficeinJingdezhen,JiangxiCommitteeSecretary.Startingin1939servedasrecorderoftheWestNorthO