VBдµÃÒ»¸ö¼Çʱ¾
½ñÌìÓñà³ÌÓïÑÔVisual Basic£¨VB£©Ð´³ö×Ô¼ºµÄ¼Çʱ¾£¡¼ÇµÃ×Ô´ÓÉϴεÄÒ»¸öVB´òÔì¼òµ¥¼ÆËãÆ÷ºó¾ÍÔÙҲûÓÐдһЩС³ÌÐòÁË£¡½ñÌìÄØ£¬Ð´Ò»¸ö¼òµ¥µÄ¼Çʱ¾³ÌÐò°É£¡
¹¤¾ß£ºÒ»Ì¨¼ÆËã»ú£¨µçÄÔ£©¡££¨ÅäÖò»×öʲôҪÇó£¬ÏÖÔڵĻúÆ÷Ó¦¸ÃûÓÐÅäÖúܵ͵İɣ¡Ö»ÒªÄÜÔËÐÐVisual Basic 6.0¾ÍÐУ¡£©
VB¿ª·¢Æ½Ì¨£ºMicrosoft Visual Basic 6.0
Ê×ÏÈ£¬´ò¿ªMicrosoft Visual Basic 6.0 ½¨Ò»¸ö±ê×¼µÄEXE¹¤³Ì£¡ÔÚÕâ¸ö¼Çʱ¾±àд¹ý³ÌÖÐÐèÒªÖ÷ÒªµÄ5¸ö¿Ø¼þ£¬ËüÃÇ·Ö±ðÊÇ£ºRichTextBox¡¢ CommonDialog¡¢Toolbar¡¢ StatusBar¡¢ Timer¡¢ ImageList ¡£ ÔÚ³ÌÐòûÓпªÊ¼±àд֮ǰ°ÑÕâЩ¿Ø¼þ£¬Óɲ¿¼þÖмӳöÀ´£¡
ºÃÁË£¬ÏÖÔÚ¿ªÊ¼ÁË£¡ÎÒÃÇÊ×ÏÈ£¬ÏȰѲ˵¥½¨Á¢ºÃ£¬±ãÓÚÒÔºóд´úÂ룡¹¤¾ß——²Ëµ¥±à¼Æ÷ ¡£½¨Á¢Ò»Ï²˵¥Ñ¡Ï¶¥²ã²Ëµ¥£ºÎļþ£¨F£¬Ãû³Æ£ºmunfile£©¡¢±à¼£¨E£¬Ãû³Æ£ºmunedit£©¡¢¸ñʽ£¨O£¬Ãû³Æ£ºmunmat£©¡¢²é¿´£¨V£¬Ãû³Æ£ºmunlook£©¡¢ÑÕÉ«£¨B£¬Ãû³Æ£ºmuncolor£©¡¢ÏµÍ³Ñ¡Ïî(Ãû³Æ:munsystem)¡¢°ïÖú£¨H£¬Ãû³Æ£ºmunhelp£©¡£È»ºó½¨Á¢×Ӳ˵¥£º
Îļþ£¨F£¬Ãû³Æ£ºmunfile£©µÄ×Ӳ˵¥ÓУºÐ½¨£¨CTRL+N£¬Ãû³Æ£ºmunnew£©¡¢´ò¿ª£¨CTRL+O£¬Ãû³Æ£ºmunopen£©¡¢±£´æ£¨CTRL+S£¬Ãû³Æ£ºmun£©¡¢Áí´æΪ£¨CTRL+L£¬Ãû³Æ£ºmunlingc£©¡¢Í˳ö£¨CTRL+E£¬Ãû³Æ£ºmunexit£©
±à¼£¨E£¬Ãû³Æ£ºmunedit£©µÄ×Ӳ˵¥ÓУº¼ôÇУ¨CTRL+X£¬Ãû³Æ£ºmunjianq£©¡¢¸´ÖÆ£¨CTRL+C£¬Ãû³Æ£ºmuncopy£©¡¢Õ³Ìù£¨CTRL+V£¬Ãû³Æ£ºnumzhant£©¡¢É¾³ý£¨del£¬Ãû³Æ£ºmundelete£©¡¢È«Ñ¡£¨CTRL+A£¬Ãû³Æ£ºmunxall£©¡¢ÈÕÆÚ£¨CTRL+P£¬Ãû³Æ£ºmunnows£©¡¢²éÕÒ£¨CTRL+F£¬Ãû³Æ£ºmunfound£©¡¢²éÕÒÏÂÒ»¸ö(£¬Ãû³Æ£ºmunfindnext)
¸ñʽ£¨O£¬Ãû³Æ£ºmunmat£©µÄ×Ӳ˵¥ÓУº×ÖÌ壨CTRL+I,Ãû³Æ£ºmunfont£©
²é¿´£¨V£¬Ãû³Æ£ºmunlook£©µÄ×Ӳ˵¥ÓУºÎı¾³¤¶È£¨CTRL+GÃû³Æ£ºmunlenzhb)¡¢×´Ì¬À¸£¨Ãû³Æ£ºmunzhuangt£©
ÑÕÉ«£¨B£¬Ãû³Æ£ºmuncolor£©µÄ×Ӳ˵¥ÓУº×ÖÌåÑÕÉ«£¨CTRL+Q£¬Ãû³Æ£ºmunfontcolor£©¡¢±³¾°ÑÕÉ«£¨CTRL+D£¬Ãû³Æ£ºmunblackcolor£©
ϵͳѡÏî(Ãû³Æ£ºmunsystem)µÄ×Ӳ˵¥ÓУº×¢Ïú(Ãû³Æ£ºmunlog)¡¢ÖØÆô(Ãû³Æ£ºmunreboot)¡¢¹Ø»ú(Ãû³Æ£ºmunshut)¡¢È¡Ïû¹Ø»úÖ¸ÁÃû³Æ£ºmuncancelshut£©
Ïà¹ØÎĵµ£º
ʹÓÃVC±àдVBʹÓÃDLL
Ò»¡¢ÔÚº¯Êý¶¨ÒåÇ°±ØÐë¼ÓÉÏextern "c"£¬_stdcall¹Ø¼ü×Ö¡£
extern "C" int _stdcall Sum(int x,int y)
{
return x+y;
}
¶þ¡¢DLLµÄ.defÎļþÖбØÐë¼ÓÉÏÈë¿Úº¯Êý
EXPORTS
sample @1
  ......
ÖØÊ°VBÖ®Èý£¬¶þ½øÖÆÎļþƪ
PMP ¹Ø¾¢ËÉ
¹íʹÉñ²î£¬09Äê12ÔÂÈëÖ°µÄ¹«Ë¾ÈÔʹÓÃVB¿ª·¢Èí¼þ£¬ËäÈ»²¢·Çרְ¿ª·¢£¬µ«Ò²²»µÃ²»ÔÚʸô4ÄêÖ®ºó£¬ÖØÐÂʹÓÃVB¡£
¶ÁÈ¡¡¢Ð޸Ķþ½øÖÆÎļþÈÔÊǴ󲿷ֱà³ÌÓïÑԵĻù±¾¿ª·¢¼¼ÄÜ¡£¿ÉÒÔÌá¸ß´¦ÀíÎļþЧÂÊ£¬Ö÷ÒªÓ¦ÓÃÔÚͨÐÅ¡¢½»»»Êý¾ÝµÈ·½Ãæ¡£
'open filena ......
'* ************************************************************** *
'* ³ÌÐòÃû³Æ£ºButton.ctl
'* ³ÌÐò¹¦ÄÜ£ºÍ¸Ã÷¸¡¶¯°´Å¤
'* ×÷Õߣºlyserver£¬×îºóÐÞ¸ÄÈÕÆÚ£º2009Äê11ÔÂ
'* ÁªÏµ·½Ê½£ºhttp://blog.csdn.net/lyserver
'* ************************************************************ ......
¼òµ¥¶øʵÓõĺϲ¢ExcelÎļþµÄº¯Êý£¬Äܹ»½«¶à¸öXLSÎļþÖÐÖ¸¶¨ÊýÁ¿µÄ¹¤×÷±í×Ô¶¯ºÏ²¢µ½Ò»¸öXLSÎļþÀï¡£µ±È»£¬Èç¹ûÖ»ÊÇÊý¾ÝºÏ²¢£¬ÔòʹÓÃADO¾Í¿ÉÒÔʵÏÖ£¬µ«Èç¹ûÒª±£Áô±í¸ñ¸ñʽ£¬Ôò¿ÖÅÂÖ»ÄÜʹÓð³µÄ·½·¨ÁË¡£
Ò»¡¢º¯Êý´úÂ룺
Option Explicit
'* ********************************************************* ......
Óɵ×ÖÁÉÏÊÇ£º
• ÍйÜ×ÊÔ´
• WMI »ù´¡½á¹¹
• ʹÓÃÕß
ÍйÜ×ÊÔ´
ÍйÜ×ÊÔ´ÊÇÈÎÒâÂß¼»òÎïÀí×é¼þ£¬Í¨¹ýʹÓà WMI ½øÐй«¿ªºÍ¹ÜÀí¡£¿ÉÒÔʹÓà WMI ¹ÜÀíµ ......