access vba Êý×鳤¶È
access vba ÖÐÔõôȡµÃÊý×鳤¶È£¿
Êý×éÐУ¿
UBound(Êý×éÃû)
ubound()-lbound()
UBound º¯Êý
·µ»ØÒ»¸ö Long ÐÍÊý¾Ý£¬ÆäֵΪָ¶¨µÄÊý×éά¿ÉÓõÄ×î´óϱꡣ
Óï·¨
UBound(arrayname[, dimension])
UBound º¯ÊýµÄÓï·¨°üº¬ÏÂÃæ²¿·Ö£º
²¿·Ö ÃèÊö
arrayname ±ØÐèµÄ¡£Êý×é±äÁ¿µÄÃû³Æ£¬×ñѱê×¼±äÁ¿ÃüÃûÔ¼¶¨¡£
dimension ¿ÉÑ¡µÄ£»Variant (Long)¡£Ö¸¶¨·µ»ØÄÄһάµÄÉϽ硣1 ±íʾµÚһά£¬2 ±íʾµÚ¶þά£¬Èç´ËµÈµÈ¡£Èç¹ûÊ¡ÂÔ dimension£¬¾ÍÈÏΪÊÇ 1¡£
˵Ã÷
UBound º¯ÊýÓë LBound º¯ÊýÒ»ÆðʹÓã¬ÓÃÀ´È·¶¨Ò»¸öÊý×éµÄ´óС¡£LBound ÓÃÀ´È·¶¨Êý×éijһάµÄÉϽ硣
¶Ô¾ßÓÐÏÂÊöάÊýµÄÊý×é¶øÑÔ£¬UBound µÄ·µ»ØÖµ¼ûÏÂ±í£º
Dim A(1 To 100, 0 To 3, -3 To 4)
Óï¾ä ·µ»ØÖµ
UBound(A, 1) 100
UBound(A, 2) 3
UBound(A, 3) 4
LBound º¯Êý
·µ»ØÒ»¸ö Long ÐÍÊý¾Ý£¬ÆäֵΪָ¶¨Êý×éά¿ÉÓõÄ×îСϱꡣ
Óï·¨
LBound(arrayname[, dimension])
LBound º¯ÊýµÄÓï·¨°üº¬ÏÂÃæ²¿·Ö£º
²¿·Ö ÃèÊö
arrayname ±ØÐèµÄ¡£Êý×é±äÁ¿µÄÃû³Æ£¬×ñѱê×¼µÄ±äÁ¿ÃüÃûÔ¼¶¨¡£
dimension ¿ÉÑ¡µÄ£»Variant (Long)¡£Ö¸¶¨·µ»ØÄÄһάµÄϽ硣1 ±íʾµÚһά£¬2 ±íʾµÚ¶þά£¬Èç´ËÀàÍÆ¡£Èç¹ûÊ¡ÂÔ dimension£¬¾ÍÈÏΪÊÇ 1¡£
˵Ã÷
LBound º¯ÊýÓë UBound º¯ÊýÒ»ÆðʹÓã¬ÓÃÀ´È·¶¨Ò»¸öÊý×éµÄ´óС¡£UBound ÓÃÀ´
Ïà¹ØÎÊ´ð£º
<?php
include("adodb/adodb.inc.php");
$db = &NewADOConnection("access");
$access = realpath("Data.mdb");
$dsn = "Provider=Microsoft.J ......
ÓÃVBÇóACCESSÁ½¸ö±íµÄºÍ
a±íÀïÓÐ
ID Ãû³Æ ÊýÁ¿ ×ܼÛ
1 a 13 11
2 c 20 20
3 c 2 52
4 b&nb ......
±¾È˳õ´Î½Ó´¥£¡±È½ÏÄ£ºý£¡Ï£Íû´ó¼Ò¿ÉÒ԰ѶÔMicrosoft Office AccessµÄ±í²Ù×÷³£ÓÃÃüÁî ¸æÖ®£¡
»¹ÓÐÎÒÏëʵÏÖ°à×é¡¢ÈÕ¡¢Ô¡¢Ä걨Microsoft Office AccessÀïµÄ±íµ¥Ôõô´¦Àí£¿
ÊÇÀûÓò»Í¬µÄ±í·Ö±ð¼Ç¼Сʱ°à×éÈ ......
н¨µ¥Îĵµ³ÌÐòÑ¡ÔñODBCÖеÄÊý¾ÝԴʱ×ÜÊǵ¯³öÒ»¸öµÇ¼´°¿ÚÒªÊÚȨ¡£¡£¡£»¹ÒªÃÜÂë¡£¡£¡£
ÆäËûµÄµ÷ÓÃODBCÖеÄÊý¾ÝÔ´ÊǾͲ»ÐèÒªÕâ¸ö£¬¿ÉÒÔÔËÐС£
ŪÁ˺ó¤Ê±¼äÁË¡£¡£¡£
ûÓö¼û¹ý£¬¿ ......
CatalogClass cat=new CatalogClass();
cat.Creat(@"provider=microsoft.jet.oledb.4.0;data source="+path+";");
ÓÃÒÔÉÏ´úÂë´´½¨Îļþ³É¹¦ÁË£¬ÕÒµ½Îļþºó´ò¿ª£¬Ìáʾ²»¿Éʶ±ðµÄÊý¾ ......