[76E6241D11A049029A0D149985F0B34C.ppt

  1. 1、本文档共30页,可阅读全部内容。
  2. 2、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
[76E6241D11A049029A0D149985F0B34C

第二章 建立简单的VB应用程序 2.3.1 窗 体 创建VB应用程序的第一步是创建用户界面。用户界面的基础是窗体,各种控件对象必须建立在窗体上。 启动VB后,即在屏幕上显示一个窗体。 窗体的属性决定了窗体的外观和操作。窗体的大部分属性可用两种方法来设置:通过属性窗口设置和通过程序代码设置。有少量的属性不能在程序代码中设置。 (1) Appearance属性 该属性决定窗体的外观效果,属性值为0为平面效果,属性值为1为立体效果。 (2) Caption属性 用于设置窗体标题栏显示的内容,它的值为字符串。系统默认的Caption值为Form1。 (3) Icon属性 用于设置当窗体最小化时以该图标显示,如果不设置则以VB默认图标显示。设置方法为,单击Icon属性设置右边的“”,打开“加载图标”对话框,选择图标文件装入。 (4) ControlBox属性 当其值为True时左上角有控制菜单,当为False时为无控制菜单框。 (5) MaxButton 属性和 MinButton 属性 MaxButton属性为True,窗体右上角有最大化按钮;为False时,无最大化按钮MinButton属性为True,窗体右上角有最小化按钮;为False时,无最小化按钮。 (12)Moveable属性 属性值为True或False,设置是否可以移动窗体。 (13)Visible属性 属性值为True或False,设置窗体是否被显示。用户可用该属性在程序代码中控制窗体的隐现。 (14)Picture属性 设置在窗体中显示的图片。单击Picture属性右边的按钮,弹出“加载图片”对话框,用户可选择一个图片文件作为窗体的背景图片。若在程序中设置该属性的值,需要使用LoadPicture函数。 (15)WindowState属性 设置窗体启动后的大小状态。 在VB中,虽然不同的对象有不同的属性集合,但有一些属性,如Name 、Enabled、Visible、Height、Width、Left、Top等,其它控件也有,且具有相似的作用。在后续的章节中,主要介绍各种控件常用的特殊属性。 (二) 事件 窗体最常用的事件有3种:Click(单击)、DbClick(双击)、Load(装入)。 1.Click事件 程序运行后,单击窗体触发该事件。 2.DbClick事件 程序运行后,双击窗体触发该事件。 3.Load事件 Load事件是窗体被装入内存工作区时触发的事件。如果这个事件过程存在,就马上执行它。Load事件过程通常用于启动程序时,对属性、变量的初始化以及装载数据等。 例2-2利用Print方法打印出如图2-15所示的图形,并使用Cls方法将打印出来的图形清除。 在用户界面上放置一个命令按钮,在代码窗口直接设计程序如下: Private Sub Command1_Click() Form1.Cls End Sub Private Sub Form_Click() Print ★★★★★★★★★ ★ Print “ ★★★★★★★★ ★★ Print ★★★★★★★ ★★★ Print ★★★★★★ ★★★★ Print ★★★★★ ★★★★★ Print ★★★★ ★★★★★★ Print ★★★ ★★★★★★★ Print ★★ ★★★★★★★★ Print ★ ★★★★★★★★★ End Sub 程序运行结果如图所示。 例2-3 设计一个窗体, 用于测试鼠标的单击与双击的反应。 直接在代码窗口输入程序代码如下: Private Sub Form_Load() Caption = 加载窗体结果 AutoRedraw = True Picture = LoadPicture(App.Path + \bg1.jpg) FontSize = 40 FontName = 隶书 ForeColor = vbGreen Print Load事件 End Sub Private Sub For

文档评论(0)

wendan118 + 关注
实名认证
内容提供者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档