VB6 Excel VBA Access VBA環(huán)境下：真正可用并且完美支持中英文的 URLEncode 與 URLDecode 2個(gè)函數(shù)源碼 函數(shù)用途：向網(wǎng)頁(yè)Get 或 Post提交數(shù)據(jù)時(shí)，經(jīng)常要對(duì)文本Url編碼 Url解碼 網(wǎng)上很多 U...

URL編碼(URL encoding)，也稱作百分號(hào)編碼(Percent-encoding)， 是特定上下文的統(tǒng)一資源定位符 (URL)的編碼機(jī)制 在VBA中，沒(méi)有完整有效的類似 vb中的 urlencode 函數(shù),下面...

在編寫vba代碼時(shí)，經(jīng)常會(huì)因?yàn)檫B接字符串的符號(hào)太多，沒(méi)有組成一對(duì)導(dǎo)致錯(cuò)誤。 這里版主粉絲寫了一個(gè)函數(shù)方便串接SQL字符串，可以讓串接變得更直觀，特別是有單引號(hào)的情況下，類似C#中的String.Format方法 函數(shù)用途：可以方便串接S...

在調(diào)用IE對(duì)象時(shí)，多次調(diào)用會(huì)出現(xiàn)錯(cuò)誤，防止多次調(diào)用IE對(duì)象，可以把把IE瀏覽器對(duì)象徹底地關(guān)閉 添加一個(gè)IE_Sledgehammer函數(shù)確保IE瀏覽器完全關(guān)閉 Sub IE_Sledgehammer() Dim objWMI As ...

為了突出信息的重要性，我們希望信息能高亮顯示，甚至一直閃爍讓更多的人注意消息通知。 可以通過(guò)計(jì)時(shí)器的時(shí)間間隔設(shè)置不同的閃爍顏色，以毫秒為單位使標(biāo)簽控件閃爍。 設(shè)置1秒鐘改變一下顏色，顏色通過(guò)rnd函數(shù)隨機(jī)生成新的RGB顏色 ' 計(jì)時(shí)...

很多用過(guò)access的人都知道，access有個(gè)非常不好的毛病，就是容易崩潰。然后數(shù)據(jù)庫(kù)損壞 我們可以做的就是常常備份，避免數(shù)據(jù)丟失帶來(lái)巨大的影響 一般備份我們可以直接復(fù)制文件，按指定的要求在指定文件夾創(chuàng)建備份文件。 這里我們用dos批處...

在 Visual Basic中可以通過(guò)HWnd屬性獲取UserForms 的句柄，HWnd屬性提供對(duì)窗體的窗口句柄的訪問(wèn)。 在使用與窗口相關(guān)的Windows API時(shí)，需要窗口句柄。 但是和 Visual Ba...

Excel自帶 Asin Acos函數(shù)，但Access沒(méi)有，可以自己用VBA來(lái)實(shí)現(xiàn) 一個(gè) Access實(shí)現(xiàn) Asin Acos函數(shù)（自定義函數(shù)） Const PI As Double = 3.1415926535...

不同的顏色給我們不同的感覺(jué)。所以生活中有不同的顏色選擇，比如衣物，生活用品等 而顏色有它的反色，又叫補(bǔ)色。比如有黑就有白，紅對(duì)應(yīng)青。 下面函數(shù)用RGB取顏色的反色 對(duì)比色 Public Function GetRevColor...

VBA讀寫文本文件,一般使用下面的方法，即打開文件標(biāo)識(shí)符號(hào)句柄 建議使用Freefile dim i as Integer i=FreeFile Open FileName For Input As #i Open FileName...

Article: Q154517 Product(s): Microsoft Visual Basic for Windows Version(s): WINDOWS:4.0 Operating System(s):  Keywo...

Access自帶了DStdevp 聚合函數(shù)求標(biāo)準(zhǔn)差，但只能對(duì)表中字段求標(biāo)準(zhǔn)差，無(wú)法對(duì)提供的多個(gè)數(shù)字參數(shù)求標(biāo)準(zhǔn)差 所以自己做了一個(gè)求標(biāo)準(zhǔn)差的自定義函數(shù)，同樣適用于Access VBA, Excel VBA, VB6 'MyStdevp 求標(biāo)...

Access自帶了DAvg聚合函數(shù)求平均值，但只能對(duì)表中字段求平均值，無(wú)法對(duì)提供的多個(gè)數(shù)字參數(shù)求平均值 所以自己做了一個(gè)求平均值的自定義函數(shù)，同樣適用于Access VBA, Excel VBA, VB6 'MyAvg 求平均值 Pub...

STDEVP 是用來(lái)計(jì)算標(biāo)準(zhǔn)差的函數(shù),STDEV是樣本標(biāo)準(zhǔn)差的函數(shù),STDEVP是總體標(biāo)準(zhǔn)差的函數(shù)。 在Sql語(yǔ)句中 access可使用 STDEVP標(biāo)準(zhǔn)差的函數(shù) 但在VBA代碼中，如果對(duì)一組數(shù)字求標(biāo)準(zhǔn)差，則沒(méi)有一個(gè)自定義的函數(shù)，...

在數(shù)據(jù)查詢中，我們有時(shí)需要找出一組數(shù)據(jù)中出現(xiàn)次數(shù)最多的數(shù)字。這個(gè)也是我們常說(shuō)的眾數(shù)了。 如在數(shù)組{2，3，2，5，8，2，16，17} ，眾數(shù)即是 2了 這個(gè)我們?nèi)绻肧QL語(yǔ)句，是很容易求出來(lái)的。用count 統(tǒng)計(jì)，用order by 排...