Visual Basic - Comom saber que sistema operativo ?

Necestio saber como hacer para que el sistema sepa que sistema operativo esta instalado en la pc. Es para crear un archivo de texto en alguna carpeta dentro de Windows o WinNT, para que los usuarios no sepan donde esta!!! Si alguien saber le agradeceria su ayuda, gracias!!!!

SABER LA VERSION DE WINDOWS

Private Declare Function GetVersion Lib "kernel32" () As Long

Public Function GetWinVersion() As String
Dim Ver As Long, WinVer As Long
Ver = GetVersion()
WinVer = Ver And &HFFFF&
'retrieve the windows version
GetWinVersion = Format((WinVer Mod 256) + ((WinVer \ 256) / 100), "Fixed")
End Function

Private Sub Form_Load()
MsgBox "Windows version: " + GetWinVersion
End Sub

Muy buena-