Resumen Consultar Versión y revisión de windows

Hola,

Aquí tienes un poco de código:

---xxx---
Private Sub mnuAcercaDe_Click()
    'mostrar la información del programa, versión, etc.
    Dim sMsg As String
    With App
        sMsg = vbCrLf
        sMsg = sMsg & .EXEName
    sMsg = sMsg & " v" & Format$(.Major, "00") & "."
        sMsg = sMsg & Format$(.Minor, "00") & "."
        sMsg = sMsg & Format$(.Revision, "0000") & vbCrLf & vbCrLf
        sMsg = sMsg & .FileDescription & vbCrLf
        sMsg = sMsg & .Comments & vbCrLf & vbCrLf
        sMsg = sMsg & .LegalCopyright & vbCrLf & vbCrLf
        sMsg = sMsg & .ProductName
    End With
    MsgBox sMsg, vbInformation, "Acerca de..."
End Sub
---xxx---
Lo he puesto en tantas líneas para que se vea más claro.

Nos vemos.
Guillermo

---
> From: "Eduardo Pérez Oliva" <edy@mail.sybcom.com>
> To: "VB-Esp" <vb-esp@ccc.uba.ar>
> Subject: (VB-ESP) Consultar Versión y revisión
> Date: Thu, 22 May 1997 10:42:14 -0600
> Reply-to: vb-esp@ccc.uba.ar

> Como puedo acceder a los datos de versión y revisio del programa para
> desplegarlo en el Acerca de de mi programa ?
>
> Gracias.
>
> ===========================================================
>
> Sr. Eduardo S. Pérez Oliva
> Sistemas Integrados de Computación.
> Cancun Q.Roo. México.
>
============================================
Si quieres trucos, listados y mucho más para
Visual Basic, HTML (VBScript, JavaScript...)
los encontrarás en:
http://www.wcostasol.es/guiller/indice.htm
=------------------------------------------=
Visual Basic Online en español (castellano)
http://wcostasol.es/vbonline/
============================================



Resumen Resumen

Visual Basic Página de Visual Basic

Página principal Página principal

www.jrubi.com