Ò׽ؽØͼÈí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB
ÈÈÃűêÇ©£º c c# c++ asp asp.net linux php jsp java vb Python Ruby mysql sql access Sqlite sqlserver delphi javascript Oracle ajax wap mssql html css flash flex dreamweaver xml
 ×îÐÂÎÄÕ : vb

¹ØÓÚvb¼ÆʱÆ÷¾«È·¼ÆʱÎÊÌâ

ÎÒÏëÓÃvb×öÒ»¸ö³¤Ê±¼ä²É¼¯Êý¾ÝµÄ³ÌÐò£¬²É¼¯¼ä¸ô×îС100ms£¬Ôõô²ÅÄÜ×öµ½Ê±¼äÉϵľ«È·ÄØ£¿

¸Õ¿ªÊ¼°Ñ¼ÆʱÆ÷¼ä¸ôÉèΪ10ms£¬È»ºóÓÃGetTickCount¼ÆË㣬µ½´ïʱ¼ä¾Í½øÐвɼ¯£¬²É¼¯¼ä¸ôΪ1SµÄʱºòÒÀÈ»ÓÐÎó²î£¬²¢ÇÒGetTickCountµ½49.7ÌìµÄʱºò¾ÍÇåÁãÁË£¬µ½Ê±ºò¿Ï¶¨»áÔì³Éʱ¼ä¼ÆËãÉϵĻìÂÒ¡£

ÏÖÔÚÓÃQueryPerformanceCou ......

VBµ÷Óö¯Ì¬Á¬½Ó¿â

ÓÐVBµ÷Óö¯Ì¬Á¬½Ó¿âµÄÀý×ÓÂð£¿
ÔõôûÈ˻شð£¿


ÏÈÉùÃ÷º¯Êý,ÔÙµ÷ÓÃ.

[Private|Public] Declare [Sub|Function] [º¯ÊýÃû|¹ý³ÌÃû] Lib "ËùÔÚ¿âÃû³Æ" ( _
[²ÎÊý]) [As ·µ»ØÖµÀàÐÍ]

Àý×Ó:

Private Declare Sub Sleep Lib "kernel32.dll" ( _
ByVal dwMilliseconds ......

VB Òç³ö£¬´íÎó

ÈçÌâ
m_CardIDTemp.CARDTYPE(5)ֵΪ 161
m_CardIDTemp.CARDTYPE(4)ֵΪ 87
m_CardIDTemp.CARDTYPE(3)ֵΪ 209
m_CardIDTemp.CARDTYPE(2)ֵΪ 46

m_CardID.CardID = CLng(m_CardIDTemp.CARDTYPE(5)) * &H1000000 + CLng(m_CardIDTemp.CARDTYPE(4)) * &H10000 + CLng(m_CardIDTemp.CARDTYPE(3)) * ......

¹ØÓÚVBÖÐµÄ rnd£¨£©º¯Êý½á¹û


rnd µÄ½á¹ûÊÇ Çø¼ä[ 0£¬1£©  £¬¿ÉÒÔµÈÓÚ0£¬ ¶ø²»»áµÈÓÚ1£¬ ¶Ôô£¿£¿

ÓÐÈË˵¿ÉÒÔµÈÓÚ0£¬ÓеÄ˵²»ÐÐ
Rnd º¯Êý·µ»ØСÓÚ 1 µ«´óÓÚ»òµÈÓÚ 0 µÄÖµ

ÒªµÈÓÚ0¾ÍÈ¡Õû¡£

ÒýÓÃ
rnd µÄ½á¹ûÊÇ Çø¼ä[ 0£¬1£©  £¬¿ÉÒÔµÈÓÚ0£¬ ¶ø²»»áµÈÓÚ1£¬ ¶Ôô£¿£¿

ÓÐÈË˵¿ÉÒÔµÈÓÚ0£¬ÓеÄ˵²»ÐÐ

[0,1)ÕýÈ·! ......

vb»ñÈ¡´°¿ÚµÄnameÊôÐÔ

ÈçºÎ»ñÈ¡»î¶¯´°¿ÚµÄnameÊôÐÔ£¬¶ø²»ÊDZêÌâÃû³Æ¡£
ʲô´°¿Ú?Äã×Ô¼ºµÄ»¹ÊDZðÈ˵Ä?ÊÇMDI×Ó´°ÌåµÄ?

VB code:
Private Sub Command1_Click()
Debug.Print Command1.Name
End Sub

ÎÒÏëͨ¹ýÊó±êÔÚÆÁÄ»ÉÏÒƶ¯£¬¶øÔÚ×ÔÖƳÌÐòµÄÎı¾¿òÖÐÏÔʾÊó±êËùÔÚµã¶ÔÓ¦´°¿ÚµÄnameÊôÐÔÖµ¡£

±ðÈ˱àд³ÌÐò½ÐʲôÃû×Ö±àÒëºó¾Í²»ÖØÒªÁ ......

vb´òÓ¡»úÉèÖÃ

Èç¹ûÊÇÏÖÔÚÎÒÓÐA¡¢BÁ½Ì¨´òÓ¡»ú£¬AÊǵ±Ç°ÏµÍ³Ä¬ÈÏʹÓõĴòÓ¡»ú£¨HP LaserJet 5000 Series PCL£©£¬ÎÒÏÖÔÚ³ÌÐòÖÐÓиö±í´òӡʱÏëʹÓÃB»ú£¨hp LaserJet 1010£©£¬»¹²»ÄܸıäϵͳµÄĬÈÏÉ趨£¬¸ÃÈçºÎ´¦Àí

ÎÒÔÚ´òÓ¡±í¸ñʱ ÓÃPrinter.DeviceName = "hp LaserJet 1010"ʱÔËÐÐÕý³£ µ«ÊDZàÒëʱ±¨´í£¨´íÎóµÄ²ÎÊýºÅ»òÎÞЧ ......
×ܼǼÊý:1659; ×ÜÒ³Êý:277; ÿҳ6 Ìõ; Ê×Ò³ ÉÏÒ»Ò³ [210] [211] [212] [213] 214 [215] [216] [217] [218] [219]  ÏÂÒ»Ò³ βҳ
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØͼ | ¸ÓICP±¸09004571ºÅ