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

ÔÚVBÖÐʹÓÃSHELLÃüÁî¼ÓѹµÄÎÊÌâ

ÔÚVBÖÐʹÓÃSHELLÃüÁî¼Óѹʱ.ÎÒµ÷ÓõÄÊÇ7.zipÕâ¸öÈí¼þ,µ«ÊÇÈç¹ûҪѹËõµÄÎļþÃûÖмäûÓпոñÄÇôÎļþ¿ÉÒÔÕý³£Ñ¹Ëõ,µ«ÊÇÈç¹ûÎļþÃûÖмäÓпոñµÄ»°ºÃÏñËü¾Í²»ÄÜÕý³£Ñ¹ËõÁË,ºÃÏñÊÇÒòΪËüÖ»ÈϿոñǰµÄÃû×Ö,¿Õ¸ñºóµÄ²»ËãÁË.ÈçÏÂÃæ
¸øÒ»¸ö½Ð:н¨Îļþ¼Ð  µÄÎļþ¼Ð´ò°ü,ÄÇôûÎÊÌâ,
µ«ÊÇÈç¹ûÕâ¸öÃû×Ö¸ÄΪ:н¨  Îļþ¼Ð  ÄÇô¾Í»á³ö´í.ÒòΪËûÀÏÊÇ»áÈÏΪҪ´ò°üµÄÎļþ½Ð×ö:н¨ ÁË,¿Õ¸ñºóÃæµÄÈ«²»ÈÏÁË
ÎÒ¾ÍËãÊǰÑÕâ¸öÃû×ָijÉ:"н¨" &"  " & "Îļþ¼Ð"  ¶¼»¹ÊDz»Ðа¡.Ò»°ã¸÷λ´óÏÅÓöµ½ÕâÖÖÇé¿öÊÇÕ§´¦ÀíµÄÂï,²»Òª½ÐÎҰѿոñÈ¥Á˹þ...Âé·³ÁË.ÖªµÀµÄ˵һÉù.ÏÈлһ¸ö¶à
±ÈÈç˵ÎÒÒª°Ñd:\н¨  Îļþ¼Ð
ÀïÃæµÄËùÓÐÄÚÈÝ´ò°üѹËõµ½d:\1\н¨  Îļþ¼Ð
ÏÂÃæÈ¥


Shell zip»òwinrar ¶¼Ò»ÑùÊÇÔÚDOSÏÂÔËÐÐµÄ DosÊÇ8.3¸ñʽ

±ØÐ轫ÎļþÃû³Æ¸ÄΪ¶Ì·¾¶ÎļþÃû

Õâ¶Î´úÂëÄãÊÔ¿´°É

Option Explicit
Private Declare Function GetShortPathName Lib "kernel32" Alias "GetShortPathNameA" (ByVal lpszLongPath As String, ByVal lpszShortPath As String, ByVal cchBuffer As Long) As Long
Dim AppDisk$
Private Sub Form_Load()
  '****±¾µØÂ·¾¶(Ïà¶Ô·¾¶)
  AppDisk = IIf(Right(App.Path, 1) = "\", App.Path, App.Path & "\")
  '****ת»»Îª¶Ì·¾¶Ãû³Æ
  MsgBox "±¾µØÂ·¾¶: " & GetShortName(AppDisk)
End Sub

Public Function GetShortName(ByVal sLongFileName As String) As String


Ïà¹ØÎÊ´ð£º

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

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

vb Å£Âð - Web ¿ª·¢ / vbScript

vbÊDz»ÊǺÜÅ£°¡ ÔõôÄÇô¶àµÄ²¡¶¾¶¼ÊÇvb×öµÄ°¡ c#Ðв»ÐУ¿
c#ÔÚXPÔËÐв»ÁË£¬³ý·ÇÈñðÈËÏÈ×°ÉÏ.net.
VBÏà¶ÔÓÚC,C++,ASMµÈµÈ£¬¾ÖÏÞÐÔ´ó¶àÁË¡£

±ðÔÙ˵ʲôÓïÑÔ²»ÈçʲôÓïÑԵϰÁË£¬Ö»ÓÐÄã²»»áÓûòÓÃ×Ų»Ë³ÊÖµÄÓ ......

°ïÎҸĸÄÕâVBÌâ - VB / »ù´¡Àà

°ïÎÒ¸Ä¸Ä ÎÒ×ܾõµÃÓÐÎÊÌâ
Type ID
  number As Single
  score As Integer
  name As String * 6
End Type
Dim personl As ID, i%
Private Sub Command1_Click()
 i = 0
&nbs ......

¹ØÓÚVB DIM ds as new DataSetÎÊÌâ - VB / »ù´¡Àà

DIM ds as new DataSet
ÎÒÕâÑùÉùÃ÷ ÔõÀÏÊDZ¨ Óû§¶¨ÒåÀàÐÍ䶨Ò壿 Õâ¸öÐèÒªÒýÓÃʲôÂ𣿣¿
ǰÌáÊÇDataSet¶ÔÏóÒª´æÔÚ,¾ÍÊǶÔÏóä¯ÀÀÆ÷ÖÐÓÐËü.ûÓоÍÒªÒýÓÃ.

datasetÊÇADO.NET¶ÔÏó
Èç¹ûÄãÓõÄÊÇvb.net£¬ÄÇôÔÚ´ ......

Çë½Ì!ÓõÄÊÇVB 6.0 - VB / ¿Ø¼þ

°ÑÒÑÓÐÊý¾Ý£¨Êý¾Ý´óÓÚ20ÐУ©µÄRS(recordset)µÄµÚ10ÐÐÊý¾ÝÓëµÚ11ÐÐÊý¾Ý×ö¼Ó·¨ºó£¬É¾³ýµÚ11ÐеÄÊý¾Ý£¬È»ºó°ÑºóÃæµÄÊý¾ÝÏòÇ°ÒÆ¡£
RSµÄ»°ÐÞ¸ÄÊý¾ÝÊÇ»á¸üÐÂÊý¾Ý¿â£¬ÏÖÔÚµÄÎÊÌâÊÇRSÀïµÄÒÑÓÐÊý¾ÝÊÇÓÃSQLÓï¾ä·ÖÀàͳ¼Æ³öÀ´µÄ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ