编程ppt电子课件教案第7章创建windows应用程序

编程ppt电子课件教案第7章创建windows应用程序

ID:33361450

大小:132.50 KB

页数:57页

时间:2018-05-25

编程ppt电子课件教案第7章创建windows应用程序_第1页
编程ppt电子课件教案第7章创建windows应用程序_第2页
编程ppt电子课件教案第7章创建windows应用程序_第3页
编程ppt电子课件教案第7章创建windows应用程序_第4页
编程ppt电子课件教案第7章创建windows应用程序_第5页
资源描述:

《编程ppt电子课件教案第7章创建windows应用程序》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库

1、第7章创建WINDOWS应用程序7.1Point类7.2Size类7.3New运算符7.4Form类的属性7.5Form类的方法7.6Form类的事件7.7SubMain()和Application.Exit()说明:所有例子作为上机作业,必须独立完成。7.1Point类1、说明:Point类是一个结构类型,表示平面坐标系的一个点(x,y)。2、使用:定义Point类对象(变量)的方法Dimp1AsNewPoint(5,10)Dimp2AsNewPoint(15,20)Dimp1,p2AsNewPoint(5,10)'语法错误7.1Point类3、Point类的方法(函数):-----

2、----------------------------------------------方法(函数)调用返回值---------------------------------------------------IsEmpty()p1.IsEmpty()TRUE/FALSEXp1.Xx坐标Yp1.Yy坐标Equals()p1.Equals(p2)TRUE/FALSE---------------------------------------------------7.1Point类4、举例:Dimp1AsNewPoint(5,10)Dimp2AsNewPoint(15,20)Di

3、mresultAsBolleanDima,bAsIntegera=p1.X'a=5b=p1.Y'b=10result=p1.Equals(p2)Ifp1.Equals(p2)=TRUEThen...EndifMe.Location=p17.2Size类1、说明:Size类表示一个宽度和一个高度(Width,Height)。2、使用:定义Size类对象(变量)的方法Dims1AsNewSize(400,400)Dims2AsNewSize(150,200)Dims1,s2AsNewSize(5,10)'语法错误7.2Size类3、Size类的方法(函数):----------------

4、-----------------------------------方法(函数)调用返回值---------------------------------------------------IsEmpty()s1.IsEmpty()TRUE/FALSEWidths1.Width宽度Heights1.Heigh高度Equals()s1.Equals(s2)TRUE/FALSE---------------------------------------------------7.2Size类4、举例:Dims1AsNewSize(400,400)Dims2AsNewSize(150,

5、200)DimresultAsBolleanDima,bAsIntegera=s1.Width'a=5b=s1.Height'b=10result=s1.Equals(s2)Ifs1.Equals(s2)=TRUEThen...EndifMe.Size=s1Me.MaximumSize=s17.3New运算1、说明:New运算用于创建新对象。2、使用:Dim对象名New类名(参数)类名(参数)叫做构造函数。比如用于定义Point或Size类的对象(变量):Dimp1AsNewPoint(400,400)Dims2AsNewSize(150,200)3、New的例子:运行时创建新按钮。D

6、imokBtnAsNewButtonokBtn.Text="OK"okBtn.Location=NewPoint(50,50)控件也可以在运行时建立。7.3New运算4、New的例子:运行时创建新按钮,并且将新按钮设为关闭按钮。(了解)创建新项目打开代码窗口,增加对象定义语句WithEventsokBtnAsNewButton增加窗体“Click”处理过程,在其中增加代码:okBtn.Text="OK"okBtn.Location=NewPoint(50,50)Me.Controls.Add(okBtn)7.3New运算在代码窗口中增加okBtn的“Click”处理过程PrivateS

7、ubButton1_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesokBtn.ClickMe.Close()EndSub运行效果:单击窗体出现“OK”按钮,单击“OK”按钮,窗体关闭。本例在第八章有另外解决方法。7.4Form类的属性说明:Form类属性众多,选择重要的介绍。查看属性:单击设计窗口中的窗体,可以在属性窗口中看到Form类的所有属性。属性含义:属性

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。