次の方法で共有

Microsoft Access 定数の概要

  • [アーティクル]

適用先: Access 2013 | Access 2016

一般

変更できない数値や文字列値のことを定数と呼びます。 定数を使用して、Visual Basic コードの読みやすさを向上させ、コードの保守を容易にします。 また、組み込み定数を使うと、定数の示す内容が変更されたときでも従来のコードをそのまま使うことができます。

Access では次の 3 種類の定数が使用できます。

  • シンボリック定数。 Const ステートメントで作成し、モジュールで使用します。

  • 組み込み定数。Access または参照用のライブラリに組み込まれている定数です。

  • システム定義定数。 True 、 False 、および Null です。

シンボリック定数

コードを作成するときに、同じ値を何度も使用したり、値自体に具体的な意味がない値が必要になる場合があります。 シンボリック定数やユーザー定義の定数を使用すると、数値や文字列に値に関連する名前を割り当てることができるため、コードが読みやすくなり、作成や修正が簡単にできます。

Const ステートメントで定数を作成した後は、その定数を変更したり、定数に別の値を割り当てることはできません。 また、組み込み関数で使用されている名前と同じ名前の定数は作成できません。

次の例では、 Const ステートメントを使用して数値定数と文字列定数を宣言しています。

Const conPI = 3.14159265                ' Pi equals this number. 
Const conPI2 = conPI * 2                ' A constant used to create another. 
Const conVersion = "Version 12.0"       ' Declare a string constant.

組み込み定数

Const ステートメントで宣言する定数のほかに、自動的に宣言される組み込み定数が多数あり、Visual Basic for Applications (VBA) の定数や ActiveX データ オブジェクト (ADO) の定数を使用できます。 また、他の参照オブジェクト ライブラリの定数を使用することもできます。 参照の追加の詳細については、「 参照をタイプ ライブラリに設定する」を参照してください。

組み込み定数は、マクロまたは Visual Basic で使用できます。 これらの定数は常に使用できます。 特定の関数、メソッド、またはプロパティで使用される特定の組み込み定数については、その関数、メソッド、またはプロパティのヘルプ トピックで説明されています。

注:

オブジェクト ブラウザーを使用して、使用可能なすべてのオブジェクト ライブラリの組み込み定数の一覧を表示します。

組み込み定数には、定数を定義するオブジェクト ライブラリを識別する 2 文字のプレフィックスがあります。 Access ライブラリの定数の先頭には "ac" が、ADO ライブラリの定数の頭には "ad" が、Visual Basic ライブラリの定数の先頭には "vb" が付いています。 次に例を示します。

  • acForm

  • adAddNew

  • vbCurrency

注:

Because the values represented by the intrinsic constants may change in future versions of Microsoft Access, you should use the constants instead of their actual values. You can, however, display the actual value of a constant by choosing the constant in the Object Browser or by typing ? イミディエイト ウィンドウの constantname。

式を含め、シンボリック定数またはユーザー定義定数を使用できる場合は常に組み込み定数を使用します。 次の例は、組み込み定数 vbCurrency を使用して、変数が VarType 関数が 6 ( Currency) を返す Variant であるかどうかを判断する方法を示しています。

Dim varNum As Variant 
 
If VarType(varNum) = vbCurrency Then 
    Debug.Print "varNum contains Currency data." 
Else 
    Debug.Print "varNum doesn't contain Currency data." 
End If

システム定義定数

Microsoft Access の任意の場所で、システム定義の定数 True、 False、 Null を 使用します。 For example, you can use True in the following macro condition expression. The condition is met if the Visible property setting for the Employees form equals True.

Forms!Employees.Visible = True

Microsoft Access の任意の場所で 定数 Null を 使用します。 For example, you can use Null to set the DefaultValue property for a form control by using the following expression:

=Null

関連項目

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。