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

ÎÞÒâÖз¢ÏÖVB ForÑ­»·µÄÒ»¸öÌصã

ÎÞÒâÖз¢ÏÖVB ForÑ­»·µÄÒ»¸öÌص㣺ÔÚÑ­»·ÌåÖУ¬Æóͼ¸Ä±äÑ­»·ÖÕÖ¹±äÁ¿Ê¹Ö®ÌáÇ°Í˳öÑ­»·ÊÇͽÀ͵ġ£
Private Sub Form_Load()
  Dim s(0 To 4) As String
  Dim N As Integer, i As Integer
  s(0) = "²âÊÔ1"
  s(1) = "²âÊÔ2"
  s(2) = "²âÊÔ3"
  s(3) = "²âÊÔ4"
  s(4) = "²âÊÔ5"
  N = 4
  For i = 0 To N
    'ÔÚÑ­»·ÌåÖУ¬Æóͼ¸Ä±äÑ­»·ÖÕÖ¹±äÁ¿Ê¹Ö®ÌáÇ°Í˳öÑ­»·ÊÇͽÀ͵ġ£
    'Ö»ÓÐ Åжϡ¾Ñ­»·±äÁ¿¡¿ÊÇ·ñ´óÓÚ¡¾Ñ­»·ÖÕÖ¹±äÁ¿¡¿À´ÌáÇ°Í˳ö²ÅÊÇ¿ÉÐеģ¬È磺If i > N Then Exit For
    Debug.Print s(i)
    If i = 0 Or i = 3 Then N = N - 1
  Next i
  MsgBox "i====" & i & " N==" & N
End Sub


Ïà¹ØÎĵµ£º

VB ÖÐÑÕÉ«»¥Ïàת»»µÄÁ½¸öСº¯Êý(REGºÍ VBÑÕ)

VBÑÕÉ«ºÍRGBÉ«»¥Ïàת»»Í·ÌÛÁËÎÒºÃÒ»¶Îʱ¼ä,Èç½ñÕÒµ½½â¾ö°ì·¨ÁË
ÌرðÌù³öÀ´Óë´ó¼Ò¹²Ïí 
Type RGB
    Red As String
    Green As String
    Blue As String
End Type
Public Function ColorToRGB(ByVal dwColor As Long) As RGB
    Dim clrHex ......

VB ʵÏÖVC TAbControl¿Ø¼þ

VBʵÏÖVC TabControl¿Ø¼þ
 
н¨Ò»¸ö¹¤³ÌÎļþProject1£¬
 
 
ÔÚ×ó²à¹¤¾ßÀ¸ÖеãÓÒ¼ü
 
ÔÚ³öÏÖµÄÑ¡ÏîÖеã“Components”£¬ÔÚ´ò¿ª´°¿ÚÖÐÕÒµ½“Controls”Ñ¡ÏîÒ²ÖеēMicrosoft Tabbed Dialog Control 6.0”£¬È»ºóµã“Ó¦ÓÔ“È·¶¨”Í˳ö¸Ãҳà ......

ÔÚVBÖÐʹÓÃÎÄ×ÖÀʶÁÒýÇ棨TTS£©¼¼Êõ

¡¡ÏÖ½ñÊÐÃæÉÏÁ÷ÐеÄһЩӢÓïѧϰÈí¼þ£¬ÔÚ¹ã¸æ´ÊÉϾ­³£Ëµ×Ô¼ºÊ¹ÓÃÁ˹ú¼Ê¶¥¼âµÄÈ«³ÌÓïÒôTTS¼¼Êõ£¬ÄܽøÐÐÕû¶ÎÓ¢ÎĵÄÁ÷ÀûÀÊ
¶Á£¬²¢ÄÜ×ÔÓɵ÷½ÚÀʶÁµÄËÙ¶ÈÓëƵÂʵȡ£ÄÇô£¬Õâ¸öÉñÆæµÄTTS¾¿¾¹ÊÇʲô¶«Î÷ÄØ£¿
¡¡¡¡Æäʵ£¬TTSÊÇ΢Èí³öÆ·µÄÒ»Ì×ÎÄ×ÖÀʶÁÒýÇ棨Text-To-Speech Engine)£¬ÕâЩӢÓïÈí¼þ¾ÍÊǵ÷ÓÃËüÀ´½øÐÐÓ¢ÎÄÀʶÁµÄ¡£ÎÒÃÇÔ ......

vbÓëÊý¾Ý¿â

VBÊý¾Ý¿â²Ù×÷ʵÀý
2008-02-22 05:49
   VBÊý¾Ý¿â²Ù×÷¶ÔºÜ¶à³õѧÕßÅóÓѸе½±È½Ï³ÔÁ¦£¬Ä¿Ç°½Ì²ÄÖеÄʵÀý¶ÔÊý¾Ý¿â²Ù×÷¶¼±È½Ïµ¥Ò»£¬ºÜ¶àÅóÓÑÌáÒéÎÒ×öÒ»¸ö°üÀ¨ä¯ÀÀ¡¢Ìí¼Ó¡¢Ð޸ġ¢É¾³ý¹¦ÄܵÄÊý¾Ý¿â²Ù×÷ʵÀý£¬ÏÂÃæÕâ¸öʵÀý¾ÍÊÇÒ»¸öÕâÑùµÄÊý¾Ý¿â²Ù×÷ʵÀý¡£
   ¡¶Êé¿â¹ÜÀíϵͳ¡·ÊÇÒ»¸ö×î¼òµ¥µÄÊý¾Ý¿â²Ù×÷ʵÀý ......

ʹÓÃVB´´½¨PPPoEÒÔ¼°VPN²¦ºÅÁ¬½ÓµÄºËÐÄ´úÂë

Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (Destination As Any, Source As Any, ByVal Length As Long)
Private Type GUID
    Data1   As Long
    Data2   As Integer
    Data3   As Integer
 &nbs ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØͼ | ¸ÓICP±¸09004571ºÅ