◆江◆湖◆救◆急◆ 关于打印字体,重分相赠。 我现在要用我的软件打印一个东西,要求打印出来的字体中,数字“0”打印的时候,中间必须有一个横杠杠,变得有点像“θ”,应该是什么字体啊? 各位,请有过类似经验的帮帮忙,万分感谢!!!!! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 Fixedsys 字体用它就行了 这样自己看吧~Private Sub Form_Load() Dim i As Long For i = 0 To Screen.FontCount - 1 Me.FontName = Screen.Fonts(i) Me.Print i & ": " & Screen.Fonts(i) & " - 0123" NextEnd Sub 加删除线:FontStrikethru属性,如:Printer.Font.Strikethrough = True 好文共分享 (转载 homezj ) 请问各位高手,如何用VB写智能IC卡的读写程序!!谢谢,我没做过! 使用ADO连接mysql,select得到的记录集合为什么RecordCount=-1? 请问VB中对应sleep的是什么函数 怎样用sql语句分类汇总 我来问个最简单的问题,dao、rdo能做到的事情是不是ado基本都能做到, 江湖告急!!!!重分500 谁能给我说说APP对象的使用,不胜感激 提个问题? vb 定义了一组数组想写入access中 DLL的声明很着急 怎样用datagrid控件
字体用它就行了
Dim i As Long
For i = 0 To Screen.FontCount - 1
Me.FontName = Screen.Fonts(i)
Me.Print i & ": " & Screen.Fonts(i) & " - 0123"
Next
End Sub
Printer.Font.Strikethrough = True