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

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 ±í", i
msgbox "ÐÐÊý:" & i

ÒýÓÃ
select count(*) from mytable


Õý½â

http://download.csdn.net/source/1644211


Ïà¹ØÎÊ´ð£º

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

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

VBÖÐÔõôÑùÔÚ±í¸ñÖÐÐÞ¸Ä×ÖÌ壿 - VB / »ù´¡Àà

±ÈÈç˵ҪÔÚ1±íÖеĵÚÈýÁеڶþÐе¥ÔªÖÐÊäÈë¡°Ò»¶þÈý¡±Ò»Òª´ÖÌåËÎÌå12ºÅ×Ö£¬¶þ ²»Òª´ÖÌå 15ºÅ×Ö ÈýбÌå5ºÅ×Ö
´úÂëÓ¦¸ÃÔõô´ò£¿
LZÖ¸µÄÊǸöʲô±í¸ñ¿Ø¼þÄØ£¬Ã²ËÆÖ»ÄÜÉèÖÃÕû¸ö±íµÄ×ÖÌ壬»òÕßij¼¸Ðлò¼¸ÁУ¬Ã»Óе¥¶ÀÉèÖ ......

ASP+ACCESSÊä³öÎÊÌâ - Web ¿ª·¢ / ASP

ÄÄÀï³ö´íÁË£¬Êä³öÕâÑùµÄ½á¹û£¿£¿
<%@ Page Language="VB" AutoEventWireup="false" aspcompat="true" CodeFile="Default.aspx.vb" Inherits="_Default" %&g ......

°ïÎҸĸÄÕâ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µ÷Óö¯Ì¬¿âÎÊÌâ - VB / »ù´¡Àà

¸÷λ´óϺ£º
  ÎÒÊǸÕѧVB£¬ÏÖÔÚÏëÓÃVBµ÷ÓÃÒ»¸ö¶¯Ì¬¿â£¬¶¯Ì¬¿âÀïÃæÓкܶຯÊý¡£ÎÒÖªµÀʹÓÃVBµ÷Óö¯Ì¬¿âµ÷Óú¯Êý£¬ÐèÒª½«Òªµ÷Óõĺ¯ÊýÔÚ³ÌÐòÖÐÉùÃ÷¼´¿É£¬µ«ÊÇÀïÃæÓкܶຯÊý£¬²»»áÿһ¸öº¯Êý¶¼ÒªÉùÃ÷°É¡£Çë¸ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ