欢迎来到天天文库
浏览记录
ID:57026828
大小:914.00 KB
页数:35页
时间:2020-07-26
《程序设计教程课件.ppt》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库。
1、上次课程回顾VisualBasic6.0一个基于对象的可视化设计工具事件驱动的编程机制vb的三种工作模式设计模式、运行模式、中断模式VB程序组成Visual可视化界面设计:添加对象、设置属性BASIC程序设计:编写代码、调试运行和保存第2章VB可视化编程基础2.1VB对象的概念2.2窗体和基本控件2.3综合应用2.1VB对象的概念2.1.1对象和类1.对象对象指现实世界中的实体。如一个人、一辆汽车、一台电脑、一份报表等。每个对象有自己的特征、行为和发生在该对象上的活动。面向对象程序设计中:对象的三要素对象的特征——属性对象的行为——方法对象的活动——事件
2、2.类类是对同一种对象的集合与抽象。如人类是“人”的抽象。类是创建对象实例的模板,对象则是类的一个实例。如一个叫“张飞”的人,是人类的一个实例。类包含所创建对象的属性数据,以及对这些数据进行操作的方法。封装和隐藏是类的重要特性。3.VB中的类和对象VB工具箱中的可视图标是VB系统设计好的标准控件类。通过将控件类实例化,得到真正的控件对象。在窗体上画一个控件,就将类转换为对象,创建了一个控件对象。理论上操作上例如:工具箱内的TextBox是类(它确定了TextBox的属性、方法和事件)窗体上显示的是两个TextBox对象Text对象TextBox类2.1.
3、2对象的属性、事件和方法属性、事件和方法构成对象的三要素1.属性存放对象的数据对象属性的2种设置方法:设计阶段在属性窗口直接设置属性值程序运行阶段在代码窗口通过语句<对象名>.<属性名>=<属性值>例如:Command1.Caption="确定"事件发生在对象上的事情同一事件,对不同的对象,会引发不同的反应:2.事件教师_铃声()讲课EndSub学生_铃声()听讲EndSubVB为对象预先定义了一系列的事件。例如,单击Click、获取焦点GotFocus、按下键盘KeyPress等其他人员_铃声()可不响应EndSub事件过程应用程序处理事件的步骤应用程
4、序设计的主要工作就是为对象编写事件过程的代码。事件过程的形式如下:Sub对象名_事件(参数)…事件过程代码EndSub事件过程注意:在代码窗口,自动产生事件过程的模板,不要修改模板的内容,只需键入过程的代码。例:单击按钮,使Text1的字体为20磅.SubCommand1_Click()Text1.FontSize=20EndSub例:单击窗体,使label1的字体为隶书,18磅SubForm_Click()Label1.FontName=“隶书”Label1.FontSize=18EndSub模板产生用户编写输入程序执行的次序与程序设计者无关,取决于用
5、户的操作,这就是事件驱动程序设计方式。VB程序的执行步骤如下:①启动应用程序,装载和显示窗体;②窗体(或窗体上的控件)等待事件的发生;③事件发生时,执行对应的事件过程;④重复执行步骤②和③。事件驱动3.方法面向对象的程序设计语言,为程序设计人员提供了一种特殊的过程和函数,称为方法。方法是面向对象的,调用时一定要指明对象。对象方法的调用格式为:[对象.]方法[参数名表]若省略对象,表示当前对象,一般指窗体。例如:Text1.SetFocus,此语句使Text1控件获得焦点,光标在本文框内闪烁。注意:对象的事件和方法是固定的2.2窗体和基本控件2.2.1通用
6、属性:窗体和控件具有基本属性(1)Name名称属性所创建的对象名称,在程序中引用。(2)Caption标题属性该属性决定了对象上显示的内容。(3)Height、Width、Top和Left属性决定对象的高度、宽度,和位置。(4)Enabled属性对象是否允许操作(5)Visible属性对象是否可见2.2.1通用属性(6)Font属性组文本的外观FontName字体、FontSize大小FontBold粗体、FontItalic斜体、FontStrikethru删除线、FontUnderline下划线(7)ForeColor属性前景颜色(8)BackCol
7、or属性背景颜色(9)MousePointer属性鼠标指针类型设置值范围0~15,由系统指定。若为99,由用户提供的图形文件定义鼠标指针形状。(10)MouseIcon属性自定义的鼠标图标在MousePointer属性值为99时,存放自定义的鼠标图标文件(.ico或.cur)。控件默认属性所谓默认属性是程序运行时,可以改变某控件的值,而不必指定该控件的哪个属性。控件默认属性控件默认属性文本框命令按钮单选按钮TextDefaultValue标签图形、图像框复选框CaptionPictureValue例如,下面两条语句是等价的:Text1.Text="Vis
8、ualBASIC"Text1="VisualBASIC"例2.1在窗体上建立两个
此文档下载收益归作者所有