Code development platform for open source projects from the European Union institutions

Skip to content
Snippets Groups Projects
Commit f1fb4be2 authored by Michael KRISPER's avatar Michael KRISPER
Browse files

AboutBox: Now shows the .net version for older frameworks also...

AboutBox: Now shows the .net version for older frameworks also (RuntimeInformation was only added with 4.7, and previously Environment.Version was used)
parent ed8c3911
No related branches found
No related tags found
No related merge requests found
......@@ -15,7 +15,11 @@ Imports TUGraz.VectoCore.Utils
''' </summary>
Public Class AboutBox
Private Sub F10_AboutBox_Load(sender As Object, e As EventArgs) Handles MyBase.Load
#If NET47_OR_GREATER Or NET5_0_OR_GREATER Then
Text = "VECTO " & VECTOvers & " / VectoCore" & VectoSimulationCore.BranchSuffix & " " & COREvers & " / " & Runtime.InteropServices.RuntimeInformation.FrameworkDescription
#Else
Text = "VECTO " & VECTOvers & " / VectoCore" & VectoSimulationCore.BranchSuffix & " " & COREvers & " / .NET Framework " & If(Environment.Version.Revision < 42000, "4.5", "4.6")
#End If
End Sub
Private Sub LinkLabel1_LinkClicked_1(sender As Object, e As LinkLabelLinkClickedEventArgs) _
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment