5 Preguntas frecuentes en VB .NET
 

Fecha: 16/Julio/2003 (17/Jul/2003)

Autor: Angel Enrique Ruiz Pastor (Vzla), aruiz1979@hotmail.com

 

.

 
¿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

ir al índice

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