Περιεχόμενα

# Σταθερές Basic

Χρησιμοποιούμενες σταθερές σε προγράμματα Basic

## Σταθερές Μπουλ

Όνομα | Τύπος | Τιμή
--- | --- | ---
True | Boolean | 1
False | Boolean | 0

### Παράδειγμα:

                Dim bPositive as Boolean
                bPositive = True

## Μαθηματική σταθερά

Όνομα | Τύπος | Τιμή
--- | --- | ---
Pi | Double | 3.14159265358979

### Παράδειγμα:

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

## Σταθερές αντικειμένου

Όνομα | Τύπος | Χρήση
--- | --- | ---
Empty | Variant | Η τιμή κενό δείχνει ότι η μεταβλητή δεν έχει αρχικοποιηθεί.
Null | null | Δείχνει ότι η μεταβλητή δεν περιέχει δεδομένα.
Nothing | Object | Αναθέτει το αντικείμενο Nothing (Τίποτα) σε μια μεταβλητή για να αφαιρέσει μια προηγούμενη ανάθεση.

### Παράδειγμα:

                SubExampleEmpty
                    Dim sVar As Variant
                    sVar = Empty
                    Print IsEmpty(sVar) ' επιστρέφει Αληθές
                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 ' Σφάλμα
                End Sub

## Σταθερές με όνομα στο MsgBox

Επώνυμη σταθερά | Ακέραιη τιμή | Ορισμός
--- | --- | ---
MB_OK | 0 | Εμφάνιση μόνο του πλήκτρου Εντάξει.
MB_OKCANCEL | 1 | Εμφάνιση των πλήκτρων Εντάξει και Άκυρο.
MB_ABORTRETRYIGNORE | 2 | Εμφάνιση των πλήκτρων Ματαίωση, Επανάληψη και Παράβλεψη.
MB_YESNOCANCEL | 3 | Εμφάνιση των πλήκτρων Ναι, Όχι και Άκυρο.
MB_YESNO | 4 | Εμφάνιση των πλήκτρων Ναι και Όχι.
MB_RETRYCANCEL | 5 | Εμφάνιση των πλήκτρων Επανάληψη και Άκυρο.
MB_ICONSTOP | 16 | Προσθήκη του εικονιδίου διακοπή στον διάλογο.
MB_ICONQUESTION | 32 | Προσθήκη του εικονιδίου Ερώτηση στον διάλογο.
MB_ICONEXCLAMATION | 48 | Προσθήκη του εικονιδίου Θαυμαστικό στον διάλογο.
MB_ICONINFORMATION | 64 | Προσθήκη του εικονιδίου πληροφορίες στον διάλογο.
| 128 | Το πρώτο πλήκτρο του διάλογου είναι το προεπιλεγμένο πλήκτρο.
MB_DEFBUTTON2 | 256 | Το δεύτερο πλήκτρο του διάλογου είναι το προεπιλεγμένο πλήκτρο.
MB_DEFBUTTON3 | 512 | Το τρίτο πλήκτρο του διάλογου είναι το προεπιλεγμένο πλήκτρο.

## Σταθερές με όνομα στο GetAttr

Επώνυμη σταθερά | Τιμή | Ορισμός
--- | --- | ---
ATTR_NORMAL | 0 | Κανονικά αρχεία.
ATTR_READONLY | 1 | Αρχεία μόνο για ανάγνωση.
ATTR_HIDDEN | 2 | Κρυφό αρχείο
ATTR_SYSTEM | 4 | Αρχείο συστήματος
ATTR_VOLUME | 8 | Επιστρέφει το όνομα του τόμου
ATTR_DIRECTORY | 16 | Επιστρέφει μόνο το όνομα του καταλόγου.
ATTR_ARCHIVE | 32 | Το αρχείο άλλαξε από την τελευταία δημιουργία αντιγράφου ασφαλείας (Archive bit).

## Τύπος δεδομένων σταθερών με όνομα

Τιμές TypeName | Σταθερά ονοματισμένη | VarType values | Τύπος μεταβλητής
--- | --- | --- | ---
…() | 8192 | Πίνακας μεταβλητών
Boolean | 11 | μεταβλητή Boolean
Byte | 17 | μεταβλητή Byte
Date | V_DATE | 7 | μεταβλητή Date
Currency | V_CURRENCY | 6 | μεταβλητή Currency
Double | V_DOUBLE | 5 | Μεταβλητή κινητής υποδιαστολής διπλής ακρίβειας
Error | 11 | Μεταβλητή τύπου σφάλματος
Integer | V_INTEGER | 2 | μεταβλητή Integer
Long | V_LONG | 3 | ακέραια μεταβλητή Long
Object | 9 | μεταβλητή Object
Single | V_SINGLE | 4 | Μεταβλητή κινητής υποδιαστολής απλής ακρίβειας
String | V_STRING | 8 | μεταβλητή String
Variant | 12 | μεταβλητή Variant (μπορεί να περιέχει όλους τους τύπους που καθορίζονται από τον ορισμό)
Empty | V_EMPTY | 0 | Μη αρχικοποιημένη μεταβλητή Variant
Null | V_NULL | 1 | Χωρίς έγκυρα δεδομένα

## Πρόσθετες σταθερές VBA

Οι παρακάτω σταθερές είναι διαθέσιμες όταν η κατάσταση συμβατότητας VBA είναι ενεργοποιημένη

Αυτή η σταθερά, συνάρτηση ή αντικείμενο ενεργοποιείται με την πρόταση Option VBASupport 1 τοποθετημένη πριν τον κώδικα του εκτελέσιμου προγράμματος σε άρθρωμα.

### VBA MsgBox named constants

Name | Value
--- | ---
vbApplicationModal | 0
vbDefaultButton1 | 0
vbOKOnly | 0
vbOKCancel | 1
vbAbortRetryIgnore | 2
vbYesNoCancel | 3
vbYesNo | 4
vbRetryCancel | 5
vbCritical | 16
vbQuestion | 32
vbExclamation | 48
vbInformation | 64
vbDefaultButton2 | 256
vbDefaultButton3 | 512
vbDefaultButton4 | 768
vbSystemModal | 4096
vbMsgBoxHelpButton | 16384
vbMsgBoxSetForeground | 65536
vbMsgBoxRight | 524288
vbMsgBoxRtlReading | 1048576

### Σταθερές με όνομα χρώματος στη VBA

Σταθερές με όνομα | Σύσταση Κόκκινο, Πράσινο, Γαλάζιο
--- | ---
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)

### Σταθερές με όνομα τύπου μεταβλητής

Σταθερά με όνομα | Δεκαδική τιμή
--- | ---
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

Επώνυμη σταθερά | Τιμή | Περιγραφή
--- | --- | ---
vbGeneralDate | 0 | Εμφανίζει ημερομηνία και/ή χρόνο όπως καθορίζεται στη ρύθμιση γενικής ημερομηνίας στο σύστημά σας. Εάν είναι μόνο ημερομηνία, δεν εμφανίζεται χρόνος· Εάν είναι μόνο χρόνος, δεν εμφανίζεται ημερομηνία.
vbLongDate | 1 | Εμφανίζει ημερομηνία χρησιμοποιώντας τη μεγάλη μορφή ημερομηνίας που ορίζεται στις τοπικές ρυθμίσεις του υπολογιστή σας.
vbShortDate | 2 | Εμφανίζει ημερομηνία χρησιμοποιώντας τη σύντομη μορφή ημερομηνίας που ορίζεται στις τοπικές ρυθμίσεις του υπολογιστή σας.
vbLongTime | 3 | Εμφανίζει τον χρόνο όπως ορίζεται στις ρυθμίσεις πλήρους ώρας του συστήματός σας.
vbShortTime | 4 | Εμφανίζει χρόνο χρησιμοποιώντας την 24ώρη μορφή (hh:mm).

### Σταθερές με όνομα StrConv στη VBA

Μετατροπή | Τιμή | Περιγραφή
--- | --- | ---
vbUpperCase | 1 | Μετατρέπει χαρακτήρες Κείμενο σε κεφαλαία.
vbLowerCase | 2 | Μετατρέπει χαρακτήρες Κειμένου σε πεζούς χαρακτήρες.
vbProperCase | 3 | Μετατρέπει σε κεφαλαία το πρώτο γράμμα κάθε λέξης στο Κείμενο.
vbWide | 4 | Μετατρέπει τους στενούς χαρακτήρες (μισού πλάτους) στο Κείμενο σε πλατείς χαρακτήρες (πλήρους πλάτους).
vbNarrow | 8 | Μετατρέπει πλατείς χαρακτήρες (πλήρους πλάτους) στο Κείμενο σε στενούς χαρακτήρες (μισού πλάτους).
vbKatakana | 16 | Μετατρέπει χαρακτήρες Χιραγκάνα σε Κείμενο σε χαρακτήρες Κατακάνα.
vbHiragana | 32 | Μετατρέπει χαρακτήρες κατακάνα σε Κείμενο σε χαρακτήρες Χιραγκάνα.
vbUnicode | 64 | Μετατρέπει χαρακτήρες του Κειμένου σε χαρακτήρες Unicode χρησιμοποιώντας την προεπιλεγμένη κωδικοσελίδα του συστήματος.
vbFromUnicode | 128 | Μετατρέπει χαρακτήρες του Κειμένου από Unicode στην προεπιλεγμένη κωδικοσελίδα του συστήματος.

### Σταθερές με όνομα WeekDayName στη VBA

Τιμή | Σταθερά VBA | Περιγραφή
--- | --- | ---
0 | vbUseSystemDayOfWeek | Χρήση των τοπικών ρυθμίσεων του συστήματος
1 | vbSunday | Κυριακή (προεπιλογή)
2 | vbMonday | Δευτέρα
3 | vbTuesday | Τρίτη
4 | vbWednesday | Τετάρτη
5 | vbThursday | Πέμπτη
6 | vbFriday | Παρασκευή
7 | vbSaturday | Σάββατο

### Διάφορες σταθερές με όνομα στη VBA

Επώνυμη σταθερά | Δεκαεξαδική (δεκαδική) τιμή | Περιγραφή
--- | --- | ---
vbTrue | -1 | Τμήμα της αρίθμησης vbTriState.
vbFalse | 0 | Τμήμα της αρίθμησης vbTriState.
vbUseDefault | -2 | Τμήμα της αρίθμησης vbTriState.
vbCr | \x0D (13) | CR - Χαρακτήρας επιστροφής
vbCrLf | \x0D\x0A (13 10) | CRLF - Χαρακτήρας επιστροφής και αλλαγή γραμμής
vbFormFeed | \x0c (12) | FF - Αλλαγή σελίδας
vbLf | \x0A (10) | LF - Αλλαγή γραμμής
vbNewLine | \x0D\x0A (13 10) για Windows \x0A (10) για άλλα συστήματα | LF ή CRLF
vbNullString | "" | Συμβολοσειρά Null
vbTab | \x09 (9) | HT - Οριζόντιος στηλοθέτης
vbVerticalTab | \x0B (11) | VT - Κάθετος στηλοθέτης

Παρακαλούμε, υποστηρίξτε μας!