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

vbÖÐË«ÖØÒýºÅµÄ×÷ÓÃ

ÇëÎÊ£ºÎÒÔÚÓá°¡±Êä³ö×Ö·û´®aµÄʱºò¡£Èç¹ûaÊÇÒ»¸öÕûÐͱäÁ¿¡£ÎÒÔõÑùÔÚ¡°¡±ÀïÊä³öaµÄÖµ¡£ÀýÈç
dim a as integer,b as integer
a = 1
b = 2
print "";a;"+";b;"="a+b    ÎÒÏëÒªµÄ½á¹ûÊÇ1+2=3¡£ÎÒÖªµÀÊÇÕâôд¡£µ«ÊÇÔ­ÒòÎÒ²»ÖªµÀ¡£·ÖºÅÊÇÆðʲô×÷Óã¿Ë«ÖØÒýºÅÓÖÊÇÆðʲô×÷Óá£ÎÒ²»¼Ó·ÖºÅËûÒ²»á×Ô¶¯¼ÓÉϵġ£ÎÒÊÇÐÂÈË¡£¶àлָµ¼£¡£¡£¡
 
a & "+" & b &"=" &(a+b)

¶àлÄú¡£ÎÒ»¹ÏëÎÊ  "";a;"+";b;"=" a+b  ÖеķֺźÍÒýºÅÊÇÆðʲô×÷Óá£

"ʹÓ÷ֺŠ(;) Ö±½Ó½«²åÈëµã¶¨Î»ÔÚÉÏÒ»¸ö±»ÏÔʾµÄ×Ö·ûÖ®ºó"
Ò²¾ÍÏ൱ÓÚÁ¬½Ó×Ö·û´®ÓõÄ(&),Ö»²»¹ý(;)Ò»°ã³öÏÖÔÚprint·½·¨ÖÐ
±ÈÈç:
    Dim a As String, b As String
    a = "a"
    b = "b"
    Print a;
    Print b
½á¹û¾ÍÊÇ ab
¸úprint a & b Ò»Ñù.



ÒýÓÃ
¶àлÄú¡£ÎÒ»¹ÏëÎÊ  "";a;"+";b;"=" a+b  ÖеķֺźÍÒýºÅÊÇÆðʲô×÷Óá£

Ç°ÃæÄǸöË«ÒýºÅ¿ÉÒÔÈ¥µô,ÊÇ¿Õ×Ö·û´®

ллÄú¡£ÎÒ»¹ÏëÎÊÒ»¸öÎÊÌâ
Static Sub delayloop(delaytime)
Const secondsinday = 24& * 60& * 60&
loopfinish = Timer + delaytime
If loopfinish > secondsinday Then
    loopfinish = loopfinish - secondsinday
    Do While T


Ïà¹ØÎÊ´ð£º

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

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

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

ÓÃVBÔõôʵÏÖÕâ¸ö³ÌÐòµÄЧ¹û£¿

http://fp4bmg.blu.livefilestore.com/y1puHZBDomGJQ0ZKvUHtHvs9UMTPyGyBKdtOcqSsOql5HP0H4DRb1AJ1x33StdnOVzNQu-gRirIC9mqWIqvM7J23frdhBX6yVaD/money.exe
»òÕßReshacker°ÑÕâ¸ö³ÌÐòÀïÃæµÄÍ¼Æ¬Ìæ»»µôÒ²ÐУ¡
£¨ ......

vbдµÄ³ÌÐò±àÒëºó,ÔËÐÐÈô³ö´í,ÈçºÎÖªµÀµ½ÔÚÄÄÒ»ÐÐ?

vbдµÄ³ÌÐò±àÒëºó,ÔËÐÐÈô³ö´í,ÈçºÎÖªµÀµ½ÔÚÄÄÒ»ÐÐ?

°´Ctrl+F5Ô¤±àÒ룬³ö´íʱ»áÌø×ªµ½´íÎóÐÐ

²»ÊÇÄÇÑùµÄÁË,ÎÒÊÇÒªÇó±àÒë³ÉEXEºóÔËÐÐ,Ìáʾ³ö´íÄÜ·ñÌáʾ´íÔÚÄÄÒ»ÐÐ.

ÎÒ±àÒëºóÔÚÎҵĵçÄÔÉÏÔËÐÐûÎÊÌâ,µ«Ô ......

Çó½ÌÏÂVBÈçºÎ¸øD3DÓÎϷдÆÁ - VB / API

ÏëÔÚwarcraft3Àï½øÐÐдÆÁ²Ù×÷¡¾Èç¶Ôսƽ̨ÖеÄʤ¸ºÌáʾÐÅÏ¢¡¿£¬Ð§¹û¾ÍÏñÓÎϷƽ̨ÖÐÒ»Ñù£¬ÎÒÊÔ¹ýÔÚÒ»´°¿ÚÖÐдÈëÎÄ×Ö£¬È»ºóÒ»Ö±Èô°¿ÚÇ¿ÖÆ×îǰ£¬ËäÈ»ÄÜʵÏÖÎÄ×ÖÏÔʾ£¬µ«ÊÇÎÄ×ֻ᲻¶ÏÉÁ˸£¬¶øÇÒÓв»È·¶¨BUG£¬Í¨¹ýÂÛ̳ËÑ ......

vb´òÓ¡

ÒªÓÃvb´òÓ¡Ò»ÌõÏߣ¬³¤¶ÈÊÇ100ºÁÃ×Ôõôд£¿
¹Ø×¢

VB code:
Printer.ScaleMode = vbMillimeters
Printer.Line (10, 10)-(110, 10)

    Printer.ScaleMode = vbMillimeters
    Print ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ