ÓÃVB¿´ËÆÈÝÒ×È´²»¿ÉÄÜʵÏֵģ¿ - VB / »ù´¡Àà
×òÌì¾ÍÔÚÕâÎÊÌâÉÏÑо¿ÁËÒ»ÕûÌ죬¶øÇÒ»¹½ÐÉÏÁËÓÃDELPHIµÄͬÊÂÒ»ÆðÑо¿£¬µ«ÊÇËÆºõ»¹ÊÇûʵÏÖ¡£ÓиßÊÖÄܽâ¾ö·ñ£¿ ÎÊÌâºÜ¼òµ¥£¬¾ÍÊÇÈ¥µô±êÌâÀ¸µÄͼ±ê£¬²»ÊǺÜɵµÄɾ³ý»òÕßʹͼ±ê͸Ã÷£¬ºÃÁË·Ï»°²»¶à˵£¬¿´Í¼¾ÍÖªµÀÁË¡£ Ôͼ£º ²»ÊÇÕâ¸öЧ¹û1£º ²»ÊÇÕâ¸öЧ¹û1£º ×îÖÕÓ¦¸ÃµÄЧ¹û£º
VBGOODͬÌâÌÖÂÛÁ´½Ó£º http://www.vbgood.com/viewthread.php?tid=92886&extra= VB6Àﳬ¼¶¼òµ¥°¡£¬ÉèÖÃһϼ´¿É£ºWhatsThisButtion--true ;WhatsThisHelp -- True ; BoderStyle -- 3 ÒýÓà VB6Àﳬ¼¶¼òµ¥°¡£¬ÉèÖÃһϼ´¿É£ºWhatsThisButtion--true ;WhatsThisHelp -- True ; BoderStyle -- 3 ¡°ÎÊÌâºÜ¼òµ¥£¬¾ÍÊÇÈ¥µô±êÌâÀ¸µÄͼ±ê¡±£¬²»ÊÇÒª¼Ó¡°£¿¡±°´Å¥¡£ CreateWindowEx¿ÉÒÔ´´½¨³öÀ´ÕâÖÖÑùʽµÄ£¬¶÷£¬ÄÇÓ¦¸Ã¿ÉÒÔʹÓÃSetWindowLong¸ü¸ÄÑùʽ¡£ ·¢Ò»ÏÂÎÒ×òÌìÑо¿µÄ³É¹û£¬»ù±¾ÉÏÄÜÏëµ½µÄ·½·¨ÓÐһϡ£ 1.ÓÃSPY++ÕÒÒ»¸ö¡°ÔËÐпò¡±µÄGWL_STYLEºÍGWL_EXSTYLEµÄÖµ£¬Ö±½Óд½ø³ÌÐòÀʧ°Ü¡£ 2.ÓÃSPY++°ÑËùÓÐGWL_STYLEÀïËùÓÐÊôÐÔÒ»¸öÒ»¸öµÄÌí¼Óµ½´°ÌåÄÚ——ʧ°Ü¡£ 3.SendMessage ¸ø´°¿ÚÈ¥µôͼ±ê£¬·¢ÏÖͼ±ê͸Ã÷ÁË£¬µ«ÊDZêÌâÀ¸ÎÄ×Ö»¹ÊÇÒ»Ñù²»»á×ó¶ÔÆë£¬¿´ÆðÀ´ºÜ¹Ö——ʧ°Ü¡£ 4.»ñÈ¡´°¿Ú±¾ÉíGWL_STYLE½øÐÐXorÒì»ò²Ù×÷——ʧ°Ü¡£ VB code: Private Const WS_POPUP = &H80000000 Private Declare Function SetWindowLong Lib "u
Ïà¹ØÎÊ´ð£º
ÎÒÔÚÀàÖÐÓÐÒ»¸öº¯Êý Public Function DownloadAdditionalSite(SiteName As siteconfig, Directory As String, ymd As String) As Boolean siteconfigÊÇÎÒ×Ô¶¨ÒåÀàÐ͵ÄÊý¾Ý£¬ÎªÊ²Ã´»áÌáʾ¡°Ö»ÓÐÔÚ¹«¹²¶ÔÏóÄ£¿éÖж ......
ÏÖÔÚÎÒÏë¸ù¾ÝtreeviewÉÏÿ¸ö½ÚµãµÄȨÏÞ£¬Ã»ÓÐȨÏ޵Ľڵ㲻Äܱ»Ñ¡ÖУ¬¶øÇҳɻÒÉ«£¬ÔõôʵÏÖ£¬ÔÚÏߵȡ£¡£¡£ Õâ¸ö£¿¡£¡£¡£ Ã²ËÆÃ»·¨¡£ ÊÔÊÔÄܲ»ÄܸÄijЩnodeµÄÑÕÉ«£¬¼Ç¼ÏÂÉϴεÄnodeclickÀïµÄnode¡£ Ï´εã»÷µÄÈç¹ ......
Ôõô°ÑÒÑÖªµÄÊý¾Ý±£´æ³ÉxmlÎļþ£¬ÏÖÔÚÒÑÖªµÄÊý¾ÝÊÇ <?mso-application progid="Excel.Sheet"?> <Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet" xmlns:o=& ......
ÏÖÔÚÓиöxmlÎļþÊÇ<?xml version="1.0"?> <?mso-application progid="Excel.Sheet"?> <Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet" xm ......
ÎÒÏëÓÃVB×öÒ»¸öOCX£¨´¿²ËÄñ£¬ÁÙʱÐèÒªÓÃVB×öµã¶«Î÷£¬ÌØÀ´Çë½Ì£©£¬AÓû§£¨IP£º192.168.0.1£©ÓëBÓû§£¨IP£º192.168.0.2£©½øÐеã¶ÔµãµÄ·¢ËͽÓÊÕÏûÏ¢ ÒªÇó²ÉÓÃOCX·½Ê½£¬±ÈÈçAÓû§ÖªµÀBÓû§IP£¬ÎÒÖ±½Ó´«²Î£¨BµÄIP£©ÖÁOCX ......