Basic Constants

Konstanta yang digunakan dalam program-program dasar

Konstanta Boolean

Nama

Tipe

Nilai

True

Boolean

1

False

Boolean

0


Contoh:


            Dim bPositive as Boolean
            bPositive = True
        

Konstanta matematika

Nama

Tipe

Nilai

Pi

Double

3.14159265358979


Contoh:


            Function Rad2Deg( aRad as Double) As Double
             Rad2Deg = aRad * 180.00 / Pi
            End Function
        

Konstanta Obyek

Nama

Tipe

Cara Pakai

Empty

Variant

Nilai Kosong menunjukkan bahwa variabel tidak diinisialisasi.

Null

null

Menunjukkan bahwa variabel tidak mengandung data.

Nothing

Object

Menetapkan objek Tidak ada pada variabel untuk menghapus penetapan sebelumnya.


Contoh:


            SubExampleEmpty
                Dim sVar As Variant
                sVar = Empty
                Print IsEmpty(sVar) ' Returns True
            End Sub
            Sub ExampleNull
                Dim vVar As Variant
                MsgBox IsNull(vVar)
            End Sub
            Sub ExampleNothing
                Dim oDoc As Object
                Set oDoc = ThisComponent
                Print oDoc.Title
                oDoc = Nothing
                Print oDoc ' Error
            End Sub
        

MsgBox Named Constants

Dinamakan konstan

Nilai integer

Definisi

MB_OK

0

Hanya menampilkan tombol OKE.

MB_OKCANCEL

1

Menampilkan tombol OK dan Batal.

MB_ABORTRETRYIGNORE

2

Menampilkan tombol Batalkan, Ulangi, dan Abaikan.

MB_YESNOCANCEL

3

Menampilkan tombol Ya, Tidak, dan Batal.

MB_YESNO

4

Menampilkan tombol Ya dan Tidak.

MB_RETRYCANCEL

5

Menampilkan tombol Ulangi dan Batal.

MB_ICONSTOP

16

Tambahkan ikon Berhenti pada dialog.

MB_ICONQUESTION

32

Tambahkan ikon Pertanyaan pada dialog.

MB_ICONEXCLAMATION

48

Tambahkan ikon Tanda Seru ke dialog.

MB_ICONINFORMATION

64

Tambahkan ikon Informasi pada dialog.

128

Tombol pertama pada dialog sebagai tombol utama.

MB_DEFBUTTON2

256

Tombol kedua pada dialog sebagai tombol utama.

MB_DEFBUTTON3

512

Tambahkan ikon Tanda Seru ke dialog.


GetAttr Named Constants

Dinamakan konstan

Nilai

Definisi

ATTR_NORMAL

0

Berkas normal.

ATTR_READONLY

1

Berkas hanya-baca.

ATTR_HIDDEN

2

File tersembunyi

ATTR_SYSTEM

4

File sistem

ATTR_VOLUME

8

Menghasilkan nama volume

ATTR_DIRECTORY

16

Hanya menghasilkan nama direktori.

ATTR_ARCHIVE

32

File diubah sejak cadangan terakhir (bit arsip).


VarType Named Constants

keyword

Dinamakan konstan

VarType

Jenis variabel

Boolean

11

Variabel boolean

Byte

17

Byte variable

Date

V_DATE

7

Variabel tanggal

Currency

V_CURRENCY

6

Variabel Mata Uang

Double

V_DOUBLE

5

Variabel floating point ganda

Integer

V_INTEGER

2

Variabel integer

Long

V_LONG

3

Variabel integer panjang

Object

9

Variabel objek

Single

V_SINGLE

4

Variabel floating-point tunggal

String

V_STRING

8

Variabel String

Variant

12

Varian variabel (dapat berisi semua jenis yang ditentukan oleh definisi)

Empty

V_EMPTY

0

Variabel tidak diinisialisasi

Null

V_NULL

1

Data tidak sah


Konstanta tambahan VBA

Konstanta berikut ini tersedia ketika mode kompatibilitas VBA diaktifkan

warning

This constant, function or object is enabled with the statement Option VBASupport 1 placed before the executable program code in a module.


VBA Color Named Constants

Named constant

Red, Green, Blue
composition

vbBlack

RGB(0, 0, 0)

vbBlue

RGB(0, 0, 255)

vbCyan

RGB(0, 255, 255)

vbGreen

RGB(0, 255, 0)

vbMagenta

RGB(255, 0, 255)

vbRed

RGB(255, 0, 0)

vbYellow

RGB(255, 255, 0)

vbWhite

RGB(255, 255, 255)


Variable Type Named Constants

Named constant

Decimal value

vbArray

8192

vbBoolean

11

vbByte

17

vbCurrency

6

vbDataObject

13

vbDate

7

vbDecimal

14

vbDouble

5

vbEmpty

0

vbError

10

vbInteger

2

vbLong

3

vbNull

1

vbObject

9

vbSingle

4

vbString

8

vbUserDefinedType

36

vbVariant

12


FormatDateTime VBA Named Constants

Dinamakan konstan

Nilai

Keterangan

vbGeneralDate

0

Menampilkan tanggal dan/atau waktu sebagaimana ditentukan dalam pengaturan sistem Umum Tanggal Anda. Jika hanya tanggal, tidak ada waktu ditampilkan; Jika hanya waktu, tidak ada tanggal yang ditampilkan.

vbLongDate

1

Menampilkan tanggal menggunakan format penanggalan panjang yang ditentukan dalam pengaturan regional komputer Anda.

vbShortDate

2

Menampilkan tanggal menggunakan format penanggalan pendek yang ditentukan dalam pengaturan regional komputer Anda.

vbLongTime

3

Menampilkan waktu sebagaimana ditentukan dalam pengaturan sistem Waktu Lama Anda.

vbShortTime

4

Menampilkan waktu menggunakan format 24 jam (jj:mm).


StrConv VBA Named Constants

Conversion

Value

Description

vbUpperCase

1

Converts Text characters to uppercase.

vbLowerCase

2

Converts Text characters lowercase.

vbProperCase

3

Converts the first letter of every word in Text to uppercase.

vbWide

4

Converts narrow (half-width) characters in Text to wide (full-width) characters.

vbNarrow

8

Converts wide (full-width) characters in Text to narrow (half-width) characters.

vbKatakana

16

Converts Hiragana characters in Text to Katakana characters.

vbHiragana

32

Converts Katakana characters in Text to Hiragana characters.

vbUnicode

64

Converts Text characters to Unicode characters using the default code page of the system.

vbFromUnicode

128

Converts Text characters from Unicode to the default code page of the system.


WeekDayName VBA Named Constants

Value

VBA Constant

Description

0

vbUseSystemDayOfWeek

Use system locale settings

1

vbSunday

Sunday (default)

2

vbMonday

Monday

3

vbTuesday

Tuesday

4

vbWednesday

Wednesday

5

vbThursday

Thursday

6

vbFriday

Friday

7

vbSaturday

Saturday


Miscellaneous VBA Named Constants

Dinamakan konstan

Nilai heksadesimal (desimal)

Keterangan

vbTrue

-1

Bagian dari daftar vbTriState.

vbFalse

0

Bagian dari daftar vbTriState.

vbUseDefault

-2

Bagian dari daftar vbTriState.

vbCr

\x0D (13)

pengangkutan kembali

vbCrLf

\x0D\x0A (13 10)

CRLF - Carriage return and line feed

vbFormFeed

\x0c (12)

FF - Umpan bentuk

vbLf

\x0A (10)

LF - Umpan baris

vbNewLine

\x0D\x0A (13 10) for Windows

\x0A (10) for other systems

LF atau CRLF

vbNullString

""

String nol

vbTab

\x09 (9)

HT - Tab horisontal

vbVerticalTab

\x0B (11)

VT - Tab vertikal


Mohon dukung kami!