VB Êó±êÒÆ¶¯Ê¼þ
ÎÒÏëÔÚÊó±êÒÆÖÁÃüÁî°´Å¥ÉÏ£¬µ¯³öÒ»¸öÌáʾ¿ò£¬µ«²»ÖªÈçºÎŪ£¬Çë×ö¸öʾÀý
tooltip
лл£¡ÎÒÊÇÐÂÊÖ£¬ÄÜ˵µÃÏêϸЩÂð£¿×îºÃÓиöÀý×Ó
Command1.ToolTipText="xxx"
ÎÒÔÚcommandÖп´µ½ÕâÑù²»ÄÜʵÏÖÊÇʲôÔÒò£º
Private Sub Command1_Click()
Command1.ToolTipText = "123"
End Sub
ÔÚÉè¼ÆµÄʱºò¼ÓºÃ »ò form_laodÀï
Private Sub Form_Load()
Command1.ToolTipText = "123"
End Sub
л£¬ÕâÑùÊÇÄÜʵÏÖÁË£¬µ«ÈçºÎ¸Ä±ä¡°123¡±µÄ×ÖÌå¡¢×ֺŵÈ
Ìáʾ¿ò?»¹Êǽö½öÊÇtooltip ?
Èç¹û½ö½öÊÇtooltip¼òµ¥,ÉèÖÃbuttonµÄtooltiptextÊôÐÔ¼´¿É,
Èç¹ûÊÇÌáʾ¿ò,±È½ÏÂé·³,ҪʹÓÃapi
ÊÇÌáʾ¿òÖеÄÄÚÈÝ£¿
ϺÃ×Òâ˼?ÄãÒªÊÇÌáʾ¿òʽʲôÑù×ÓµÄ?
Ìáʾ¿òÄÚµÄÎÄ×Ö£¬Ìáʾ¿òµÄÑù×Ó£¬µ½ÊÇûÓÐÏ룬ÇëÖ¸µã
ÄǾ͵Ã×Ô¼º»ÁË,
http://blog.csdn.net/Dengyu1997/archive/2006/03/06/616729.aspx
¿ÉÒԲο¼Ò»ÏÂ
Äã×Ô¼ºÉè¼Æ¸ö´°Ì壬×ö³ÉÄãÐèÒªµÄ¡°Ìáʾ¿ò¡±µÄÑù×Ó£¬ÔÚCommandButtonµÄMouseMoveʼþÖÐ
VB code:
Dim OverButton As Boolean
Private Sub Form_Load()
OverButton = Tru
Ïà¹ØÎÊ´ð£º
ΪʲôCдµÄDLLÎļþC¡¢PBÄܵ÷ÓÃVB²»Äܵ÷Óã¿
VBÀïΪʲôÓеÄDLLÖ±½Óͨ¹ýÒýÓÿÉÒÔʹÓã¿ÓеÄÐèҪͨ¹ýdeclareÉêÃ÷Íⲿº¯Êý£¿ÕâЩDLLÓÐʲô²î±ð£¿
1¡¢ÎªÊ²Ã´PBÄÜͨ¹ýDECLAREÉùÃ÷¶øVB²»ÐУ¿
2¡¢Èç¹ûÕâ¸ödllÖÐµÄ ......
Ò»¸ö²éѯijÐÅÏ¢µÄASPÍøÒ³£¬Ìá½»²ÉÓõÄÊÇpost·½·¨£¬²éÕÒ½á¹ûµÄÍøÒ³±ØÐëÓÒ¼üµã»÷¡°²é¿´Ô´Îļþ¡±²ÅÄÜ¿´µ½ÕæÕý²éѯ½á¹ûÍøÒ³µÄÔ´´úÂ룬ÓÃä¯ÀÀÆ÷²Ëµ¥¿´µ½µÄÊDzéѯǰµÄÔ´´úÂë
ÓÃVBÓÐʲô°ì·¨¿ÉÒÔ»ñÈ¡µ½Õâ¸ö²éѯºóµÄÔ´´ú ......
Printer.ScaleMode = 6
6±íʾºÁÃ×
Printer.PaperSize = vbPRPSA4
'³õÊ¼×ø±ê
x = 1
y = 4
'×î´óµÄÏß¿ð
Printer.DrawStyle = 0
Printer.Line (x, y)-(x + 132.5, y) ......
vbÖÐÔõÑùʵÏÖÏñvb.netÒì³£´¦Àí(try....Catch ex As Exception...end try)¹¦ÄÜ£¿
ÓÑÇé°ï¶¥
ÎÞ·ÇÊÇOn error Goto ºÍErr.NumberÅжϰÉ?
ÏëÓÃvb6.0ʵÏÖÒÔÏÂvb.netµÄ¹¦ÄÜ£º
dim str as string 'Õâ¸öÒ»¸öÓ¦Ó ......
Ï£Íû´ó¼ÒÄܹ»°ïÎÒÏÂ.¸ÐлÁË..
Ô´Âë´«ÔÚ´óÃ×ÅÌ VB6 µÄÔ´Âë http://www.damipan.com/file/3wNoKLW.html
תΪVB.NETÔ´Âë.
СµÜÍêÈ«ÊÇÐÂÊÖ ²»¶®µÄ˵.Âé·³¸÷λ°ïæһÏÂ
ÎÒµÄEMAILÊÇ:4452 ......