Ò½Ôº Ã×ÀÏʦ VB×ܽá
×òÌìÏÂÎçÎÒºÍСÅÖ±»Ã×ÀÏʦ´«»½µ½ÊÐҽԺȥ£¬Ã×ÀÏʦÏëÌýÌýËûÖÜÁùÉϵĿζÔÎÒµÄÓ°ÏìÓжà´ó£¬ÎһشðµÄ»ù±¾ÄÚÈݺ͡¶10Äê VB 1¡·ÀïÃæµÄÄÚÈݲ¶à£¬µ«Ã×ÀÏʦ¸Ð¾õºÜ¿Õ¶´£¬¸Ð¾õÎÒÔÚ·º·º¶øÌ¸£¬ÆäʵÎÒÒ²Óиоõ¡£
ΪÁ˽«Ã×ÀÏʦ˵µÄ×᷽ܽ·¨Ó¦ÓÃÓÚʵ¼ù£¬ÎÒÕâÁ½ÌìÇôúÂë·¢ÏÖMsgBox£¬InputBox£¬PrintµÄÓ÷¨²î²»¶à£¬È»ºó¾Í½«Æä×ܽáÈçÏ£º
MsgBox(prompt[, buttons] [, title] [, helpfile, context])£¬ÆäÖÐPromptÊDZØÐèµÃ×Ö·û´®±í´ïʽ£¬×÷ΪÏÔʾÔÚ¶Ô»°¿òÖеÄÏûÏ¢¡£ButtonÊÇ¿ÉÑ¡µÄÊýÖµ±í´ïʽ£¬ÏÔʾָ¶¨°´Å¥µÄÊýÄ¿ºÍÐÎʽ£¬È±Ê¡ÖµÎª0¡£Title±êÌâÀ¸ÖеÄÏÔʾµÄ×Ö·û´®±í´ïʽ
InputBox(prompt[, title] [, default] [, xpos] [, ypos] [, helpfile, context])
promptͬÉÏ£¬titleͬÉÏ£¬defaultÏÔʾÔÚÎı¾¿òÖеÄ×Ö·û´®±í´ïʽ£¬ÈçÊ¡ÂÔ£¬ÔòÎı¾¿òΪ¿Õ¡£Xpos£¬Ypos¿ÉÑ¡µÄÊýÖµ±í´ïʽ£¬Ö¸¶¨¶Ô»°¿òµÄ×ó±ßÓëÆÁÄ»×ó±ßµÄˮƽ¾àÀ룬¶Ô»°¿òµÄÉϱßÓëÆÁÄ»ÉϱߵľàÀë¡£
object.Print [outputlist] ÔÚImmediate´°¿ÚÖÐÏÔʾÎı¾¡£objectÊDZØÐèµÄ¶ÔÏó±í´ïʽ£¬ÆäֵΪ“Ó¦ÓÃÓÚ”ÁбíÖеĶÔÏó¡£ outputlist¿ÉÑ¡µÄÒª´òÓ¡µÄ±í´ïʽ£¬ÈçÊ¡ÂÔ£¬Ôò´òÓ¡Ò»Ðпհ×ÐС£
ÈýÕßÎÒÖ»¿´µ½ÐÎʽºÍ¹¦ÄÜÉϵÄÏàËÆ£¬²¢Ã»ÓÐÉËûÃǵĸùÔ´¡£Ò²ÊÇÒòΪ×Ô¼º¿´µÄ»¹²»¹»ÉîÈë°É£¬²»ÄÜ´ïµ½Ã×ÀÏʦµÄЧ¹û¡£Ã×ÀÏʦÈÃÓÃÒ»¾ä»°¸ÅÀ¨ÎÒµÄÊÕ»ñ£¬ÎÒ˵£º“×¢Òâ×ܽᣬ×ܽá¾ÍÊÇÁªÏëºÍ¶Ô±È¡£”Ëû°ÑͷʧÍûµÄŤ¹ýÈ¥£¬Ëµ£º“ÓÀÔ¶²»ÒªËµ¾ÍÊÇ£¬ËµÒ»´Î´íÒ»´Î¡£µ±Ìýµ½±ðÈË˵¾ÍÊÇʱ£¬ÎÒ¾ÍÖªµÀÕâ¸öÈËÌ«¾ø¶ÔÁË¡£×ܽ᲻½öÓÐÁªÏëºÍ¶Ô±È£¬»¹ÓаüÀ¨µÈ¡£Ö»ÊÇÁªÏëºÍ¶Ô±ÈÎÒÃDZȽϳ£¼û¡£ÏÖÔڵĴóѧѧ¿Æ¶¼»®Öص㣬ÆäÊµÖØµãÊÇʲô£¬¾ÍÊÇÈËÃǾ³£¼ûµ½ºÍÓõ½µÄ¶«Î÷£¬ÕâÑùÒ»»®¾Í°Ñ֪ʶ¶¼¹ÂÁ¢ÁË£¬Ñ§Ï°Ö®Öиù±¾Ã»ÓÐÊ²Ã´ÖØµã£¬ÎÒÃÇ¿´ÎÊÌâÒªÈ«Ãæ£¬²»Òª¹ÂÁ¢µØ¿´”˵ÅÖ×ÓʱÌáµ½ÁË¡¶Î÷Óμǡ·£¬ÖªÊ¶Êǿɴó¿ÉСµÄ£¬ÎÒÃÇÒª´ïµ½µÄ¾³½çÊÇÈÃ֪ʶ¿É´ó¿ÉС£¬¾Í³ÌÐòÉè¼Æ¶øÑÔСµ½¾Í“³ÌÐòÉè¼Æ”Ëĸö×Ö£¬´óµ½Ëµ¼¸ÌìҲ˵²»Íê¡£¸úËïÎò¿ÕµÄ½ð¹¿°ôËÆµÄ£¬´óС×ÔÈç¡£
Ïà¹ØÎĵµ£º
½«³¤Â·¾¶×ªÎª¶Ì·¾¶
Private Declare Function GetShortPathName Lib "kernel32" Alias "GetShortPathNameA" (ByVal lpszLongPath As String, ByVal lpszShortPath As String, ByVal cchBuffer As Long) As Long
Private Function ShortPath(ByVal FileName As String) As String
Dim S As String
On Error GoTo exitFu ......
Ò»¿ªÊ¼ ÒÔΪVBµÄÏß³Ì ²»ÊÇÏñÍøÉÏÈË˵µÄÄÇô´àÈõ¡£¡£¡£°¥ ÏÖÔÚÁìÂÔµ½ÁË¡£¡£¡£VPrivate Declare Function CreateThread Lib "kernel32" (lpThreadAttributes As Any, ByVal dwStackSize As Long, ByVal lpStartAddress As Long, ByVal lpParameter As Long, ByVal dwCreationFlags As Long, lpThreadId As Long) As Long
Pri ......
VB ×Ö½ÚÊý×éºÍ×Ö·û´®µÄת»»ÎÊÌâ (String<>Byte)
Posted by JiaJia 16 March,2009 (2)Comment
Ò»¡¢ ǰÑÔ
¡¡¡¡ Êý¾ÝÀàÐÍת»»ÔÚ±à³ÌÖо³£Óõ½£¬VB6ÌṩÁËÒ»ÕûÌ×ÀàÐÍת»»µÄº¯Êý¡£µ«ÊÇ£¬ÔÚ½øÐÐÀàÐÍת»»Ê±£¬ÓÐʱºò½ö½öÒÀ¿¿VBÌṩµÄº¯ÊýÊDz»ÄÜ´ïµ½×Ô¼ºµÄÄ¿µÄµÄ¡£Òò´Ë£¬ÐèÒª¿¼ÂÇÓÃÆäËûµÄ·½·¨À´Íê³ÉÊý¾ÝÀàÐÍת»»¡£±¾ÎĽ ......
App ¶ÔÏóÊÇVBÓ¦ÓóÌÐòµÄÈ«¾ÖÐÅÏ¢£¬ÈçÓ¦ÓóÌÐòµÄ±êÌâ¡¢°æ±¾ÐÅÏ¢¡¢¿ÉÖ´ÐÐÎļþºÍ°ïÖúÎļþµÄ·¾¶¼°Ãû³ÆÒÔ¼°ÊÇ·ñÔËÐÐǰһ¸öÓ¦ÓóÌÐòµÄʾÀý¡£
ÊôÐÔ
£££££££ ÆäËûÊôÐÔ£££££££££££££££££
EXEName ÊôÐÔ ·µ»Øµ±Ç°ÕýÔËÐеĿÉÖ´ÐÐÎļþ ......