Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

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) 'Æðµã×ø±ê-ÖÕµã×ø±ê


ÎҵijõÊ¼×ø±êÊÇ1ºÁÃ׺Í4ºÁÃ×£¬µ«ÊÇÎÒ´òÓ¡ÔÚA4Ö½ÉÏÈ·ÊÇ8ºÁÃ׺Í8ºÁÃ×£¬ÎÒÓóßÁ¿ÁË£¬ºÜÆæ¹Ö£¬´ó¼Ò°ïæ¿´¿´Ê²Ã´Ô­Òò£¿£¿£¿
ÊÇ·ñÒ³±ß¾àµÄÎÊÌ⣿

»¹ÊǸ㲻¶¨°¡

´ó¼Ò°ï°ïæ°¡

ÒýÓÃ
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) 'Æðµã×ø±ê-ÖÕµã×ø±ê


ÎҵijõÊ¼×ø±êÊÇ1ºÁÃ׺Í4ºÁÃ×£¬µ«ÊÇÎÒ´òÓ¡ÔÚA4Ö½ÉÏÈ·ÊÇ8ºÁÃ׺Í8ºÁÃ×£¬ÎÒÓóßÁ¿ÁË£¬ºÜ


Ïà¹ØÎÊ´ð£º

VBÓëLINUXÏÂÊý¾Ý¿âÁ¬½ÓµÄÎÊÌâ

¸÷λ´óÏÀ£¬ÏÖÓÐÒ»ÄÑÌâÇó½Ì£º¼ÙÉèÊý¾Ý¿â£¨mysql»òoracle¡­¡­µÈÊý¾Ý¿â£©°²×°ÔÚLINUXϵͳµÄ·þÎñÆ÷ÉÏ£¬ÎÒÔÚ¿Í»§¶Ë£¨windowsϵͳ£©ÓÃVBÈçºÎ½¨Á¢ÓëÊý¾Ý¿âµÄÁ¬½Ó£¬ÊÇ·ñ¿ÉÒÔʹÓÃÀàËÆADO»òDAOµ±ÖеÄÁ¬½ÓÓï¾ä£¿ÇëÄÄλ´óÏÀÖ¸µ¼Ò ......

ÎÒҪѧ´æ´¢¹ý³Ì£¨VB.NET,SQL£©¹òÇó½Ì³Ì~~

ÈçÌâ~~
MSDN£¬Google£¬Ïëϵͳѧ½¨Ò黹ÊÇÂò±¾Êé¿´°É£¬±Ï¾¹ÊÖ´òµÄ´úÂë¼ÇÒäÒª±È¸´ÖƵÄÉî¿Ì¡£

ÎÒÒª±ßѧ±ßÓÃÔÚ´úÂëÀïÃæ£¬¿Ï¶¨ÒªÊÖ´òµÄÁË


¿´¿´sql server 2005µÄ°ïÖúºÜÈ«Ãæ»ò¿´¿´Êé
http://topic.csdn.net/u/2 ......

vb+sql

ÔÚVBÖУ¬ÈçºÎÖ´ÐÐÏÂÃæµÄSQLÓï¾ä
Update t_Icitem Set f_102 = IsNull(f_102,0)+1 Where FNumber='0001'
±ÈÈ磺
cn.execute("Update t_Icitem Set f_102 = IsNull(f_102,0)+1 Where FNumber=&# ......

vb MSFlexGrid1.Row ʵʱ´íÎó'30009'RowÊýÖµÎÞЧ

´úÂëÈçÏ£º
Private Sub MSFlexGrid1_SelChange()
  If MSFlexGrid1.Rows = 1 Then Exit Sub
  If MSFlexGrid1.Row = 0 Then Exit Sub
 
  grid_row = MSFlexGrid1.Row
......

VB »ñÈ¡ÍøÒ³Ô´´úÂë

Ò»¸ö²éѯijÐÅÏ¢µÄASPÍøÒ³£¬Ìá½»²ÉÓõÄÊÇpost·½·¨£¬²éÕÒ½á¹ûµÄÍøÒ³±ØÐëÓÒ¼üµã»÷¡°²é¿´Ô´Îļþ¡±²ÅÄÜ¿´µ½ÕæÕý²éѯ½á¹ûÍøÒ³µÄÔ´´úÂ룬ÓÃä¯ÀÀÆ÷²Ëµ¥¿´µ½µÄÊDzéѯǰµÄÔ´´úÂë
ÓÃVBÓÐʲô°ì·¨¿ÉÒÔ»ñÈ¡µ½Õâ¸ö²éѯºóµÄÔ´´ú ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ