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

VB6.0ÈçºÎ²éѯaccessÎÄ×Ö±íµÄÐÐÊý(ÐÂÊÖѧVB)

ÏÖÓÐÒ»¸öaccessµÄÎÄ×ÖÄÚÈݵıí,ÎÒÏë²éѯËûÓжàÉÙÐÐ,ÇëÎʸÃÓÃʲôÃüÁî?
лл!

Dim db As new ADODB.Connection,i as long
db.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\aa.mdb;Persist Security Info=False;"
db.Execute "select count(*) from ± ......

VB Ñ­»·ÎÊÌ⣡

VB ÖеÄÑ­»·ÖС£ ÓÐûÓкÍvsÒ»ÑùµÄcontinual¡£Ìø³ö±¾´ÎÑ­»·£¬Ö´ÐÐÏÂÒ»´ÎÑ­»·£¿
Óеġ£

ÓУ¡

ûÓÐ µ«¿ÉÒÔÓÃIFÁé»î±äͨ

do
  if condition fix then
      do something
  end if
loop

Èç¹û»¹½â¾ö²»ÁËÎÊÌ⣬¾ÍÓýûÕС°GOTO¡±

ÓÃGOTO

VBûÓУ¬ÄãÖ»ÄÜʹ ......

¹ØÓÚvbµÄ¶¨Ê±Æ÷

ÏëÇë½ÌÅóÓÑÃÇÒ»¸öÎÊÌâ ÎҵijÌÐòÖÐÒѾ­Ê¹ÓÃÁËÁ½¸ö¶¨Ê±Æ÷timer£¬¼ÙÈçtimer1¶¨Ê±Æ÷ʱ¼äµ½ ¿ªÊ¼ÌøÈëÏàÓ¦º¯ÊýÖ´ÐгÌÐòʱ£¬Ç¡ÇÉtimer2¶¨Ê±Æ÷ʱ¼äÒ²µ½ÁËÒ²ÒªÌøÈëÏàÓ¦º¯Êý£¬ÄdzÌÐòÊÇÈçºÎ¾ßÌåÖ´ÐеÄÄØ? ÓÐÏȺó˳ÐòÓ°ÏìÂð£¿ÈôÓÐ˳Ðòʱ¼äÎó²î»áÓжà´óÄØ£¿Ð»Ð»
±ØÐëµÈµ½Timer1Ö´ÐÐÍê±ÏÁËTimer2²ÅÄÜÖ´ÐУ¬VBµÄ¶¨Ê±Æ÷²»×¼£¬Èç¹ûÒª½øÐи߾ ......

VBÖе÷ÓÃdosÃüÁî

ÎÒÏëÔÚÏëÔÚdosÖе÷Óá°tree¡±ÃüÁÏë´ïµ½ÈçÏÂÄ¿µÄ£º

tree f:\gyh /f>>list.txt

¼´°Ñf£ºÅÌϵÄgyhÎļþÖеÄ×ÓÎļþ¼Ð¼´ÎļþÐγÉÁбíÊäÈëµ½list¡£txtÖУ¬µ«ÊÇÕâ¸öÃüÁîÒªÇóµ±Ç°ÃüÁî±ØÐëÊÇÔÚf£ºÅÌÏÂÖ´ÐУ¬È磺

c:\>tree f:\gyh /f>>list.txt ÕâÑùÀ´Ö´ÐÐÊDz»Ðеģ¬Ôõô½â¾öÕâ¸öÎÊÌâ´ïµ½ÎÒÏëÒ ......

excelÖÐvbÁ¬oracle²»³É¹¦

ÒÔǰûÓнӴ¥¹ývb,½ñÌì°ë·½ÓÊÖÒ»¸öÏîÄ¿£¬ÆäÖÐÓÃexcelÁ¬oracle,È¡Êý¾Ý¡£ÎÒÔĶÁÁËÀïÃæµÄvb´úÂ룬Óм¸¾äÊÇÕâÑùµÄ:
Const connectionString As String = "DSN=DEV;" & _
          "Uid=username;" & _
          "Pwd=passwo ......

excelÖÐvbÁ¬oracle²»³É¹¦

ÒÔǰûÓнӴ¥¹ývb,½ñÌì°ë·½ÓÊÖÒ»¸öÏîÄ¿£¬ÆäÖÐÓÃexcelÁ¬oracle,È¡Êý¾Ý¡£ÎÒÔĶÁÁËÀïÃæµÄvb´úÂ룬Óм¸¾äÊÇÕâÑùµÄ:
Const connectionString As String = "DSN=DEV;" & _
          "Uid=username;" & _
          "Pwd=passwo ......
×ܼǼÊý:1659; ×ÜÒ³Êý:277; ÿҳ6 Ìõ; Ê×Ò³ ÉÏÒ»Ò³ [154] [155] [156] [157] 158 [159] [160] [161] [162] [163]  ÏÂÒ»Ò³ βҳ
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ