今天宠物迷的小编给各位宠物饲养爱好者分享主窗体怎么设置的宠物知识,其中也会对VB中如何新建窗体(vb如何将一个窗体设为启动窗体)进行专业的解释,如果能碰巧解决你现在面临的宠物相关问题,别忘了关注本站哦,现在我们开始吧!
vb6建立主窗体的子窗体有两种方法:
第一种方法是建立一个MDI窗体,然后把普通的form窗体设置成它的子窗体。
第二种方法是使用Windows API设置一个普通form窗体为另外一普通窗体的子窗体。
一、先来看看如何建立MDI窗体的子窗体:
1、启动vb6,新建一个标准EXE工程。
2、在“工程”菜单里选择“添加MDI窗体”,
点击“打开”,添加了一个MDIForm1窗体,
这步也可以工程窗口的窗体图标上右键完成。
3、在“工程”菜单里选择“XXX 属性”,
在弹出的窗口里把启动对象设成MDIForm1。
4、在form1的属性窗口里,把MDIChild属性设置为True。
5、在Private Sub MDIForm_Load()过程里添加form1.show。
6、运行程序,看到设置已经成功。
二、使用Windows API建立子窗体:
1、1、启动vb6,新建一个标准EXE工程。
2、在“工程”菜单里选择“添加窗体”,
点击“打开”,添加了一个form2窗体,
这步也可以工程窗口的窗体图标上右键完成。
3、双击form1窗体,在通用里加入以下windows API:
Private Declare Function SetParent Lib "user32.dll" ( _
ByVal hWndChild As Long, _
ByVal hWndNewParent As Long) As Long
4、在form1的Private Sub Form_Load()过程里加入
Form2.Show
SetParent Form2.hWnd, Form1.hWnd
Form2.Move 0, 0
5、运行程序,可以看form2已经是form1的子窗体了。
6、完整程序代码如下:
Option Explicit
Private Declare Function SetParent Lib "user32.dll" ( _
ByVal hWndChild As Long, _
ByVal hWndNewParent As Long) As Long
Private Sub Form_Load()
Form2.Show
SetParent Form2.hWnd, Form1.hWnd
Form2.Move 0, 0
End Sub
解决方案资源管理器中右击你的项目名,-添加--窗体。
使用image控件更好控制程序,设置image的left=0
top=0
然后在窗体的Form_Resize事件中写入
image的宽度和高度等于窗体的宽度和高度,并随窗体变化而变化.
在菜单那里点“工程”,然后“工程属性”,那里有“启动对象”,改成你想要启动的FORM就行了~
在子窗体的Form_load中设置,窗体的位置(top,left)、大小(height,width)就可以
在工程选项里设置就可以了
工程->选项->FORMS->Main Forms设置一下就可以了
你可以在工程文件里修改下,工程->查看工程源
rogram Project1;
uses
Forms,
Unit1 in 'Unit1.pas' {Form1},
Unit2 in 'Unit2.pas' {Form2};
{$R *.res}
begin
Application.Initialize;
if 情况A then //这里设置你自己的条件
begin
Application.CreateForm(TForm1, Form1);
end
else ;
Application.CreateForm(TForm2, Form2);
Application.Run;
end.
![]() |
|
很抱歉,您要访问的页面不存在。 | |
| |
如还有疑问请访问百度帮助中心获得解决方法 | |
©2013 Baidu 免责声明 |
如果你是mdi窗体,哪么就把属性MDIchild改为false,如果不是哪么就要从工程——》工程属性里面选择启动的窗体,把他修改为你要启动的窗体即可
Access 中的窗体是一种数据库对象,可用于创建数据库应用程序的用户界面。“绑定”窗体直接连接到表或查询之类的数据源,可用于输入、编辑或显示来自该数据源的数据。或者也可以创建“未绑定”窗体。
下一篇
北京社保怎么查询?