Foxtable(狐表)用户栏目专家坐堂 → [求助]记录窗口如何批量设置行高


  共有2564人关注过本帖平板打印复制链接

主题:[求助]记录窗口如何批量设置行高

帅哥哟,离线,有人找我吗?
2425004926
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:712 积分:5553 威望:0 精华:0 注册:2019/11/14 9:36:00
[求助]记录窗口如何批量设置行高  发帖心情 Post By:2021/4/6 9:22:00 [只看该作者]

记录窗口批量设置行高测试没有成功,能不能批量设置?

Dim rgd As WinForm.RecordGrid = Forms("窗口1").Controls("RecordGrid1")
'Dim rgd As WinForm.RecordGrid = e.Form.Controls("RecordGrid1")
rgd.Table = Tables("表A")
rgd.Columns = "第一列|第二列|第三列|第四列"
Dim s1() As String = {"第一列","第二列","第三列","第四列"}
For i As Integer = 0 To s1.Length -1
    Tables("表A").Cols(s1(i)).RecordRowHeight = 3 '高度为3倍行高,测试不成功
Next

rgd.Build()

 回到顶部