Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö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


Ïà¹ØÎÊ´ð£º

vbÈçºÎµ÷ÓÃIllustrator£¨´ËǰIllustratorδÆô¶¯£©£¿

Çë½ÌһϣºÎÒÓÃvbдÁËÒ»¸öµ÷ÓÃIllustratorµÄ²âÊÔ³ÌÐò£¬´úÂëºÜ¼òµ¥£ºPrivate Sub Command1_Click()
Dim app As New Illustrator.Application
Dim doc As Illustrator.Document
Dim thislayer As Illustrator.Layer ......

vb´òÓ¡

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

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

    Printer.ScaleMode = vbMillimeters
    Print ......

VB ÍøÒ³×Ô¶¯µÇ½

Option Explicit

Private Sub Command1_Click()
    WebBrowser1.Navigate "http://mc.qeedoo.com/servers.php"
End Sub

Private Sub WebBrowser1_DocumentComplete(ByVal ......

VB ÔõôÄÜÌá¸ßÎı¾ÎļþµÄÑ­»·ËÙ¶È

ÌâÄ¿ÃèÊöÓ¦¸Ã²»ÊǺÜ׼ȷ¡£
ÏÖ×´ÊÇ£º¼ÙÈçÒ»¸öÎı¾Îļþ¹²100ÐУ¬ÄÇôÎÒÑ­»·´ÎÊý×î´ó¾ÍÊÇ100×100=10000Ï£¬»¨·Ñʱ¼ä·Ç³£¶à£¬ÇëÎÊÓÐûÓа취Äܹ»Ìá¸ß¶ÔÎı¾ÎļþµÄÑ­»··ÃÎÊËÙ¶È¡£·ÇÊý¾Ý¿â¼¼Êõ¡£
ÄãҪѭ»·×öʲô£ ......

VB ÐÞ¸Ä×¢²á±íÏîµÄȨÏÞ

¶¼ÊÇÓÃregedt32.exeÀ´ÐÞ¸Ä×¢²áÖÐijһÏîµÄȨÏÞÎÊÌâ
Äܲ»ÄÜÓÃAPIÀ´ÊµÏÖ°¡£¬ÍíÉÏÕҵͼÊÇC++µÄ
¸½C++´úÂ룺
#include <Windows.h>
#include <Aclapi.h>
#pragma comment (lib,"Adv ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ