池塘怎么增氧效果好:有关VB的简单问题

来源:百度文库 编辑:杭州交通信息网 时间:2024/05/07 14:30:32
如何使窗体在运行情况下不能改变其大小。

把窗体的BorderStyle属性改一下就可以了
Form 对象的 BorderStyle 属性设置值如下:

常数 设置值 描述
vbBSNone 0 无 (没有边框或与边框相关的元素)。
vbFixedSingle 1 固定单边框。可以包含控制菜单框,标题栏,“最大化”按钮,和“最小化”按钮。只有使用最大化和最小化按钮才能改变大小。
vbSizable 2 (缺省值)可调整的边框。可以使用设置值1列出的任何可选边框元素重新改变尺寸。
vbFixedDouble 3 固定对话框。可以包含控制菜单框和标题栏,不能包含最大化和最小化按钮,不能改变尺寸。
vbFixedToolWindow 4 固定工具窗口。不能改变尺寸。显示关闭按钮并用缩小的字体显示标题栏。窗体在 Windows 95 的任务条中不显示。
vbSizableToolWindow 5 可变尺寸工具窗口。可变大小。显示关闭按钮并用缩小的字体显示标题栏。窗体在 Windows 95 的任务条中不显示

Private sub form_onresize()
//Constant= 你自己定
form1.width= Constant
form1.height=Constant
end sub

把Form 对象的 BorderStyle 属性设置为1
wubc的方法也可以,不过在最大化和最小化时会出错,且用户在拖动边框来改变窗体大小时窗体会闪烁的
最好把Form 对象的 BorderStyle 属性设置为1