下面的代码为何只进纸而确无法打印???

半点闲 半点闲 墨衍会员 · AI 创作全网分发 墨衍智能分发 通过墨衍一键同步至各平台 可同步平台 CSDN微信公众号微博知乎掘金百家号博客园抖音小红书 你的文章也可以这样分发 墨衍会员 ¥399起/年,写一次发全网 我也要 + 加入社区
Private Sub Command1_Click()
Printer.ScaleMode = vbMillimeters '厘米

Printer.Width = 190
Printer.Height = 100

Printer.CurrentX = 40
Printer.CurrentY = 10

Printer.Print "测试"
Printer.EndDoc
End Sub

'事实上执行了上述代码后,打印机只走纸确不能打印出“测试”两字。。
...全文

相关推荐

评论 12
收藏 已收藏
分享
返回顶部
半点闲
VB基础类 7,788 成员 197,583 内容