MonthName-Funktion (Visual Basic)
Aktualisiert: November 2007
Gibt einen String-Wert zurück, der den Namen des angegebenen Monats enthält.
Public Function MonthName( _
ByVal Month As Integer, _
Optional ByVal Abbreviate As Boolean = False _
) As String
Parameter
Month
Erforderlich. Integer. Die numerische Bezeichnung des Monats von 1 bis 13, wobei 1 für Januar und 12 für Dezember steht. Den Wert 13 können Sie für einen 13-Monats-Kalender verwenden. Wenn im System ein 12-Monats-Kalender verwendet wird und Month 13 ist, gibt MonthName eine leere Zeichenfolge zurück.Abbreviate
Optional. Boolean-Wert, der angibt, ob der Monatsname abgekürzt werden soll. Wenn dieses Argument nicht angegeben wird, ist der Standardwert False, d. h., der Monatsname wird nicht abgekürzt.
Ausnahmen
Ausnahmetyp |
Fehlernummer |
Bedingung |
---|---|---|
Month ist kleiner als 1 oder größer als 13. |
Beachten Sie die Spalte "Fehlernummer", wenn Sie Visual Basic 6.0-Anwendungen aktualisieren, die eine unstrukturierte Fehlerbehandlung verwenden. (Sie können die Fehlernummer mit der Number-Eigenschaft (Err-Objekt) vergleichen.) Wenn möglich, sollten Sie jedoch erwägen, eine solche Fehlersteuerung durch eine Übersicht über die strukturierte Ausnahmebehandlung für Visual Basic zu ersetzen.
Hinweise
Welche Zeichenfolge von MonthName zurückgegeben wird, hängt nicht nur von den Eingabeargumenten ab, sondern auch von den Einstellungen, die in der Systemsteuerung von Windows im Dialogfeld Ländereinstellungen gewählt wurden.
Hinweis: |
---|
MonthName verwendet die aktuelle Kalendereinstellung aus der CurrentCulture-Eigenschaft der CultureInfo-Klasse im System.Globalization-Namespace. Die Standardwerte für CurrentCulture werden durch die Einstellungen in der Systemsteuerung festgelegt. |
Beispiel
In diesem Beispiel wird die MonthName-Funktion verwendet, um den Namen des Monats für eine angegebene ganze Zahl zu ermitteln. Der boolesche Wert legt fest, ob der vollständige Name (False) oder die Abkürzung des Namens (True) angezeigt wird.
Dim thisMonth As Integer
Dim name As String
thisMonth = 4
' Set Abbreviate to True to return an abbreviated name.
name = MonthName(thisMonth, True)
' name now contains "Apr".
Anforderungen
Namespace:Microsoft.VisualBasic
**Modul:**DateAndTime
**Assembly:**Visual Basic Runtime Library (in Microsoft.VisualBasic.dll)