- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 行高变乱之后怎么用button调整成固定行高为20 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=50793)
-- 发布时间：2014/5/13 19:40:00
-- 行高变乱之后怎么用button调整成固定行高为20
行高变乱之后怎么用button调整成固定行高为20，想实现国定行高（比较有序）和自动行高之间切换（方便看数据）
If e.Sender.text = "自动行高" Then
e.Sender.Text = "默认行高"
Tables("裁剪车间").AutoSizeRows()
ElseIf e.Sender.Text = "默认行高" Then
e.Sender.Text = "自动行高"
？？？？？？？？？
End If
[此贴子已经被作者于2014-5-13 19:44:00编辑过]
-- 发布时间：2014/5/13 19:53:00
--
如下
If e.Sender.text = "自动行高" Then
e.Sender.Text = "默认行高"
Tables("裁剪车间").AutoSizeRows()
ElseIf e.Sender.Text = "默认行高" Then
e.Sender.Text = "自动行高"
For i As Integer = 1 To Tables("裁剪车间").Rows.count
Tables("裁剪车间").grid.Rows(i).height = 20
Next
End If
[此贴子已经被作者于2014-5-13 19:52:45编辑过]
-- 发布时间：2014/5/13 21:14:00
-- 回复：（有点甜） 如下 If e.Sender.te...
能用，就是数据量很大的话，发应迟钝
-- 发布时间：2014/5/13 21:25:00
--
加上这个就好了
http://www.foxtable.com/help/topics/0453.htm
-- 发布时间：2014/5/13 21:49:00
--
好了