ABOUT Visual Basic Programmieren Programmierung Download Downloads Tips & Tricks Tipps & Tricks Know-How Praxis VB VBA Visual Basic for Applications VBS VBScript Scripting Windows ActiveX COM OLE API ComputerPC Microsoft Office Microsoft Office 97 Office 2000 Access Word Winword Excel Outlook Addins ASP Active Server Pages COMAddIns ActiveX-Controls OCX UserControl UserDocument Komponenten DLL EXE
Diese Seite wurde zuletzt aktualisiert am 29.06.2000

Diese Seite wurde zuletzt aktualisiert am 29.06.2000
Aktuell im ABOUT Visual Basic-MagazinGrundlagenwissen und TechnologienKnow How, Tipps und Tricks rund um Visual BasicActiveX-Komponenten, Controls, Klassen und mehr...AddIns für die Visual Basic-IDE und die VBA-IDEVBA-Programmierung in MS-Office und anderen AnwendungenScripting-Praxis für den Windows Scripting Host und das Scripting-ControlTools, Komponenten und Dienstleistungen des MarktesRessourcen für Programmierer (Bücher, Job-Börse)Dies&Das...

Themen und Stichwörter im ABOUT Visual Basic-Magazin
Code, Beispiele, Komponenten, Tools im Überblick, Shareware, Freeware
Ihre Service-Seite, Termine, Job-Börse
Melden Sie sich an, um in den vollen Genuss des ABOUT Visual Basic-Magazins zu kommen!
Informationen zum ABOUT Visual Basic-Magazin, Kontakt und Impressum

Zurück...

Heimatliche Zeichen

Zurück...


Anzeige

(-hg) mailto:hg_localestrings@aboutvb.de

Wir sind es zwar gewohnt, dass das Datums-Trennzeichen ein Punkt ist, dass unsere Währung (noch) DM heißt, oder dass das Dezimal-Trennzeichen ein Komma ist. Und Sie ärgern sich bestimmt auch immer wieder über Software aus anderen Ländern, die die jeweiligen dortigen Gepflogenheiten annimmt, ohne die lokal auf einem Rechner angetroffenen Ländereinstellungen zu berücksichtigen. Damit man sich nicht auch über Ihre Software-Produkte gleichermaßen ärgern wird, sollten Sie dafür sorgen, dass sie in internationaler Hinsicht fit sind.

Zur lokal korrekten Darstellung von Zahlen und Datumswerten verhelfen Ihnen die vielen Möglichkeiten der MSDN Library - VB FormatFormat-Funktion. Doch wenn Sie den Währungsbezeichner oder eines der Trennzeichen einmal solo benötigen sollten, hilft Ihnen die Format-Funktion nur notdürftig weiter. So könnten Sie das Dezimal-Trennzeichen mit der Format-Funktion etwa auf folgende Weise ermitteln:

DecimalSeparator = Mid$(Format$(1.1, "0.0"), 2, 1)

Aber das ist nicht sonderlich elegant - und spätestens beim Währungsbezeichner sind Sie damit aufgeschmissen. Und außerdem kommen Sie so nicht an solche Feinheiten heran, die Windows durchaus auch kennt, nämlich an möglicherweise unterschiedliche Dezimal-Trennzeichen für "normale" Zahlen und für Währungsbeträge.

Die korrekten Zeichen und Strings können Sie aber mit der API-Funktion MSDN Library - API GetLocaleInfoGetLocaleInfo ermitteln. Die wichtigsten davon liefert Ihnen die Hilfsfunktion LocaleString (als Eigenschaft in einem Standard-Modul implementiert), die den etwas umständlichen Aufruf von GetLocaleInfo kapselt und automatisch auf die lokalen Einstellungen des aktuellen Users zurückgreift (MSDN Library - API GetUserDefaultLCIDGetUserDefaultLCID).

Private Declare Function GetLocaleInfo Lib "kernel32" _
 Alias "GetLocaleInfoA" (ByVal Locale As Long, ByVal LCType As Long, _
 ByVal lpLCData As String, ByVal cchData As Long) As Long
Private Declare Function GetUserDefaultLCID Lib "kernel32" () As Long

Public Enum LocaleStringConstants
  locCurrency = &H14
  locCurSymbol = &H15
  locDate = &H1D
  locDecimal = &HE
  locList = &HC
  locMoneyDecimal = &H16
  locMoneyThousands = &H17
  locNegative = &H51
  locPositive = &H50
  locThousands = &HF
  locTime = &H1E
End Enum

Public Property Get LocaleString(Info As LocaleStringConstants) _
 As String

  Dim nLocale As String
  Dim nLen As Long
  
  nLocale = Space$(10)
  nLen = GetLocaleInfo(GetUserDefaultLCID(), Info, nLocale, 10)
  LocaleString = Left$(nLocale, nLen - 1)
End Property

Modul modLocaleStrings (modLocaleStrings.bas - ca. 1 KB)


Artikel
Zum Download-Bereich dieses Artikel
Mail an den Autor dieses Artikels

KnowHow
Zur KnowHow-Übersicht

KnowHow-Themen
Themen - Allgemeines
Themen - Entwicklungsumgebung (VB-IDE)
Themen - Forms
Themen - Steuerelemente (Controls)
Themen - Grafik
Themen - Dateien
Themen - UserControls
Themen - Einsteiger-Tipps
Themen - Wussten Sie...?

Übersicht nach Titeln in alphabetischer Reihenfolge
Übersicht nach Erscheinungsdatum

Schnellsuche



Zum Seitenanfang

Copyright © 1999 - 2017 Harald M. Genauck, ip-pro gmbh  /  Impressum

Zum Seitenanfang

Zurück...

Zurück...

Download Internet Explorer