vb打印问题
Printer.ScaleMode = 6
6表示毫米
Printer.PaperSize = vbPRPSA4
'初始坐标
x = 1
y = 4
'最大的线筐
Printer.DrawStyle = 0
Printer.Line (x, y)-(x + 132.5, y) '起点坐标-终点坐标
Printer.DrawStyle = 0
Printer.Line (x + 132.5, y)-(x + 132.5, y + 194) '起点坐标-终点坐标
Printer.DrawStyle = 0
Printer.Line (x + 132.5, y + 194)-(x, y + 194) '起点坐标-终点坐标
Printer.DrawStyle = 0
Printer.Line (x, y + 194)-(x, y) '起点坐标-终点坐标
我的初始坐标是1毫米和4毫米，但是我打印在A4纸上确是8毫米和8毫米，我用尺量了，很奇怪，大家帮忙看看什么原因？？？
是否页边距的问题？
还是搞不定啊
大家帮帮忙啊
相关问答：
我用VB按MVC的构架写组件供ASP调用
BLL层
VB code:
Private Dal As New moonPotato_DAL
Public Sub inSertUser(Model As moonPotato_Model)
Dal.InSertCls (Model)
End Sub
ASP中调用
VB c ......
INSERT INTO StudAchieve(studID,studName)
VALUES('2','abc'),('2','bcd'),('2','cde')
拼了半天也不对，及啊 。。。。
SQL c ......
如题~~
MSDN，Google，想系统学建议还是买本书看吧，毕竟手打的代码记忆要比复制的深刻。
我要边学边用在代码里面，肯定要手打的了
看看sql server 2005的帮助很全面或看看书
http://topic.csdn.net/u/2 ......
代码如下：
Private Sub MSFlexGrid1_SelChange()
If MSFlexGrid1.Rows = 1 Then Exit Sub
If MSFlexGrid1.Row = 0 Then Exit Sub
grid_row = MSFlexGrid1.Row
......
