1樓：蘭馨谷
直接用printer控制元件即可
set printer = printers(0) '設定印表機
printer.scalemode = vbmillimeters '設定單位毫米
printer.fontname = "宋體" '設定字型
printer.fontsize = 10
printer.fontbold = false
printer.fontitalic = false
printer.line (10, 10)-step(1, 1) '劃線從座標10,10到11,11
printer.currentx = 10 '設定文字的左邊距
printer.currenty = 10 '設定文字的上邊距
printer.print "文字" '輸出文字，輸出後別忘了重新設定邊距
printer.newpage '新建一頁
printer.enddoc '印表機輸出
printer控制元件屬性也不是太多，花點時間研究一下，肯定能滿足你的需求的。
2樓：
建議，先把曲線繪製到picture上，把資料也臨時輸出到picture上。
最後在把picture列印出來。
這樣一來，定位就不是問題了。
3樓：
new一個picture 物件，分別把兩個要表現(列印)的圖形繪製到 這個物件上，再把這個 picture 的圖象在印表機上列印就好了。
幫忙vb問題，VB問題 幫忙啊
autoredraw 字面意思就是 自動重畫vb中的意義 返回或設定從圖形方法到持久圖形.的輸出持久的圖形 microsoft windows 操縱螢幕圖象，來造成重疊視窗的影像。當一個視窗移到其它視窗上時，可暫時隱藏其它視窗，移過後，被覆蓋的視窗和它的內容需要重新顯示。windows 管理和控制視...
VB基礎問題，VB一個基礎問題
private sub command1 click static i as integer dim a a array 小1 王2 小3 李4 太5 多6 了7 不8 寫9 了10 label1.caption a i if i 9 then i i 1end sub private sub co...
VB程式設計的簡單問題，VB簡單程式設計問題
1.do while loop 如果while的條件成立，就執行裡面的語句 比如，while a 2，先判斷a，a不大於2就不執行了 這個是不滿足就不執行 2.do loop while e 這個是不管while的條件成不成立，都會先執行裡面的語句，執行完之後再判斷while的條件成不成立，成立就繼...