这是设置列宽的, 行高怎么设置呢?
For Each dt As DataTable In DataTables
For Each a As OBJECT In Tables(dt.name).grid.parent.controls
For Each b As OBJECT In a.controls
'output.show(b.text)
If b.text = "表A" Then
Dim d = b.controls(0).controls(0)
d.Cols(0).width = 150 ' d.Cols(0).height = 150,这样设置记录窗口的行高,可以吗?试了不可以...
End If
Next
Next
Next
‘’ 还有背景色可以设置吗?
[此贴子已经被作者于2019/9/25 17:42:30编辑过]