Basic Konstanter

Konstanter brukt i Basic programmer

Boolske konstanter

Navn

Type

Verdi

True

Boolean

1

False

Boolean

0


Eksempel:


            Dim bPositive as Boolean
            bPositive = True
        

Matematisk konstant

Navn

Type

Verdi

Pi

Double

3.14159265358979


Eksempel:


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

Objektkonstanter

Navn

Type

Bruk

Empty

Variant

Verdien Empty indikerer at variabelen ikke er initialisert.

Null

null

Indikerer at variabelen ikke inneholder data.

Nothing

Object

Tilordne Nothing-objektet til en variabel for å fjerne en tidligere tilordning.


Eksempel:


            SubExampleEmpty
                Dim sVar As Variant
                sVar = Empty
                Skriv ut IsEmpty(sVar) ' Returnerer Sann
            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
                Skriv ut oDoc 'Feil
            End Sub
        

MsgBox navngitte konstanter

Navngitt konstant

Heltallsverdi

Definisjon

MB_OK

0

Vis bare OK-knappen.

MB_OKCANCEL

1

Vis knappene OK og Avbryt.

MB_ABORTRETRYIGNORE

2

Vis knappene Avbryt, Prøv igjen og Ignorer.

MB_YESNOCANCEL

3

Vis knappene Ja, Nei og Avbryt

MB_YESNO

4

Vis knappene Ja og Nei.

MB_RETRYCANCEL

5

Vis knappene Prøv igjen og Avbryt.

MB_ICONSTOP

16

Legg stopp-ikonet til i dialogen

MB_ICONQUESTION

32

Legg spørsmål-ikonet til i dialogen.

MB_ICONEXCLAMATION

48

Legg utropstegn-ikonet til i dialogen.

MB_ICONINFORMATION

64

Legg informasjons-ikonet til i dialogen..

128

Første knappen i dialogvinduet som standardknapp.

MB_DEFBUTTON2

256

Andre knappen i dialogvinduet som standardknapp.

MB_DEFBUTTON3

512

Tredje knappen i dialogvinduet som standardknapp.


GetAttr navngitte konstanter

Navngitt konstant

Verdi

Definisjon

ATTR_NORMAL

0

Normale filer.

ATTR_READONLY

1

Skrivebeskyttede filer.

ATTR_HIDDEN

2

Skjult fil

ATTR_SYSTEM

4

System fil

ATTR_VOLUME

8

Returnerer navnet på volumet

ATTR_DIRECTORY

16

Returnerer kun navnet på katalogen.

ATTR_ARCHIVE

32

Filen ble endret siden siste sikkerhetskopiering (arkivbit).


VarType Named Constants

Keyword

Named constant

VarType

Variabeltyper

Boolean

11

Boolean variable

Byte

17

Byte variable

Date

V_DATE

7

Date variable

Currency

V_CURRENCY

6

Currency variable

Double

V_DOUBLE

5

Double floating point variable

Integer

V_INTEGER

2

Integer variable

Long

V_LONG

3

Long integer variable

Object

9

Object variable

Single

V_SINGLE

4

Single floating-point variable

String

V_STRING

8

Bruk av Variabler

Variant

12

Variant variable (can contain all types specified by the definition)

Empty

V_EMPTY

0

Variable is not initialized

Null

V_NULL

1

No valid data


Ytterligere VBA-konstanter

Følgende konstanter er tilgjengelige når VBA-kompatibilitetsmodus er aktivert

warning

Denne konstanten, funksjonen eller objektet er aktivert med utsagnet Option VBASupport 1 plassert før den kjørbare programkoden i en modul.


VBA-farge navngitte konstanter

Navngitt konstant

Rød, Grønn, Blå
sammensetning

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)


Variabel Type navngitte konstanter

Navngitt konstant

Desimalverdi

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 navngitte konstanter

Named Constant

Value

Description

vbGeneralDate

0

Displays a date and/or time as defined in your system's General Date setting. If a date only, no time is displayed; If a time only, no date is displayed.

vbLongDate

1

Display a date using the long date format specified in your computer's regional settings.

vbShortDate

2

Display a date using the short date format specified in your computer's regional settings.

vbLongTime

3

Displays a time as defined in your system's Long Time settings.

vbShortTime

4

Display a time using the 24-hour format (hh:mm).


StrConv VBA navngitte konstanter

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 navngitte konstanter

Verdi

VBA konstant

Beskrivelse

0

vbUseSystemDayOfWeek

Bruk lokale innstillinger for systemet

1

vbSunday

Søndag (standard)

2

vbMonday

Mandag

3

vbTuesday

Tirsdag

4

vbWednesday

Onsdag

5

vbThursday

Torsdag

6

vbFriday

Fredag

7

vbSaturday

Lørdag


Diverse VBA navngitte konstanter

Navngitt konstant

Heksadesimal (desimal) verdi

Beskrivelse

vbTrue

-1

En del av vbTriState-enumerasjonen.

vbFalse

0

En del av vbTriState-enumerasjonen.

vbUseDefault

-2

En del av vbTriState-enumerasjonen.

vbCr

\x0D (13)

CR Vognretur

vbCrLf

\x0D\x0A (13 10)

CRLF - Vognretur og linjemating

vbFormFeed

\x0c (12)

FF - skjemamating

vbLf

\x0A (10)

LF - linjemating

vbNewLine

\x0D\x0A (13 10) for Windows

\x0A (10) for andre systemer

LF eller CRLF

vbNullString

""

Null streng

vbTab

\x09 (9)

HT - Horisontal fane

vbVerticalTab

\x0B (11)

VT - Vertikal fane