remoteapptool/remoteapp-tool/RemoteAppAboutWindow.vb

20 lines
806 B
VB.net
Raw Normal View History

2019-09-29 12:45:23 +00:00
Imports System
Imports System.Reflection
Public Class RemoteAppAboutWindow
Private Sub RemoteAppAboutWindow_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Me.Text = "About " & My.Application.Info.Title
Me.TitleLabel.Text = My.Application.Info.Title
Me.VersionLabel.Text = "Version " & My.Application.Info.Version.ToString
End Sub
Private Sub SiteLinkLabel_LinkClicked(sender As Object, e As LinkLabelLinkClickedEventArgs) Handles SiteLinkLabel.LinkClicked
System.Diagnostics.Process.Start(SiteLinkLabel.Text)
2019-09-29 12:45:23 +00:00
End Sub
Private Sub IconLibLinkLabel_LinkClicked(sender As Object, e As LinkLabelLinkClickedEventArgs) Handles IconLibLinkLabel.LinkClicked
System.Diagnostics.Process.Start(IconLibLinkLabel.Text)
2019-09-29 12:45:23 +00:00
End Sub
End Class