VBA设置数据表子窗体字体格式

netguestcn

Private Sub Form_Load()
    Me.商品信息录入子窗体.Form.DatasheetFontHeight = 9
    Me.商品信息录入子窗体.Form.DatasheetFontItalic = False
    Me.商品信息录入子窗体.Form.DatasheetForeColor = -2147483640    ' 黑色
    Me.商品信息录入子窗体.Form.DatasheetFontName = "仿宋_GB2312"
    Me.商品信息录入子窗体.Form.DatasheetBackColor = 12632256    ' 灰色
    Me.商品信息录入子窗体.Form.DatasheetGridlinesColor = 32768  ' 绿色

End Sub