VB2010编程入门ABC

1、 /12.麹IJ1If-g_Cd谍I工具箱“起始页-MicrosoftVisualStudio文禅旧编瑁旧視图凋试Q）团kCM）舞（A）TMfT）購结构（泌试分析少J篦规此組中没有可用的控仇将某顷拖至肚立本可将其添加到工Mkiowfr:VisualStudio2010旗舰版打开软件VisualStudio2010旗舰版uTeamFoundationSe-rver就建项巨VB2010编程入门ABC #/12 #/12Ctrl-nNShift+Alt+N=*起蜡页-MicrosoftVisualSiudie立仲:F）編辑E视圏M调试Q团IYI）数据曲.旬新建项目們新韋网站帆:NSFRIiLlETF

2、Inbn新建项目，或（Ctrl+N） #/12 /12对细嗟器已彌啪相EKeflKfeR-尿诃Studio文加删8iEl板匡育和q阀KfW）埠丸工BEtLSSpinc）Siaisi台折国匚冋社的应丰段有可用诡牛.好9E取1S至UtSTSMT騷D到工务VisualBsehc|.NETFramework4打目闻进邑|默讣垣WimHowiE!竝阴丽VisualBasicVisualBasic加BlC# /12 #/12M4dfc型中呉可巨如症烦直壬比丈本可1尊曲肛厨工叵SJlv?rhgh|SilwrhgM庖韦也事ASPJJETMVE27i访据曜席WPFViwalVisualB-wkQrskViGud

3、BxkViHjfllBnkVisuBrVisudQ-MicYbudBasic:ViGudBasicViwaJB-NvtmrkppPcurFiduaaft-riirt口Frrral.h-b*BifcarMcktciC-0t4h4it4 /12 #/125testl-MicrosoftVisualStudio対牛（F）褊辑旧观图w项目即生成凋试团臥（爾）数捋iam体累结构q测试分用:勾洋禹肉”氐|鼻）器曲C&I蠢|匚呈|kJJJ|Debug #/12工MM=耳|牛指针ButtonCheckBox鱼：CheckedListBoxComboBoxDateTimePickerALabelA1InIrla

4、lki.a-1 /12 #/12单击上图的保存单击保存！生成的文件J?亘囹片3立档h胡四Forml.DEKigner.vb勾Forml.vbtEratl岛twtl.vbproj2OLV1O/617:362011/1-0/fi17:36201V10/617:36jOLO/5/1&4弓2010/5/46:452OLV1O/617:362011/1-0/617:36VisualBasicSou.VisualBas-icSoluVi&ualBasicProj.VisualStudioPr1KB1KB /12団臥（呵瞒4）亘国亘|启硼试（F5）捕徐结构（冷测试匡总i却F也含到唐中T垢则录證文些娄d-勺A

5、pplication.Designer.vb2Q11/10/&17:33VisualBasicSou.2KEK虹iApplicstiofi.hnyapp2011/10/61733MYAPP文件1KE勺Assemblylnfo.vb2Q11/10/&17:33VisualBaicSou.2kg勺Re&DurceEiDedgner.vb2Q11/1W17:33VisualBasicSou.3KE曲Resources20105/46：45.NETManaged6KE勺Setzing.Designer.vb2Q11/10/&17:33VisualBasicSou.3KBF-JIiw.Il旧片菊Sett

6、ings2010/5/46:45VisualStudioSet.1KEJ*芒乐寸|卜计算机*本地谢逮（FJ*vs201&test卜te&tl卜teEtlMyProject更多地文件细节信息，可以在自己动手编程时进行查看! #/12 #/12单击上图所示，启动调试口二Forimlrn百I壬 /12 #/12testl-MicrosoftVisualStudio立件旧躺辑旧视囹凹项目（P生成调试Q）团臥M）豐单击，并在窗体上建立新button按钮。Button1的属性： /12雇性E-uttoniLSystem.Windows.Forms.ButtnT*!1专I|冒孑|SApplicationse

7、ttings(DataBindings.NameButtonlAece-ssibleDes-criptionAcc&ssibleNamAccessibleRoleDefaultAllowDropFalseAnchorTop.LeftAut&Ellipsis.FalseFeIs目Auto-SizeModeGrouvOnlyE自匚IcColoirControlEm匚kgroundlmageEackgrouridimageLayoiTileCaue-sValidatinTru?ContextMenuStripCursorDefaultDialogResuItNoneDockNoneT&xt与掏牛关联

8、的文本。ButtonlSystem.Windows.Forms.Button专J|is莎3DockNoneEnabledTrueFlatAppearsneeFlatStyleStandardFont和,9ptFo-reColo-rControlTextGenerate-MemberTruemage-ramage-AlignMiddl&Cent&rmageindexnraImage-Keyo闲mage-Li&tLocatiom隅77LockedFalseMargin3.弐3卜MaximumSizeD,0MinimumS-ize0oModifie-rsFriendPadding0.0.t.0Tex

9、t与控杵关麻的交本 /12 /12ButtonlSysterrii.Window&.Forms.Butto-nL&ckedFalseMargin3.|3d3MaxiniLimEizeo.oMinimumGize-o.oModife-rsFriendPaddingQ6也RightToLeftNoSize96,50Tabindex0TabStopTrueTagIfKtButton1T&xtAlignMiddleCenterTbxlUmage-R.elatio-nOverlayUseCo-mpatiblBTextRencFakeUseMnemonicTrueUseVisualStyleEackGol

10、oTrueUseWailCur&orFalsaVisible-TrueB-Text与控件关联的坯双击按钮Button1PublicClassForm1PrivateSubButton1_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton1.ClickEndSubEndClass /12 /12飙-P-ublicClassFcmlPriwateSubButtcm.l_Cllck(ByVaDutton1Test=htll口EndSubEndClass保存(Ctrl+Shift+S)启动调试(F5)单击But

11、ton1 /12 #/12好的）工具体至结籾C）测试单击上图，停止调试简单的绘图添加PictureBox /12双击Buttonl添加代码：二一.-PublicClassForntlPrivateSubButt&n.l_Click(EyValsenderAsSystem.Object,ByVaieAsSystenButtonl.Test=helLaPictursBokL.Image=MewEliizmap(PictureBox1.Width.,PictureBoKl.Height)Dimg2AsGraphics=Graptiics.Fromlmagie(Pict口reEl口筈1-Image)g

12、2.DraivRectangle(Pens.BlackyMewRectangle(OjOj2D,20)g2.DraivRectangle(Pens.RedNewRectangle(0Oj10310)DimaalAsPoirrtDima.2AsPoirrtaal.K二20aa2.K二30aal.Y二50aa2.T=60g2DraLine(Fensaal,aa2)禺Dispose()EndSubEndClassPublicClassForm1PrivateSubButton1_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton1.ClickButton1.Text=helloPictureBox1.Image=NewBitmap(PictureBox1.Width,PictureBox1.Height)将PictureBoxl.Image的图像进行定义Dimg2AsGraphics=Graphics.FromImage(PictureBox1.Image)定义图像g2,数据来自于PictureBoxl.Imageg2.DrawRectangle(Pens.Black,NewRectangle(0,0,20,20)绘制方块函数，参数：笔的颜色，方块的左下角，右上角(相对于左下角)g2.Dr