Dim rgd As WinForm.RecordGrid = e.Form.Controls("RecordGrid1")
rgd.Table = Tables("员工")
rgd.Columns = "编号|姓名|部门|职务|性别|尊称|出生日期|地址|家庭电话|办公电话"
rgd.Build()
这是需要绑定的记录窗口空间，直接使用内置的记录窗口如何达到上面的效果呢
With Tables(e.form.tablename)
'.Cols("Code").OpenWindow(300) '打开列窗口
.OpenRecordGrid(300) '打开记录窗口
'.Columns = "国籍|毕业院校|工作室名称|城市|职位|性别|手机号|个人爱好"
.Cols("上行服务费").ShowInRecordGrid = False '照片列不在记录窗口显示
.Cols("下行服务费").ShowInRecordGrid = False '照片列不在记录窗口显示
.Cols("个人爱好").RecordRowHeight = 3 '备注列的高度为3倍行高
End With
加好友 
发短信
Post By：2021/3/6 18:35:00 [显示全部帖子]
