DataReport3.LeftMargin = 0
DataReport3.RightMargin = 0
DataReport3.TopMargin = 0
DataReport3.BottomMargin = 0
DataReport3.ReportWidth = 纸张宽度 * 56.7
End Sub
Private Sub Command2_Click()
    主界面.Show
    Unload Me
End Sub VB设备管理系统设计+需求分析+可行性分析(24):http://www.youerw.com/jisuanji/lunwen_192.html