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/
============================================