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

VB ÓÃsleepʱ£¬³öÏÖ³ÌÐòÎÞÏìÓ¦

Ë®Á÷Ïß»­Í¼ÈçÏ£º
Picture1.CurrentX = pen(1).PenPointx Picture1.CurrentY = pen(1).PenPointy
For temp1 = 1 To pointcount - 1
    If (pen(temp1).PenPointx = -1 And pen(temp1).PenPointy = -1) Then
    Picture1.CurrentX = pen(temp1 + 1).PenPointx
    Picture1.CurrentY = pen(temp1 + 1).PenPointy
    Else
    Picture1.Line -(pen(temp1).PenPointx, pen(temp1).PenPointy )
    Sleep (pen(temp1 + 1).time - pen(temp1).time)
    End If
Next temp1

penµÄ¶¨ÒåÈçÏ£º
Private Type paintpen
      PenPointx  As Integer  'XÖá×ø±ê
      PenPointy  As Integer  'YÖá×ø±ê
      time        As Long    ¡®Ê±¼äµã
  End Type 
                             
£¨-1£¬-1£¬0£©ÊÇ¿ªÊ¼ÏÂÒ»±Ê
ÔõôÎÒÒ»µ½ÏÂÒ»»®µÄʱºò¾Í³ö´íÁË£¬³ÌÐò¾Í²»¶¯ÁË
´ó¼Ò°ïÎÒ¿´¿´£¬ÄÄÀï³öÎÊÌâÁË
²»ÒªsleepÄǾä»ò¸Ä³Éapplication.doevents

ÒýÓÃ
²»ÒªsleepÄǾä»ò¸Ä³Éapplication.doevents

²»ÒªsleepµÄ»°£¬ÎÞ·¨¿ØÖÆËÙ¶È
ÔõôÓÃapplication.doevents£¿


Ææ¹ÖµÄ

    Else
    Picture1.Line -(pen(temp1).PenPointx, pen(temp1).PenPo


Ïà¹ØÎÊ´ð£º

Ϊʲô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ÔõôֻÕë¶Ôwindows×Ô´øµÄÎļþµÄÓÒ¼üÌí¼Ó²Ëµ¥ È磨.txt .doc)
Õâ¸öÊÇÖ»Õë¶ÔÒÔÕâÁ½¸öΪÀ©Õ¹ÃûµÄÎļþ²Ù×÷
Windows Registry Editor Version 5.00
[HKEY_CLASSES_ROOT\txtfile\shell\[Ëæ±ãÆðÃû]\command]
@= ......

vb¿ØÖÆGPRS MODEM²¦ºÅ

ÎÒÏë×ö¸öÓÃvb6×öµÄ³ÌÐò£¬¿ÉÒÔ¿ØÖÆGPRS MODEM²¦ºÅ£¬È粦ÎÒ×Ô¼ºµÄÊÖ»ú
¿ÉÒÔ°¡
ÄãÏÈϸöATÃüÁºÏѧϰѧϰ

ÎÒÀ´¶¥

¶¥Ìù

LZºÃÀ÷º¦

²»¶¥²»ÐÐ

ÀÏÊÇÅÅMP
ÒýÓÃ
LZºÃÀ÷º¦
......

ÊìϤVBµÄ½øÀ´£¬ÓÐÏîÄ¿


ÓÐûÓк¼ÖݵÄÅóÓÑ£¬ÊìϤVBµÄ£¬ÓÐÐËȤ×öµÄ»°ÁôÏÂÁªÏµ·½Ê½
VB6 OR VB.NET?
¿Éϧ²»ÔÚº¼ÖÝ,遠³Ì¿É·ñ?

ÐǪ̈ÁªÏµ·½Ê½ÄØ

ÎÒÒ²ÁªÏµÒ»Ï£¬²»¹ýÔÚÄþ²¨

¿ÉϧÎÒÒ²²»ÔÚº¼ÖÝ

±±¾©µÄÐв»£¿

ÎÒÔÚËÕÖÝ£¬ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØͼ | ¸ÓICP±¸09004571ºÅ