Mega Code Archive

 
Categories / VB.Net Tutorial / GUI
 

Use HelpProvider to launch a web page

Imports System.Drawing Imports System.Drawing.Drawing2D Imports System.Windows.Forms public class HelpProviderWebPage    public Shared Sub Main         Application.Run(New Form1)    End Sub End class <Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _ Partial Class Form1     Inherits System.Windows.Forms.Form     'Form overrides dispose to clean up the component list.     <System.Diagnostics.DebuggerNonUserCode()> _     Protected Overrides Sub Dispose(ByVal disposing As Boolean)         If disposing AndAlso components IsNot Nothing Then             components.Dispose()         End If         MyBase.Dispose(disposing)     End Sub     'Required by the Windows Form Designer     Private components As System.ComponentModel.IContainer     'NOTE: The following procedure is required by the Windows Form Designer     'It can be modified using the Windows Form Designer.       'Do not modify it using the code editor.     <System.Diagnostics.DebuggerStepThrough()> _     Private Sub InitializeComponent()         Me.Button1 = New System.Windows.Forms.Button         Me.HelpProvider1 = New System.Windows.Forms.HelpProvider         Me.Button2 = New System.Windows.Forms.Button         Me.CheckBox1 = New System.Windows.Forms.CheckBox         Me.CheckBox2 = New System.Windows.Forms.CheckBox         Me.SuspendLayout()         '         'Button1         '         Me.HelpProvider1.SetHelpString(Me.Button1, "This is a button.")         Me.Button1.Location = New System.Drawing.Point(112, 72)         Me.Button1.Name = "Button1"         Me.HelpProvider1.SetShowHelp(Me.Button1, True)         Me.Button1.Size = New System.Drawing.Size(80, 24)         Me.Button1.TabIndex = 0         Me.Button1.Text = "OK"         Me.Button1.UseVisualStyleBackColor = True         '         'HelpProvider1         '         Me.HelpProvider1.HelpNamespace = "http://www.rntsoft.com"         '         'Button2         '         Me.HelpProvider1.SetHelpString(Me.Button2, "This is a button.")         Me.Button2.Location = New System.Drawing.Point(200, 72)         Me.Button2.Name = "Button2"         Me.HelpProvider1.SetShowHelp(Me.Button2, True)         Me.Button2.Size = New System.Drawing.Size(80, 24)         Me.Button2.TabIndex = 1         Me.Button2.Text = "Cancel"         Me.Button2.UseVisualStyleBackColor = True         '         'CheckBox1         '         Me.CheckBox1.AutoSize = True         Me.CheckBox1.Location = New System.Drawing.Point(8, 16)         Me.CheckBox1.Name = "CheckBox1"         Me.HelpProvider1.SetShowHelp(Me.CheckBox1, True)         Me.CheckBox1.Size = New System.Drawing.Size(270, 17)         Me.CheckBox1.TabIndex = 3         Me.CheckBox1.Text = "Start application automatically when Windows starts"         Me.CheckBox1.UseVisualStyleBackColor = True         '         'CheckBox2         '         Me.CheckBox2.AutoSize = True         Me.CheckBox2.Location = New System.Drawing.Point(8, 40)         Me.CheckBox2.Name = "CheckBox2"         Me.CheckBox2.Size = New System.Drawing.Size(142, 17)         Me.CheckBox2.TabIndex = 4         Me.CheckBox2.Text = "Show icon in system tray"         Me.CheckBox2.UseVisualStyleBackColor = True         '         'Form1         '         Me.AcceptButton = Me.Button1         Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)         Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font         Me.ClientSize = New System.Drawing.Size(292, 107)         Me.Controls.Add(Me.CheckBox2)         Me.Controls.Add(Me.CheckBox1)         Me.Controls.Add(Me.Button2)         Me.Controls.Add(Me.Button1)         Me.HelpButton = True         Me.MaximizeBox = False         Me.MinimizeBox = False         Me.Name = "Form1"         Me.Text = "Application Configuration"         Me.ResumeLayout(False)         Me.PerformLayout()     End Sub     Friend WithEvents Button1 As System.Windows.Forms.Button     Friend WithEvents HelpProvider1 As System.Windows.Forms.HelpProvider     Friend WithEvents Button2 As System.Windows.Forms.Button     Friend WithEvents CheckBox1 As System.Windows.Forms.CheckBox     Friend WithEvents CheckBox2 As System.Windows.Forms.CheckBox End Class