摘要： Private Sub btnOK_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnOK.Click If sOption = 0 Then Try Dim f As New BogartMis.Bas.frmPrint Dim rpt As New ReportDocument Dim rptPath As String If chk... 阅读全文