0

(这是我的第一篇文章,如果我做错了什么,请纠正我。)

这是我的一些代码:

imp.id.Text = globalvars.mdataset.Tables("table1").Rows(0).Item("id")
    imp.date.Text = globalvars.mdataset.Tables("table1").Rows(0).Item("date")
    imp.hour.Text = globalvars.mdataset.Tables("table1").Rows(0).Item("hour").ToString
    imp.PrintForm1.PrinterSettings.DefaultPageSettings.Margins = New Printing.Margins(10, 10, 10, 10)
    imp.Show()
    imp.Focus()
    imp.PrintForm1.PrintAction = Printing.PrintAction.PrintToPreview
    imp.PrintForm1.Print()

发生的事情是,当它给我预览时,页面是空的......但奇怪的是,当我在打印操作之前放置一个 msgbox 时,预览会正确显示我想要打印的内容...... 。 有小费吗?

编辑:imp是打印表单所在的表单

4

1 回答 1

0

尝试添加这个..

....
Application.DoEvents
imp.PrintForm1.Print()
于 2013-05-20T08:51:39.110 回答