On Error Resume Next
'Dim ShowPrinter
'Set ShowPrinter = ScreenItems("mcdC") 'Microsoft Common Dialog Control 6.0 控件
'ShowPrinter.PrinterDefault = True
'ShowPrinter.CancelError = True
'ShowPrinter.ShowPrinter
VBS弹出选择打印机对话框
最新推荐文章于 2024-01-09 10:56:45 发布