Access小技巧

1、Access小技巧ACCESS掩碼及說明2011-06-08 15:22什么是輸入掩碼？輸入掩碼是用于設(shè)置字段（在表和查詢中）、文本框以及組合框（在窗體中）中的數(shù)據(jù)格式，并可對允許輸入的數(shù)值類型進(jìn)行控制，輸入掩碼可以由用來分隔輸入空格的原義字符（例如空格、點(diǎn) 、點(diǎn)劃線、和括號）組成。InputMask屬性設(shè)置則由文本字符和特殊字符組成，特殊字符將決定輸入的數(shù)值類型。輸入掩碼主要用于文本型和日期/時(shí)間型字段，但也可以用于數(shù)字型或貨幣型字段。字符說明            

2、60;              含義0數(shù)字 -（必須輸入數(shù)字09，必選項(xiàng)；不允許使用號（+）和減號（-）9數(shù)字或空格-（可以輸入一個(gè)數(shù)字或者空格，非必選項(xiàng)；不允許使用加號和減號）#數(shù)字或空格 -（可以輸入一個(gè)數(shù)字或者空格，也可以不輸入內(nèi)容；非必選項(xiàng)；空白將轉(zhuǎn)換為空格，允許使用加號和減號）L字母   -（必須輸入一個(gè)字母A到Z，必選項(xiàng)）？字母  -（可以輸入一個(gè)字母A到Z，可選項(xiàng)）A字母或數(shù)字-（

3、必須輸入一個(gè)字母或者數(shù)字，必選項(xiàng)）a字母或數(shù)字-（可以輸入一個(gè)字母或者數(shù)字，也可以不輸入 ；可選項(xiàng)）&任一字符或空格-（必須輸入一個(gè)字符或者空格；必選項(xiàng)）C任一字符或空格 -（可以輸入一個(gè)字符或者空格；也可以不輸入內(nèi)容；可選項(xiàng)）.  ，：；-/  -（小數(shù)點(diǎn)占位符、千位、日期和時(shí)間分割符）<      -（使其后所有的字符轉(zhuǎn)換為小寫）>       -（使其后所有的字符轉(zhuǎn)換為大寫）！  

4、    -（輸入掩碼從右到左顯示，而不是從左向右的?？梢栽谳斎胙诖a的任意位置包含嘆號。）        -（使其后的字符顯示為原義字符?？捎糜趯⒃摫碇械娜魏巫址@示為原義字符（例如，A顯示為A）密碼  -（將“輸入掩碼”屬性設(shè)置為“密碼”，以創(chuàng)建密碼項(xiàng)文本框。文本框中鍵入的任何字符都按字面字符保存，但顯示為星號（*）Access有效性規(guī)則 2011-06-08 15:28有效性規(guī)則：      &

5、#160;                                         有效性文本    "男" or. “女

6、”     *只能輸入男或者女M Or F                 *輸入 M（代表男性）或 F（代表女性）。 >=#1980-1-10#    *只能輸入大于1980-1-10以后的日期>=700 And <=5000    *只能輸入7005000之間的數(shù)據(jù)between700 and 5000&#

7、160;  *只能輸入7005000之間的數(shù)據(jù)<>0 *輸入非零值。 >=0  *值不得小于零。 0 or >100   *值必須為 0 或者大于 100。 BETWEEN 0 AND 1    *輸入帶百分號的值。（用于將數(shù)值存儲為百分?jǐn)?shù)的字段。） <#01/01/2007#   *輸入 2007 年之前的日期。 >=#01/01/2007# AND <#01/01/2008#    *必須輸入 2007 年的日

8、期。 <Date() *  *出生日期不能是將來的日期。 StrComp(UCase(姓氏),姓氏,0) = 0   *“姓氏”字段中的數(shù)據(jù)必須大寫。 >=Int(Now() *輸入當(dāng)天的日期。 LIKE "A-Z*A-Z.com" OR "A-Z*A-Z.net" OR "A-Z*A-Z.org" *輸入有效的 .com、.net 或 .org 電子郵件地址。 要求日期<=訂購日期+30 *輸入在訂單日期之后的 30 天內(nèi)的要求日期。 結(jié)束日期>=開始日期 *輸入不早于開始日期的

9、結(jié)束日期。 -創(chuàng)建表達(dá)式時(shí)規(guī)則：將表字段的名稱用方括號括起來，例如：要求日期<=訂購日期+30。 將日期用井號 (#) 括起來，例如：<#01/01/2007# 將文本值用雙引號括起來，例如：IN ("東京","巴黎","莫斯科")。另外，請注意用逗號分隔項(xiàng)目，并將列表放在圓括號內(nèi)。 除了上述規(guī)則之外，下表顯示了常見的算術(shù)運(yùn)算符并提供了使用方法示例。NOT 測試相反值。在除 IS NOT NULL 之外的任何比較運(yùn)算符之前使用。 NOT > 10（與 <=10 相同）。 IN 測試值是否等于列表中的現(xiàn)

10、有成員。比較值必須是括在圓括號中的逗號分隔列表。 IN ("東京","巴黎","莫斯科") BETWEEN 測試值范圍。必須使用兩個(gè)比較值（低和高），并且必須使用 AND 分隔符來分隔這兩個(gè)值。   BETWEEN 100 AND 1000（與 >=100 AND <=1000相同）Access日期和時(shí)間函數(shù)1.Cdate(日期表達(dá)式)將日期表達(dá)式轉(zhuǎn)換成日期類型的數(shù)據(jù)。日期表達(dá)式是任何可以解釋成日期的表達(dá)式，包含日期文字，可以看作日期的字符串以及從函數(shù)返回的日期。比如：myDate = CDate(&q

11、uot;99-5-20") ，這樣的日期表達(dá)式必須加雙引號，否則結(jié)果不可預(yù)料。CDate 依據(jù)系統(tǒng)上的區(qū)域設(shè)置來決定日期的格式。如果提供的格式為不可識別的日期設(shè)置，則不能正確判斷年、月、日的順序。2.Now()返回當(dāng)前計(jì)算機(jī)系統(tǒng)設(shè)置的日期和時(shí)間。3.Year(日期表達(dá)式)返回表示年份的整數(shù)。比如：Year("00-6-15") = 20004.Month(日期表達(dá)式)返回 1 到 12 之間的整數(shù)，表示一年中的某月。比如：Month("00-6-15") = 65.DateAdd(interval, number, date)DateAdd 函

12、數(shù)語法中有下列命名參數(shù)：部分 描述interval 必要。字符串表達(dá)式，是所要加上去的時(shí)間間隔。number 必要。數(shù)值表達(dá)式，是要加上的時(shí)間間隔的數(shù)目。其數(shù)值可以為正數(shù)（得到未來的日期），也可以為負(fù)數(shù)（得到過去的日期）。date 必要。Variant (Date) 或表示日期的文字，這一日期還加上了時(shí)間間隔。設(shè)置 interval 參數(shù)具有以下設(shè)定值：設(shè)置 描述yyyy 年q 季m 月y 一年的日數(shù)d 日w 一周的日數(shù)ww 周h 時(shí)n 分鐘s 秒說明可以使用 DateAdd 函數(shù)對日期加上或減去指定的時(shí)間間隔。例如，可以用 DateAdd 來計(jì)算距今天為三十天的日期；或者計(jì)算距現(xiàn)在為 45

13、分鐘的時(shí)間。為了對 date 加上“日”，可以使用“一年的日數(shù)” (“y”)，“日” (”d”) 或“一周的日數(shù)” (”w”)。DateAdd 函數(shù)將不返回有效日期。在以下實(shí)例中將 1 月31 日加上一個(gè)月：DateAdd(m, 1, 31-Jan-95)上例中，DateAdd 返回 1995 年 2 月 28 日，而不是 1995 年 2 月 31 日。如果 date 是 1996 年 1 月 31 日，則由于 1996 年是閏年，返回值是 1996 年 2 月 29 日。如果計(jì)算的日期超前 100 年（減去的年度超過 date 中的年份），就會(huì)導(dǎo)致錯(cuò)誤發(fā)生。如果 number 不是一個(gè) L

14、ong 值，則在計(jì)算時(shí)取最接近的整數(shù)值來計(jì)算。注意 DateAdd 返回值的格式由 Control Panel設(shè)置決定，而不是由傳遞到date 參數(shù)的格式?jīng)Q定。事例：DateAdd("d",10,"2000-6-18")結(jié)果是： 2000-06-28DateAdd("m",-1,"2000-6-18")結(jié)果是： 2000-05-186、DateDiff 函數(shù)返回 Variant (Long) 的值，表示兩個(gè)指定日期間的時(shí)間間隔數(shù)目。語法 DateDiff(interval, date1, date2, firstd

15、ayofweek, firstweekofyear)DateDiff 函數(shù)語法中有下列命名參數(shù)：部分 描述interval 必要。字符串表達(dá)式，表示用來計(jì)算date1 和 date2 的時(shí)間差的時(shí)間間隔Date1date2 必要；Variant (Date)。計(jì)算中要用到的兩個(gè)日期。Firstdayofweek 可選。指定一個(gè)星期的第一天的常數(shù)。如果未予指定，則以星期日為第一天。firstweekofyear 可選。指定一年的第一周的常數(shù)。如果未予指定，則以包含 1 月 1 日的星期為第一周。interval 參數(shù)的設(shè)定值同DateAdd函數(shù)，請參考上面的例子。例：DateDiff("

16、;d",#2004-01-06#,#2004-01-07#) 17、DatePart 函數(shù)返回一個(gè)包含已知日期的指定時(shí)間部分的 Variant (Integer)。語法 DatePart(interval, date,firstdayofweek, firstweekofyear)DatePart 函數(shù)語法中有下列命名參數(shù)：部分 描述interval 必要。字符串表達(dá)式，是要返回的時(shí)間間隔。date 必要。要計(jì)算的 Variant (Date) 值。Firstdayofweek 可選。指定一個(gè)星期的第一天的常數(shù)。如果未予指定，則以星期日為第一天。firstweekofyear 可選。

17、指定一年第一周的常數(shù)。如果未予指定，則以包含 1 月 1 日的星期為第一周。設(shè)置interval 參數(shù)的設(shè)定值同DateAdd()DatePart 函數(shù)示例本示例先取得一個(gè)日期，然后使用 DatePart 函數(shù)顯示該日期是發(fā)生在該年的哪一季。Dim TheDate As Date ' 聲明變量。Dim MsgT12、Time 函數(shù)返回一個(gè)指明當(dāng)前系統(tǒng)時(shí)間的 Variant (Date)。語法Time示例使用 Time 函數(shù)返回系統(tǒng)當(dāng)前的時(shí)間。Dim MyTimeMyTime = Time ' 返回系統(tǒng)當(dāng)前的時(shí)間說明為了設(shè)置系統(tǒng)時(shí)間，請使用 Time 語句。設(shè)置系統(tǒng)時(shí)間。語法Ti

18、me = time必要的 time 參數(shù)，可以是任何能夠表示時(shí)刻的數(shù)值表達(dá)式、字符串表達(dá)式或它們的組合。說明如果 time 是一字符串，則 Time 會(huì)試著根據(jù)系統(tǒng)指定的時(shí)間，利用時(shí)間分隔符將其轉(zhuǎn)換成一個(gè)時(shí)間。如果無法轉(zhuǎn)換成一個(gè)有效的時(shí)間，則會(huì)導(dǎo)致錯(cuò)誤發(fā)生。13、FormatDateTime函數(shù)描述返回一個(gè)日期或時(shí)間格式的表達(dá)式。語法FormatDateTime(Date,NamedFormat)FormatDateTime函數(shù)語法有如下幾部分：部分 描述Date 必需的。要被格式化的日期表達(dá)式NamedFormat可選的。數(shù)字值，表示日期/時(shí)間所使用的格式。如果忽略該值，則使用vbGener

19、alDate。設(shè)置值NamedFormat參數(shù)的設(shè)置值如下：常數(shù) 值 描述vbGeneralDate 0 顯示日期和/或時(shí)間。如果有日期部分，則用短日期格式顯示。如果有時(shí)間部分，則用長時(shí)間格式顯示。如果都有，兩部分都顯示。VbLongDate 1 用計(jì)算機(jī)區(qū)域設(shè)置值中指定的長日期格式顯示日期。VbShortDate 2 用計(jì)算機(jī)區(qū)域設(shè)置值中指定的短日期格式顯示日期。18、用戶自定義日期/時(shí)間格式 (Format 函數(shù))下面標(biāo)識一些可用來創(chuàng)建用戶自定義日期/時(shí)間格式的字符：字符 說明(:) 時(shí)間分隔符。在一些區(qū)域，可能用其他符號來當(dāng)時(shí)間分隔符。格式化時(shí)間值時(shí)，時(shí)間分隔符可以分隔時(shí)、分、秒。時(shí)間分

20、隔符的真正字符在格式輸出時(shí)取決于系統(tǒng)的設(shè)置。(/) 日期分隔符。在一些區(qū)域，可能用其他符號來當(dāng)日期分隔符。格式化日期數(shù)值時(shí)，日期分隔符可以分隔年、月、日。日期分隔符的真正字符在格式輸出時(shí)取決于系統(tǒng)設(shè)置。c 以 ddddd 來顯示日期并且以 ttttt 來顯示時(shí)間。如果想顯示的數(shù)值無小數(shù)部分，則只顯示日期部分，如果想顯示的數(shù)值無整數(shù)部分，則只顯示時(shí)間部分。d 以沒有前導(dǎo)零的數(shù)字來顯示日 (131)。dd 以有前導(dǎo)零的數(shù)字來顯示日 (0131)。ddd 以簡寫來表示日 (SunSat)dddd 以全稱來表示日 (SundaySaturday)ddddd 以完整日期表示法顯示（包括年、月、日），日期

21、的顯示要依系統(tǒng)的短日期格式設(shè)置而定。dddddd 以完整日期表示法顯示日期系列數(shù)（包括年、月、日），日期的顯示要依系統(tǒng)識別的長日期格式而定。缺省的長日期格式為 mmmmdd, yyyy。aaaa 與dddd 一樣，它只是該字符串的本地化版本。w 將一周中的日期以數(shù)值表示（1 表星期日 7表星期六）。ww 將一年中的星期以數(shù)值表示 (154)。m 以沒有前導(dǎo)零的數(shù)字來顯示月 (112)。如果 m 是直接跟在 h 或 hh 之后，那么顯示的將是分而不是月。mm 以有前導(dǎo)零的數(shù)字來顯示月 (01 12)。如果m是直接跟在h或hh之后，那么顯示的將是分而不是月。mmm 以簡寫來表示月 (JanDec)

22、。mmmm 以全稱來表示月 (JanuaryDecember)。oooo 與mmmm一樣，它只是該字符串的本地化版本。q 將一年如何將文本型：2003.08.04 轉(zhuǎn)換為日期型：2003-08-04cdate(replace("2003.08.04",".","-")顯示當(dāng)前日期在該年中所處的星期號=Format(Now(), "ww")ww 為 1 到 53。顯示日期字段值的四位年份值。=DatePart（"yyyy", 訂購日期）顯示日期字段值前 10 天的日期值。=DateAdd（&quo

23、t;y", -10, 應(yīng)付日期）顯示日期字段值前一個(gè)月的日期值。=DateAdd("m",-1,Date()顯示日期1和日期2之間相差的天數(shù)。=DateDiff（"d", 訂購日期, 發(fā)貨日期）從今天算起到三個(gè)月后的日期之間的記錄。Betweeb date() and adddate(3,date()根據(jù)出生日期計(jì)算年齡（周歲）=IIf(Month(Date()-Month(出生年月日)>-1,Year(Date()-Year(出生年月日),Year(Date()-Year(出生年月日)-1)日期函數(shù)示例當(dāng)天日期：=Date()當(dāng)日：=D

24、ay(date)當(dāng)月：=Month(date()當(dāng)年：=Year(date()當(dāng)季：=DatePart("q",Date()算出每個(gè)月的天數(shù)一法：Dim a, b, ca = Year(Now()b = Month(Now()c = Format(a & "/" & b + 1 & "/1"), "#") - Format(a & "/" & b & "/1"), "#")二法：DateDiff("

25、d", Format(Date, "yyyy-mm-01"), Format(DateAdd("m", -1, Date), "yyyy-mm-01")DateDiff可以算出兩個(gè)日期之間相差幾天！三法：Day(DateAdd("d", -1, Format(Date, "yyyy-mm-01")day函數(shù)可以知道某個(gè)日期是這個(gè)月的第幾天，我們把這個(gè)月的最后一天拿出來DAY一下！應(yīng)該還有更好的方法！比如說可以定義一個(gè)數(shù)組，把每個(gè)月的日子放進(jìn)去，或者說寫一個(gè)函數(shù)算每一個(gè)月的天數(shù)只要考慮一

26、下閨年的問題就可以了！如何得到某年每個(gè)月的第一天是星期幾Private Sub Command1_Click()Dim i As Integer, A As Integer, B As Integer, C As StringA = InputBox("請輸入年份", "某年每個(gè)月的第一天是星期幾")Form1.ClsFor i = 1 To 12C = A & "-" & i & "-1"B = Weekday(C)Select Case BCase vbSundayPrint A &am

27、p; "年" & i & "月1日是 星期日"Case vbMondayPrint A & "年" & i & "月1日是 星期一"Case vbTuesdayPrint A & "年" & i & "月1日是 星期二"Case vbWednesdayPrint A &a ACCESS 日期函數(shù) 部分其它函數(shù)2007-01-19 14:12   1. 將文本型 2003.08.04 轉(zhuǎn)換為日期型 2003-08-04( date(replace ("2003.08.04",".","-")2. 根據(jù)出生日期算年齡= iif (month(date()-month(出生日期)>-1,year(