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 ÓÃÀ´
Ïà¹ØÎÊ´ð£º
ÓÃADO´´½¨ÁËÒ»¸ö¿ÕAccess±í£¬²¢Ìí¼ÓÁ˶à¸ö×Ö¶ÎÃû¡£
µ«ÏÖÔÚÎÊÌâÊÇ£¬²»ÄÜÏò¿Õ±íÖÐÌí¼Ó¼Ç¼¡£
ÿ´ÎÌí¼Ó¶¼»á³öÏÖ¡°BOF »ò EOF ÖÐÓÐÒ»¸öÊÇ¡°Õ桱£¬»òÕßµ±Ç°µÄ¼Ç¼Òѱ»É¾³ý£¬ËùÐèµÄ²Ù×÷ÒªÇóÒ»¸öµ±Ç°µÄ¼Ç¼¡±
......
ACCESSÖн¨Á¢Çл»±íµ¥,
µã»÷ ¹¤¾ß/×ÊÁϿ⹫ÓóÌʽ/Çл»±íµ¥¹ÜÀíÔ± ºó
Ìáʾ£ºMicrosoft office accessÎÞ·¨½¨Á¢visual basicÄ£×飡
µ½µ×ÊdzöÁËʲ÷áÎÊÌâÄØ£¿
µÚÒ»´ÎÕâÑù½¨Á¢Çл»±íµ¥ÊÇ¿ÉÒԵ쬵«ÊÇÓÉÓÚÓÐ ......
access±íÖÐÓÐ3¸ö×ֶΣ¬starttime£¬endtime£¬timespan£¬
ÊäÈëǰÁ½¸öÖµºóÔõô×Ô¶¯Éú³ÉtimespanÄØ
´´½¨²éѯ¡£
select *, endtime-starttime from your table
»òÕßÔÚÄãµÄÊäÈë´°ÌåÖÐÓÃVBA´úÂëʵÏÖ¡ ......
Çë¸øÒ»¸öACCESS¶àÌõ¼þ²éѯµÄÀý×Ó,×Ö¶Î:ÐÕÃû,µç»°,¹«Ë¾,µØÖ·Îª²éѯÌõ¼þ,Ö»Òª²»Îª¿Õ,¾Í×÷Ϊ²éѯÌõ¼þ.
ÄãÏÈ給這個Щ×Ö¶Î設ÖÃ變Á¿並賦³õÖµ為:%,
ÔÙÔÚ²é詢 ......