某filed的内容多,令表格爆了。竖线断开了.能否让竖线也自动变长?
注:当分行那一行才变长,而非所有都变长谢谢
注:当分行那一行才变长,而非所有都变长谢谢
解决方案 »
- 我在开发ocx控件时,在ie中运行,运行结束时,代码编辑器中的方向键就不起作用了,为什么呢?
- VB6.0连接access2003的奇怪问题
- vb 如何访问远程oracle数据库
- res中能导入GIF文件吗?为什么我的VB始终在导入GIF的时候自动关闭呢?
- 我想用vb实现类似windows资源管理器的程序
- 本人封装的一个VB创建多线程的API函数(标准DLL),很实用,使用方便,欢迎试用、提意见!(首发于VBGOOD)
- 窗体设计时碰到的问题!烦
- VB到底现在还有没有用?
- 怎样判断Listview控件中选择了多条记录,并且把记录的信息都读出来,急急急!!!
- vb6打包时一般需要哪几个dll文件(我是第一次打包,希望各位大侠能说的详细一点,最好能给我介绍一个较好的打包工具)
- [送分]推荐一个可以换皮肤的窗体控件源码
- vb6 窗体中不写任何代码,如何调用类中写的事件?
當然你所有的Field也要設置成CanGrow=true, MuiltLine=true
然后在Detail_Format()中加入LineA.y1=Detail.Height-60
LineA.y2=LinA.y1如果在Format中無效,則可以改成在Detail_AfterPrint中加入,
如果還沒效你用
LineA.y1=fld字段名.Height-60
LineA.y2=LinA.y1
試一下,我沒有現成的ActiveReport,沒法跟你試.
fld字段名.Height的值不會因自動分行而變。
後來我用 len(fld字段名.text)>某值來判斷也不行。
一定要放在Detail_Format()裡。
你若有時間請幫忙測試一下。感謝!!!
這樣就可以了:Private m_int_Hlineheight As IntegerPrivate Sub Detail_BeforePrint()
'這里以LineH水平線為基準調整豎線的高度.
m_int_Hlineheight = lineH.Y2
lineV1.Y2 = m_int_Hlineheight
lineV2.Y2 = m_int_Hlineheight
lineV3.Y2 = m_int_Hlineheight
End Sub