Imports System
Imports System.Collections.Generic
Imports System.ComponentModel
Imports System.Data
Imports System.Drawing
Imports System.Linq
Imports System.Text
Imports System.Threading.Tasks
Imports System.Windows.Forms
' make sure that using System.Diagnostics; is included
Imports System.Diagnostics
' make sure that using System.Security.Principal; is included
Imports System.Security.Principal
' make sure that using System.Runtime.InteropServices; is included
Imports System.Runtime.InteropServices
' make sure that using System.Reflection; is included
Imports System.Reflection
Public Class Form1
<DllImport("shell32.dll")> _
Private Shared Function ShellAbout(hWnd As IntPtr, szApp As String, szOtherStuff As String, hIcon As IntPtr) As Integer
End Function
Public Sub New()
MyBase.New()
InitializeComponent()
End Sub
Private Sub button1_Click(sender As Object, e As EventArgs) Handles button1.Click
ShellAbout(Me.Handle, "AppName " & Assembly.GetExecutingAssembly().GetName().Version.ToString(), "", IntPtr.Zero)
End Sub
End Class
No comments:
Post a Comment