�C�mo puedo saber en que Sistema Operativo estoy trabajando?

Abrimos VS .NET 2002 le damos Nuevo Proyecto, en Proyectos de Visual Basic

elegimos Aplicaci�n para Windows.

Agregamos un bot�n al formulario, le cambiamos el nombre del bot�n por cmdSO

y en el evento Click del bot�n colocamos es siguiente c�digo:

	MsgBox (Environment.OSVersion.Version.ToString)

Despu�s de colocar el c�digo quedar�a de la siguiente manera:

Private Sub cmdSO_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdSO.Click
        MsgBox(Environment.OSVersion.Version.ToString)
End Sub

�C�mo saber la ubicaci�n mi aplicaci�n?

Abrimos VS .NET 2002 le damos Nuevo Proyecto, en Proyectos de Visual Basic

elegimos Aplicaci�n para Windows.

Agregamos un bot�n al formulario, le cambiamos el nombre del bot�n por cmdUbicacion

y en el evento Click del bot�n colocamos es siguiente c�digo:

MsgBox(Application.ExecutablePath)

Despu�s de colocar el c�digo quedar�a de la siguiente manera:

Private Sub cmdUbicacion_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdUbicacion.Click
        MsgBox(Application.ExecutablePath)
End Sub

�C�mo determinar el tama�o de un archivo?

Abrimos VS .NET 2002 le damos Nuevo Proyecto, en Proyectos de Visual Basic

elegimos Aplicaci�n para Windows.

Agregamos un bot�n al formulario, le cambiamos el nombre del bot�n por cmdtama�o

y en el evento Click del bot�n colocamos es siguiente c�digo:

  Dim File As New System.IO.FileInfo("c:\winnt\notepad.exe")
        MsgBox(File.Length & " bytes")

Despu�s de colocar el c�digo quedar�a de la siguiente manera:

Private Sub cmdtama�o_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdtama�o.Click
        Dim File As New System.IO.FileInfo("c:\winnt\notepad.exe")
        MsgBox(File.Length & " bytes")
End Sub

�C�mo saber el nombre del equipo?

Abrimos VS .NET le damos Nuevo Proyecto, en Proyectos de Visual Basic

elegimos Aplicaci�n para Windows.

Agregamos un bot�n al formulario, le cambiamos el nombre del bot�n por cmdNamePc

y en el evento Click del bot�n colocamos es siguiente c�digo:

MsgBox(SystemInformation.ComputerName)

Despu�s de colocar el c�digo quedar�a de la siguiente manera:

Private Sub cmdNamePc_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdNamePc.Click
       MsgBox(SystemInformation.ComputerName)
End Sub

�C�mo saber que usuario esta Logeado actualmente en la PC?

Abrimos VS .NET le damos Nuevo Proyecto, en Proyectos de Visual Basic

elegimos Aplicaci�n para Windows.

Agregamos un bot�n al formulario, le cambiamos el nombre del bot�n por cmdUlogon

y en el evento Click del bot�n colocamos es siguiente c�digo:

 MsgBox(System.Environment.UserName)

Despu�s de colocar el c�digo quedar�a de la siguiente manera:

Private Sub cmdUlogon_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdUlogon.Click
       MsgBox(System.Environment.UserName)
End Sub

Fichero con el c�digo de ejemplo, (ar_FAQ.zip - 23,4 KB)