VB Îı¾¿ò
×Ö·û´® m1="E" ×Ö·û´® m2="F" Èç¹ûtext1.text=m1+m2µÄ»° Ôòtext1ÏÔʾµÄÊÇ EF µ«ÊÇÈç¹û ×Ö·û´® m1="E" ×Ö·û´® m2="6" Èç¹ûtext1.text=m1+m2µÄ»° Ôòtext1ÏÔʾµÄÊÇ E 6 £¨EºÍ6Ö®¼äÓиö¿Õ¸ñ Ôõô²»ÈÃÓпոñ£©
m1 & m2 ¹Ø±ÕÖÐÎÄÊäÈë·¨ÊäÈëE¾ÍûÕâ¸öÎÊÌâÁË ¶Ô×Ö·û´®µÄ´¦ÀíÀ´Ê飬+ºÍ&ûʲô²î±ð text1.text=trim(m1) & trim(m2) ÒýÓà text1.text=trim(m1) & trim(m2) 3Â¥Õâ¸ö»Ø¸´ÊÇÕýÈ·´ð°¸¡£ Ó¦¸ÃÒ»Ñù°¡ÒýÓà ¹Ø±ÕÖÐÎÄÊäÈë·¨ÊäÈëE¾ÍûÕâ¸öÎÊÌâÁË ¶Ô×Ö·û´®µÄ´¦ÀíÀ´Ê飬+ºÍ&ûʲô²î±ð ¸öÈËÈÏΪÕâ¸öÓеÀÀí¡£ µÄ確£¬Ê×ÏÈÒª確¶¨È«½Ç»ò°ë½â£¬ Èç¹ûÕæÊǶàÁËÒ»個¿Õ¸ñ£¬Ê¹ÓÃTrim()º¯數¾Í¿ÉÒÔ¡£ VB code: Private Sub Command1_Click() Dim m1 As String, m2 As String m1 = "E" m2 = "6" MsgBox m1 + m2 End Sub ÎÒ²âÊÔµÄ"E6" ˵Ã÷ÄãEµÄÊäÈëÓ¦¸ÃÔÚÈ«½Ç״̬Ï£¬µ«ÊÇÈç¹ûÊÇÕâÑùµÄ»°ÄãÒ²²»Ó¦¸Ã³öÏÖ"EF"¡£ ÎÞÂÛÔõÑù»¹ÊÇд´úÂ뻹ÊÇ×ÐϸΪÉÏÒýÓà µÄ確£¬Ê×ÏÈÒª確¶¨È«½Ç»ò°ë½â£¬ Èç¹ûÕæÊǶàÁËÒ»個¿Õ¸ñ£¬Ê¹ÓÃTrim()º¯數¾Í¿ÉÒÔ¡£
Ïà¹ØÎÊ´ð£º
¸÷λ´óÏÀ£¬ÏÖÓÐÒ»ÄÑÌâÇó½Ì£º¼ÙÉèÊý¾Ý¿â£¨mysql»òoracle¡¡µÈÊý¾Ý¿â£©°²×°ÔÚLINUXϵͳµÄ·þÎñÆ÷ÉÏ£¬ÎÒÔÚ¿Í»§¶Ë£¨windowsϵͳ£©Óà VBÈçºÎ½¨Á¢ÓëÊý¾Ý¿âµÄÁ¬½Ó£¬ÊÇ·ñ¿ÉÒÔʹÓÃÀàËÆADO»òDAOµ±ÖеÄÁ¬½ÓÓï¾ä£¿ÇëÄÄλ´óÏÀÖ¸µ¼ ......
Ò»¸ö´°Ì壬3¸ödatagrid£¬¹²¼Æ3¸ö±í£¬Ò»¸ö±í¶ÔÓ¦Ò»¸ödatagrid£¬µã»÷datagrid1(´ò¿ª¸Ã´°ÌåʱÒѾ±»¸³Öµ)£¬¸ù¾Ýdatagrid1ÖеÄij¸öÖµ£¬²éѯ±í2ºÍ±í3£¬²¢°Ñ·ûºÏÌõ¼þµÄ·Ö±ð¸³Öµ¸ødatagrid2ºÍdatagrid3£¬ÒªÔõôд VB ......
ÎÒÓÃVBµ÷ÓÃWord ǶÈëVB´°ÌåÖÐ(ÕâЩ¶¼ÊÇÕý³£) È»ºóÔÚ×ÀÃæ´ò¿ªÁíÒ»¸öword a.doc ÏÖÔÚÎÊÌâ³öÀ´ÁË.....ÎҹرÕVB´°Ìå,֮ǰµÄÄǸöwordÒ²Õý³£¹Ø±ÕÁË ½ÓÏÂÀ´±Õ¹Øa.doc »á³öÏÖÎÊÌâ ÎÒµ÷ÓõÄw ......
ÎÒÓÃDelphiдÁËÒ»¸öDLL, DLLÀïÓÐMDIµÄ×Ó´°Ìå,DLL³õʼ»¯Ê± ´«µÝµ÷ÓÃÕßµÄTApplication¸øDLL, ÔÚDelphi7Öе÷ÓÃÒѾͨ¹ý,µ«ÊDz»ÖªµÀÔÚVBÖÐÓÐÎÞTApplication¶ÔÓ¦ÀàÐÍ, ÊÇ·ñÄÜÔÚVBÖе÷ÓÃ? ÄãºÃ£¬ÓÃinstance²»ÊǾͿÉÒÔÁË ......
¸÷룬ÇëÎʹ³×ÓÊÇÔõôÔËÐеİ¡£¿ÇëÏÈ¿´¿´ÎÒдµÄ´úÂ룺 Public hhook Private Sub Command1_Click() hhook = SetWindowsHookEx(2, AddressOf testhook, 0, App.ThreadID) End Sub ÒÔϵ ......