注册 登录
编程论坛 VB6论坛

VB加载窗体

ruik2012 发布于 2016-03-01 11:51, 2151 次点击
Form1窗体中有一个Picture1,点击command1打开form2窗体,
    SetParent Form2.hWnd, Picture1.hWnd
    Form2.Show

请问如何让打开的form2窗体大小和ficture1大小一样?
2 回复
#2
风吹过b2016-03-01 17:20
你要求是什么?窗体可用面积一样,还是窗体面积一样。这二个是二个概念
一、窗体面积一样。
Form2.Width =Picture1.Width
form2.Height =Picture1.Height

二、先要计算出窗体2的 上下左右的边距,然后根据Picture1的可用面积换算 。
Dim i As Long
i = Form2.Width - Form2.ScaleWidth
Form2.Width = Picture1.ScaleWidth + i
i = Form2.Height - Form2.ScaleHeight
Form2.Height = Picture1.ScaleHeight + i

#3
ljfong2016-03-05 11:25
其实,这些书上全部有!认真看下书
1