Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

vb ÔÚÔõô¶Áд*.txtÎļþ,Çë¸ßÊÖ°ï°ï棡£¡

vb ÔÚÔõô¶Áд*.txtÎļþ,Çë¸ßÊÖ°ï°ï棡£¡

ÓдúÂ룬»¹Çë¼Óµã×¢ÊÍ,±¾ÈËÍ·Ò»´Îvb¡£Ò²¾Í˵ÎÒ»¹²»»áµÄ¡£¡£¡£^_^
  VB¶ÁдÎļþÒªÓõ½ÒÔÏÂÓï¾ä£º
    1¡¢OpenÓï¾ä´ò¿ªÎļþ¡£
    2¡¢¶ÁÎļþʹÓÃLine Input¡¢Input #£¬£¨ÒÔÉÏΪÎı¾·½Ê½£©ºÍGet£¨ÒÔÉÏΪ¶þ½øÖÆ·½Ê½£©¡£
    3¡¢Ð´ÎļþʹÓÃPrint #¡¢Write£¨ÒÔÉÏΪÎı¾·½Ê½£©ºÍPut£¨ÒÔÉÏΪ¶þ½øÖÆ·½Ê½£©¡£
    4¡¢CloseÓï¾ä¹Ø±ÕÎļþ
    5¡¢¶þ½øÖÆ·½Ê½ÏÂÒÆ¶¯ÎļþλÖÃʹÓÃSeekÓï¾ä¡£
    ËùÓÐÕâЩÓï¾äÔÚVBµÄ°ïÖúÖж¼ÓÐÏêϸ˵Ã÷ºÍÀý×Ó¡£
    Îı¾ÎļþµÄʾÀý£º
    Open "TESTFILE" For Output As #1 ' ´ò¿ªÊä³öÎļþ¡£
    Print #1, "This is a test" ' ½«Îı¾Êý¾ÝдÈëÎļþ¡£
    Print #1, ' ½«¿Õ°×ÐÐдÈëÎļþ¡£
    Print #1, "Zone 1"£» Tab £» "Zone 2" ' Êý¾ÝдÈëÁ½¸öÇø£¨print zones£©¡£
    Print #1, "Hello" £» " " £» "World" ' ÒÔ¿Õ¸ñ¸ô¿ªÁ½¸ö×Ö·û´®¡£
    Print #1, Spc(5) £» "5 leading spaces " ' ÔÚ×Ö·û´®Ö®Ç°Ð´ÈëÎå¸ö¿Õ¸ñ¡£
   
    Print #1, Tab(10) £» "Hello" ' ½«Êý¾ÝдÔÚµÚÊ®ÁС£
   
    ' ¸³Öµ Boolean¡¢Date¡¢Null ¼° Error µÈ¡£
    Dim MyBool, MyDate, MyNull, MyError
    MyBool = False : MyDate = #February 12, 1


Ïà¹ØÎÊ´ð£º

ΪʲôCдDLLÎļþC¡¢PBÄܵ÷ÓÃVB²»Äܵ÷ÓÃ

ΪʲôCдµÄDLLÎļþC¡¢PBÄܵ÷ÓÃVB²»Äܵ÷Óã¿
VBÀïΪʲôÓеÄDLLÖ±½Óͨ¹ýÒýÓÿÉÒÔʹÓã¿ÓеÄÐèҪͨ¹ýdeclareÉêÃ÷Íⲿº¯Êý£¿ÕâЩDLLÓÐʲô²î±ð£¿

1¡¢ÎªÊ²Ã´PBÄÜͨ¹ýDECLAREÉùÃ÷¶øVB²»ÐУ¿
2¡¢Èç¹ûÕâ¸ödllÖÐµÄ ......

VBÈçºÎ×èֹij³ÌÐòÔËÐС££¿

±ÈÈç½ø³Ì¼ÓÔØÐµijÌÐò¡£

ÔÚÆäÔËÐÐ֮ǰ×èÖ¹¡£

È»ºóÔÊÐíºó·ÅÐС£


±ÈÈç³ÌÐòÖ÷Îļþ·¾¶ÊÇc:\test\test.exe£¬½¨Á¢ÄÚÈÝÈÎÒâµÄÎļþc:\test\test.exe.manifest¡£

¾ÍÊDz»ÖªµÀ³ÌÐòÎļþ·¾¶¡£

ÉèÖ ......

´ÓVBתÐÐVB.NET~~~¿ªÊ¼µÄʱºòÈçºÎѧ»ù´¡ÈëÃŰ¡~

VBżѧµÃ²»´í£¬ÏÖÔÚ´óÒ»£¬¸ßÈýµÄʱºò¾ÍѧVBÁË£¬ÏÖÔÚѧУÀï¶¼ÊÇѧC#ºÍVB.NETµÄÐֵܶࡣ¡£¡£
żҪתÐÐVB.NETÁË~µ±ÄêѧVBѧÁË2Ä꣬¶ÔVBÀïÃæµÄ³£Óú¯Êý¶¼Ê®·ÖÁ˽⡣
Select¡¢If½á¹¹¡¢For NextÑ­»·¡¢µÈ¶¼Á˽⡣¡£¡£ ......

VBµ÷ÓÃË®¾§±¨±íDesign ƽ·²ÌáʾMemoryFullÎÊÌâ

  ¸÷λ´óϺ£º
        ÎÒÓÐÒ»¸öVBµ÷ÓÃË®¾§±¨±íµÄϵͳ£¬±¨±íÊÇ×÷Ϊһ¸öDesignǶÔÚVBÀïµÄ£¬½ñÌì·¢ÏÖ´òÓ¡µÚÒ»Õű¨±íÕý³££¬Í¬ÑùµÄÊý¾Ý£¬ÔÚµã´òÓ¡ÔÙµ÷ÓÃÒ»´Î¾Í»á±¨ Memory FullµÄ´íÎ󣬵«ÊÇ ......

vbÖÐÈçºÎÐ޸ľÖÓòÍøµçÄÔµÄÍø¹Ø»òdns?

×Ô¼º²ÉÓõÄÊÇSet objWMIService = GetObject("winmgmts:\\"&computername&"\root\cimv2")£¬ÆäÖÐcomputernameÊǾÖÓòÍøÒ»Ì¨µçÄÔµÄIP»ò¼ÆËã»úÃû£¬µ«Ê¹ÓÃÕâ¸öwmiÓï¾ä¶ÔÔ¶³Ì¼ÆËã»ú½øÐвÙ×÷ʱ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ