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ÖÐµÄ ......
Printer.ScaleMode = 6
6±íʾºÁÃ×
Printer.PaperSize = vbPRPSA4
'³õÊ¼×ø±ê
x = 1
y = 4
'×î´óµÄÏß¿ð
Printer.DrawStyle = 0
Printer.Line (x, y)-(x + 132.5, y) ......
Ò»¸ö¸öΪÁ˳öÃû¾ÓȻʹÓÃ×Ô¼ºµÄÕÕÆ¬³öÀ´ÕÐÒ¡,Çî·èÁ˰É
©°©¤©¤©¤©¤©¤©¤©¤©¤©¤©¤©¤©¤©¤©¤©¤My ѸÀ׵ȼ¶©¤©¤©¤©¤©¤©¤©¤©¤©¤©¤©¤©¤©¤©¤©¤©¤©¤©´
so what? disturbed you?
´ó¸ÅºÃ¶àÖ»ÓгõÖбÏÒµ
ÊDz ......
Çë½ÌÒ»¸öÓйØCommondialog¿Ø¼þµÄÎÊÌ⣨ʹshowfont·½·¨£©
µÚÒ»¸öÎÊÌ⣺
CommondialogÕâ¸ö¿Ø¼þµÄFlagsÊôÐÔÊDz»ÊÇÖ»ÄÜÔÚ´úÂëÖÐÉèÖÃ
ΪºÎÎÒÔÚÊôÐÔ¿òÀïµÄFlagsÒ»À¸ÖÐÊäÈëcdlCFScreenFonts£¨ÆÁÄ»×ÖÌå ......