VB6 tiene una clase que te permite obtener cierta información cuando la llamas desde un control activeX, pero las funciones las exporta con normalidad en su DLL... Así pues se puede obtener el LocaleID llamando a una función de MSVBVM60

Private Declare Function rtcGetHostLCID Lib "MSVBVM60" () As Long
 
Private Sub Form_Load()
   MsgBox rtcGetHostLCID
End Sub

No tiene ningún misterio, pero no la había visto en ningún lado.

Saludos