Office中国论坛/Access中国论坛

标题: 请高手帮忙？有酬 [打印本页]

作者: sun.gd 时间: 2003-5-28 17:58
标题: 请高手帮忙？有酬
我要做一个报表，其中有竖线，希望竖线按每票对应入仓单数量确定竖线的高度。
详见附件 sun.gd@163.com QQ:119539821

[attach]577[/attach]

作者: huanghai 时间: 2003-5-28 18:32
我来试试,但是不一定能赚到你的钱

作者: huanghai 时间: 2003-5-28 18:39
Private Sub 主体_Format(Cancel As Integer, FormatCount As Integer)
Me.主体.Height = Text20 * 567 / 50
Dim ctl As Control
For Each ctl In Me.Controls
If TypeOf ctl Is TextBox Then
ctl.Height = Text20 * 567 / 50
End If

Next ctl
End Sub

作者: huanghai 时间: 2003-5-28 18:42
Private Sub 主体_Format(Cancel As Integer, FormatCount As Integer)
Me.主体.Height = Text20 * 567 / 50
Dim ctl As Control
For Each ctl In Me.Controls
If TypeOf ctl Is TextBox Then
ctl.Height = Text20 * 567 / 50
End If

Next ctl
End Sub

作者: sun.gd 时间: 2003-5-28 20:01
希望你能帮上

作者: sun.gd 时间: 2003-5-28 20:08
我不明白TEXT20是什么?我只要竖线(LI1 --LI9)自动改变高度,横线(LI13)自动调整位置

作者: sun.gd 时间: 2003-5-30 19:31
救命！

作者: sun.gd 时间: 2003-5-30 19:33
各位高手，请帮帮忙，我已经头痛啦！

作者: sossos 时间: 2003-5-30 20:55
按照huanghai的方法是可以实现的

作者: sun.gd 时间: 2003-5-31 04:26
我试过不行，那位能在文件上实现后EMAIL给我

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)