showing the version number in a labels text

[The One]

I would like to know how I can show the version number of my program in the text
for a label on a windows form.

I'm not sure whether it is possible using visual basic standard 2002

any help would be greatly appreciated.

thanks.

[Cor]

Hi The One,

I would like to know how I can show the version number of my program in the text for a label on a windows form.

I'm not sure whether it is possible using visual basic standard 2002

I dont know that either, but I should not know why not.

Put this in your form
\\\
Dim meAssem As New AssemblyInfo
label=meAssem.Version
///
And this on the end of your assembly.vb
\\\
Public Class AssemblyInfo
Private myType As Type
Public Sub New()
myType = GetType(form1) ' assuming your main form is form1
End Sub
Public ReadOnly Property Version() As String
Get
Return myType.Assembly.GetName.Version.ToString()
End Get
End Property
End Class
///
I hope this helps a little bit?
Cor

[Fergus Cooney]

Hi One,

Here's a wee selection:

Dim S$

S$ = Application.ProductVersion

S$ = System.Diagnostics. _
FileVersionInfo.GetVersionInfo _
(Application.ExecutablePath).ProductVersion

S$ = System.Reflection. _
Assembly.GetExecutingAssembly.GetName().Version.To String

lblVersion.Text = S$

Regards,
Fergus

[Herfried K. Wagner [MVP]]

* "Fergus Cooney" <fi*****@post.com> scripsit:

Here's a wee selection:

Dim S$

^

*grrr*

--
Herfried K. Wagner
MVP · VB Classic, VB.NET
<http://www.mvps.org/dotnet>

[Fergus Cooney]

Hi Herfried,

*grrr*

ROFLMAO

I converted a QBasic program the other day and discovered just how retro
VB.NET really is - so few errors!!

I was just <waiting> for a time when I could use that old syntax in an
unimportant way. I was hoping you'd tell I couldn't use S$ but *grrr* is just
as funny. ;-))

Regards,
Fergus

[Herfried K. Wagner [MVP]]

* "Fergus Cooney" <fi*****@post.com> scripsit:

I converted a QBasic program the other day and discovered just how retro
VB.NET really is - so few errors!!

I was just <waiting> for a time when I could use that old syntax in an
unimportant way. I was hoping you'd tell I couldn't use S$ but *grrr* is just
as funny. ;-))

Some people would say that using type suffices is "bad practice".

;-)

--
Herfried K. Wagner
MVP · VB Classic, VB.NET
<http://www.mvps.org/dotnet>

[Fergus Cooney]

Hi Herfried,

|| Some people would say that using type suffices is "bad practice".

LOL, That's a mild version of what I thought you'd say. I think using $,
%, etc is awful - in a new program - but acceptable in legacy programs.

Regards,
Fergus

[Herfried K. Wagner [MVP]]

* "Fergus Cooney" <fi*****@post.com> scripsit:

Some people would say that using type suffices is "bad practice".

LOL, That's a mild version of what I thought you'd say. I think using $,
%, etc is awful - in a new program - but acceptable in legacy programs.

ACK.

--
Herfried K. Wagner
MVP · VB Classic, VB.NET
<http://www.mvps.org/dotnet>

[The One]

thanks for that it works fine.

"Cor" <no*@non.com> wrote in message
news:3f**********************@reader21.wxs.nl...

Hi The One,

I would like to know how I can show the version number of my program in

the text

for a label on a windows form.

I'm not sure whether it is possible using visual basic standard 2002

I dont know that either, but I should not know why not.

Put this in your form
\\\
Dim meAssem As New AssemblyInfo
label=meAssem.Version
///
And this on the end of your assembly.vb
\\\
Public Class AssemblyInfo
Private myType As Type
Public Sub New()
myType = GetType(form1) ' assuming your main form is form1
End Sub
Public ReadOnly Property Version() As String
Get
Return myType.Assembly.GetName.Version.ToString()
End Get
End Property
End Class
///
I hope this helps a little bit?
Cor