- 1、本文档共113页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
第2章 Visual Basic 编程基础 本章内容 2.1窗体 2.1.1 窗体的构造 2.1.2 窗体的属性 2.1.3 窗体的事件 2.1.4 窗体的方法 2.1.5 多窗体 2.1.6 窗体加载与卸载时触发的事件 2.2数据类型、常量与变量 2.3 Print语句和赋值语句 2.4运算符、表达式、常用内部函数 2.5 编程实例 2.1窗体 2.1.1 窗体的构造 2.1.2 窗体的属性 2.1.3 窗体的事件 2.1.4 窗体的方法 2.1.5 多窗体 2.1.6 窗体加载与卸载时触发的事件 2.1.1 窗体的构造 同普通应用程序的窗口一样,用Visual Basic设计的窗体也具有控制菜单、标题、最大化按钮、最小化按钮、关闭按钮、边框、窗体最小化图标等。 下页的图2-1是我们在上一章的实例中编制出来的程序窗体,图中标出了窗体的这些构造,并在括号中标注了与这些构造相关的属性名称,你可以在窗体设计时,通过修改这些属性值来改变窗体的外观。 2.1.1 窗体的构造 2.1.2 窗体的属性 窗体的常用属性有:Name、Left、Top、Width、Height、ScaleWidth、ScaleHeight、Caption、Font、ForeColor、BackColor、AutoRedraw、BorderStyle、ControlBox、Icon等。 2.1.2 窗体的属性 1. 窗体的名称属性(Name属性) 属性窗体列表中的“(名称)”属性,它指示了窗体的内部名称。Visual Basic中的任何对象都有Name属性,每个对象的名称各不相同,它是一个对象区别于另一个对象的标识,程序员在设计代码时,需要用对象的名称来引用对象。第一个窗体新建时的缺省名称是Form1,你可以对其重命名,赋予它更加体现实际意义的名称,如“MainForm”等。 注意:Name属性值不会反映到界面上,但它被用于代码中,如果在编程过程中,对象的名称被修改,很可能使原来运用旧名称编写的代码出错,因此,改对象的名称一般放在编制代码前进行,在本书的大多数例程中,我们将不对对象名称进行修改,而是使用系统提供的默认名称。 2.1.2 窗体的属性 2. 窗体的位置和大小属性(Left、Top、Width、Height) 如图2-2(下页)所示,窗体在屏幕上的位置由窗体左上角在屏幕上的坐标决定,即窗体左边距离屏幕左边的距离,以及窗体上边距离屏幕上边的距离,这两个属性分别是窗体的Left属性和Top属性。而窗体的大小则由窗体的宽和窗体的高来决定,它们分别是窗体的Width属性和Height属性。另外,在Visual Basic中,屏幕也被当作对象来处理,它的对象名称为Screen,屏幕具有宽和高的属性。 注意:在Visual Basic中,长度的缺省单位是twip。 在缺省情况下,1twip=1/15像素=1/1440inch=1/567cm。 2.1.2 窗体的属性 2.1.2 窗体的属性 【例2-1】 窗口位置和大小的设置演练:设计一个窗体,上面有两个命令按钮Command1和Command2,为这两个按钮添加Click事件代码,使得运行时单击第一个命令按钮,能将窗体移到屏幕的左上角,单击第二个命令按钮,能将窗体移到屏幕的中间,并改变窗体的大小为屏幕大小的一半。 步骤一,界面设计。 新建工程,在新窗体Form1上添加两个命令按钮,采用默认名称Command1和Command2(图2-3)。 2.1.2 窗体的属性 步骤二,添加事件代码。 双击Command1,为Command1的Click事件添加以下代码: Private Sub Command1_Click() Form1.Left = 0 设置窗体Form1到屏幕左边的距离为0 Form1.Top = 0 设置窗体Form1到屏幕上边的距离为0 End Sub 注:上面代码的单引号后的文字是对程序的注释,以便于你理解代码,可不用输入。 2.1.2 窗体的属性 双击Command2,为Command2的Click事件添加以下代码: Private Sub Command2_Click() Form1.Width = Screen.Width / 2 设置窗体Form1的宽度为屏幕宽的一半 Form1.Height = Screen.Height / 2 设置窗体Form1的高度为屏幕高的一半 Form1.Left = (Screen.Width - Form1.Width) / 2 使Form1水平居中 Form1.Top = (Screen.Height - Form1.Height) / 2 使Form1垂直居中 End S
文档评论(0)