我这里就没问题,是您的打印机的问题?…………if GetConfigValue("报表打印预览",true) = true doc.Preview()else for i as Integer = 1 to e.Form.Controls("报表打印份数").Value doc.Print() nextend if