原创 用VBA代碼打開非*.mdb擴展名的access數據庫

 第一種方法:用Shell命令(calc.Mdb改名爲calc.txt):    Shell "msaccess c:/windows/desktop

原创 第一課 常用的幾個基本概念

 學VBA,先要了解幾個基本概念,這些概念一開始看一定會有點晦澀難懂,不過看不明白也沒關係,在後面慢慢你會了解它們的含義。先大概瞭解一下它們的定義。1

原创 第三課 設計一個簡單的計算器

 上節課我們編寫的程序不能正確得出結果,原因是:在字符運算中,“+”號是連字符,跟“&”號一樣,作用是把符號前後的字符連起來,而我們引用文本框裏的值默

原创 獲取ACCESS錯誤號與對應的中文解釋

Public Sub MMM() Dim e For e = 1 To 100 Debug.Print e; " - "; Error(e) Next End Sub  1  - 應用程序定義或對象定義錯誤 2  - 應用程序定義或對象

原创 窗體、報表內部件的屬性(主體、頁眉、頁腳)

  Section 屬性                使用 Section 屬性可區分窗體或報表的節,並可以對該節的屬性進行訪問。同樣可以通過控件所

原创 xcopy 複製文件和目錄樹

 xcopy  複製文件和目錄樹。  XCOPY source [destination] [/A | /M] [/D[:date]] [/P] [/

原创 第四課 計算器代碼的編寫

 上節課我們已經對程序大概框架做了分析,這節課我們就來開始編寫程序代碼。由於計算器主要是對各位按鈕做出反應,所以我們的代碼也大多都是在按鈕的單擊事件中

原创 如何在Access報表中每隔N行顯示一條粗線

  ◆1、在設計模式裏打開該報表,在報表主體裏面加一個TextBox,把Name屬性改爲InputID。 ◆2、把InputID的控件來源(Cont

原创 超管用的VBA一句話代碼

一句話代碼:1、組合框的循環選擇        在雙擊事件中加入,也可用在鍵盤按上下箭頭事件中:         Screen.ActiveControl.ListIndex = (Screen.ActiveControl.ListInd

原创 第六課 小數點代碼分析及For循環語句

 這節課我們來分析一下小數點按鈕的代碼,這段代碼用到了for循環及if語句,if語句上節課已講過了,這節課着重講一下for循環語句。 for循環有

原创 標籤變換的代碼

Private Sub Form_Timer() Dim intMz As Integer Dim blnMz As Boolean intMz = intMz + 1 If intMz> 4 Then     intMz = 1 E

原创 權限 判斷函數

 Option Compare DatabasePublic Const ErrQX = "權限不足!請與管理員聯繫!"Public YGNumber

原创 第二課 加法運算

  <SCRIPT src="http://pagead2.googlesyndication.com/pagead/show_ads.js

原创 計算窗體複選框控件爲真的個數

Private Sub Command6_Click()Dim Ctl As ControlDim intCount As Integer For Each Ctl In Me.ControlsIf Ctl.ControlType = a

原创 TreeView控件使用說明

TreeView控件使用說明<?xml:namespace prefix = o ns = "urn:schemas-microsoft-com:office:office" /> TreeView控件是在VFP的數據處理中很有用的一個