一个还没有解决的打印问题!! 设CancelError=True然后:On Error Goto ErrMsg:.........Exit SubErrMsg: '不写任何代码,就可以实现取消功能了 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 问题已经解决:代码如下:Private Sub Command1_Click()'CPrinter是打印对话框的名字On Error GoTo errmsg:CPrinter.CancelError = TrueCPrinter.ShowPrinterMsgBox "确定"Exit Suberrmsg:MsgBox "取消"End Sub 两两这间进行比较,如何写? 怎样不打印小数点 rs.delete求救嗎,逐個刪除不了! 如何使文件夹中的文件名称与文件夹同名? 做好安装程序后。到别的机器上安装测试,ActiveX无法创建对象,错误号429?如何解决呢。 vb6安装程序网上哪有? ActiveReports P2 套打票据打几页后出现套不准,请教? 我是菜鸟,谁能帮我实现一下,先做到的拿分 ●●∑∑●●∑∑测量窗体‰‰▲▲∑∑●●谢谢 最近做了一个OICQ监视程序,记录保存在注册表中。 VC++作的东东,怎样在VB里边用???望指教!!急!菜鸟 有谁能告诉我,用VB有前途吗?我想转向Delphi.
Private Sub Command1_Click()'CPrinter是打印对话框的名字
On Error GoTo errmsg:
CPrinter.CancelError = True
CPrinter.ShowPrinterMsgBox "确定"
Exit Sub
errmsg:
MsgBox "取消"End Sub