January 1, 2005

WinTask - GetSystemDefaultLangId

'
' GetSystemDefaultLangId
'
' Author: Joe Strazzere
'

' "kernel32" Alias "GetSystemDefaultLangID" () As Integer
'
a = External("kernel32","GetSystemDefaultLangID")
msgbox("The system default Language ID is :"+str$(a),,"GetSystemDefaultLangId")