找回密码
 注册

QQ登录

只需一步,快速开始

宝峰科技 门户 程序设计 Basic Visual Basic 查看内容
宝塔服务器面板

VB 神童教程 第二章 第十五节——窗体

2010-9-23 22:00| 发布者: admin| 查看: 698| 评论: 0|来自: 互联网

摘要: 窗体犹如一块画布,在设计时是程序的设计区域,而在运行程序时,每个窗体对应于一个窗口。 一、窗体的结构:窗体结构与普通 Windows 下的窗口非常相似,如图一: 图一 系统菜单:Form1.ControlBox,点击它可以弹出菜 ...

窗体犹如一块画布,在设计时是程序的设计区域,而在运行程序时,每个窗体对应于一个窗口。

一、窗体的结构:
窗体结构与普通 Windows 下的窗口非常相似,如图一:


图一

系统菜单:Form1.ControlBox,点击它可以弹出菜单命令。

标题栏:Form1.Caption,显示的窗口标题,如本例中的“Form1”。

最小化按钮:Form1.MinButton 。

最大化按钮:Form1.MaxButton 。

二、窗体的主要属性:
1、名称:命名规则为 FrmX ,如 FrmShow 、FrmFirst ,等等,主要用于程序调用。

2、AutoRedraw(自动重画): 本属性控制图像的重建,常用于多窗体程序设计中,语法如下:

窗体名称.AutoRedraw = True/False

当 AutoRedraw 设置为 True 时,那么本窗体被另外的窗体覆盖后,又回到此窗体时,将自动重新刷新或重画窗体上的所有图形;如果是 False ,则必须通过事件过程来设置这一操作。

默认属性为 False。如图二:


图二

3、BackColor(背景色)与 ForeColor(前景色):
前者用来指定窗体的背景色,如图三:


图三

后者用来指定文本或图形的前景色,如图四:


图四

4、Height(高度)与 Width(宽度):
这两个属性用来指定窗体的高度与宽度,其单位是 Twip ,即 1 点的 1/20 (1/1440 英寸)。

如要让窗体的高度变为 200 ,宽度变为 300 ,那么程序应该写成:

Private Sub Form1_Click()
 Form1.Height = 200
 Form1.Width = 300
End Sub

5、Top(顶部)与 Left(左边距)属性:
通过这两个属性可以控制窗体的坐标位置,默认单位是 Twip 。

要注意的是,随对象的不同,这个 Top 与 Left 的意义不同。当对象是窗体,Top 指的是窗体顶部与屏幕顶部的相对距离,Left 指的是窗体左边界与屏幕左边界的间距;当对象是其他控件时,它们分别表示控件顶部、左边与窗体顶部、左边之间的距离,如图五所示:


图五

语法示例:

Private Sub Form1_Click()
 Form1.Top = 200
 Form1.Left = 300
End Sub

上面的语句会把 Form1 窗体移动到距屏幕顶部 200 Twip ,距屏幕左边距 300 Twip 的地方。

6、Visible(可见)属性:
当一个对象的 Visible 属性设置为 False 时,程序运行时不能看见;只有当 Visible 属性值变为 True 时,才能被看见。

本属性虽然简单,但却是常常需要用到的,请大家牢记在心。

三、窗体的主要事件:
1、Load(装入)事件:

窗体最主要的事件,用来在启动程序时对属性和变量进行初始化。程序一旦运行,将自动触发本事件。

2、UnLoad(卸载)事件:
既然有装入事件,自然就有卸载事件,它的作用是从内存中清除一个窗体。卸载后如果要重新装入窗体,那么新装入的窗体上的所有控件都需要重新初始化。

3、Click(单击)与 DblClick(双击)事件:
在以前的学习中,我们已经接触到了 Click 事件,实际上,对一个严谨的程序来说,这种应用不是很普遍,大家知道就行了。


路过

雷人

握手

鲜花

鸡蛋

免责声明

本站中所有被研究的素材与信息全部来源于互联网,版权争议与本站无关。本站所发布的任何软件编程开发或软件的逆向分析文章、逆向分析视频、补丁、注册机和注册信息,仅限用于学习和研究软件安全的目的。全体用户必须在下载后的24个小时之内,从您的电脑中彻底删除上述内容。学习编程开发技术或逆向分析技术是为了更好的完善软件可能存在的不安全因素,提升软件安全意识。所以您如果喜欢某程序,请购买注册正版软件,获得正版优质服务!不得将上述内容私自传播、销售或者用于商业用途!否则,一切后果请用户自负!

QQ|Archiver|手机版|小黑屋|联系我们|宝峰科技 ( 滇ICP备09007156号-2|53050202000040 )

Copyright © 2001-2023 Discuz! Team. GMT+8, 2025-9-4 16:45 , Processed in 0.078805 second(s), 9 queries , File On Powered by Discuz! X3.59© 2001-2025 Discuz! Team.

返回顶部