可以將打印機默認打印設置改為黑白打印,如果打印對象是RGB配色,打印機驅動轉換為CMYK顏色時,黑色都是由彩色墨水組成的
創新互聯專注于企業成都全網營銷推廣、網站重做改版、保定網站定制設計、自適應品牌網站建設、H5高端網站建設、電子商務商城網站建設、集團公司官網建設、外貿網站制作、高端網站制作、響應式網頁設計等建站業務,價格優惠性價比高,為保定等各大城市提供網站開發制作服務。
2.可以試一下圖片從一個標準灰度圖片格式化而來,這樣圖片自身只有黑白色,也許可以
利用 printdocument控件
Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
PrintDocument1.Print()
End Sub
Private Sub PrintDocument1_PrintPage(sender As System.Object, e As System.Drawing.Printing.PrintPageEventArgs) Handles PrintDocument1.PrintPage
Dim stringFont As New Font("Arial", 16)
Dim rectDraw As New RectangleF(e.MarginBounds.Left, e.MarginBounds.Top, e.MarginBounds.Width, e.MarginBounds.Height)
Dim strFormat As New StringFormat
Dim s As String
s = "print word" '打印的內容
e.Graphics.DrawString(s, stringFont, Brushes.AliceBlue, rectDraw, strFormat)
End Sub
以下示例一次從文件中讀取一行,然后將每行文本打印到控制臺。
Sub ReadTextLinesFromFile()
Dim file As New System.IO.StreamReader("c:test.txt")
Dim oneLine As String
oneLine = file.ReadLine()
While (oneLine "")
Console.WriteLine(oneLine)
oneLine = file.ReadLine()
End While
file.Close()
End Sub