以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  DropDownForm窗口的尺寸怎么随单元格尺寸变化？  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=20646)
--  作者：gedogn
--  发布时间：2012/6/14 17:20:00
--  DropDownForm窗口的尺寸怎么随单元格尺寸变化？

单元格拉大后，DropDownForm窗口的尺寸怎么适应单元格的尺寸？
--  作者：don
--  发布时间：2012/6/14 17:24:00
--  

试试:

SetBounds

用于设置窗口的位置和大小，仅对独立窗口和模式窗口有效。
　

语法

SetBounds(x, y, Width, Height)

x: 窗口水平位置
y: 窗口垂直位置
Width: 窗口宽度
Height: 窗口高度

上述参数的单位为像素。
--  作者：gedogn
--  发布时间：2012/6/14 17:35:00
--  

谢谢，成功！

总结：先在单元格的PrepareEdit中得到单元格的宽度，存入全局变量中：

以下内容为程序代码:

1 If e.Col.Name="目标列名称" Then
2 Vars("width")=e.Col.Width
3 End If
4

然后在DropDownForm窗口的

以下内容为程序代码:

1 e.Form.SetBounds(0, 0, Vars("width"), 100)
2
dropDownOpening事件中插入：