frmabout.vb

VB.NET的Web浏览器IE7的克隆选项卡式浏览器 描述：这是一个例子写的vb.net浏览器使用的。 NET Framework 2.0 （ Visual Studio 2005中） 。这是一个

Imports System.IO
Public Class frmAbout

    Private Sub frmAbout_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        If File.Exists("C:\Program Files\Common Files\Microsoft Shared\MSInfo\msinfo32.exe") Then
            btnSysInfo.Visible = True
        Else
            btnSysInfo.Visible = False
        End If
        lblVersion.Text = Application.ProductVersion.ToString
    End Sub

    Private Sub btnOK_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnOK.Click
        Me.Close()
    End Sub

    Private Sub btnSysInfo_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSysInfo.Click
        If File.Exists("C:\Program Files\Common Files\Microsoft Shared\MSInfo\msinfo32.exe") Then
            Process.Start("C:\Program Files\Common Files\Microsoft Shared\MSInfo\msinfo32.exe")
            Me.Close()
        End If
    End Sub

End Class