Visual Basic

Public Class BadgeHolder

    Implements INotifyPropertyChanged

    Public Event PropertyChanged As PropertyChangedEventHandler _
       Implements INotifyPropertyChanged.PropertyChanged

{blah, blah more class stuff ...}

Public Class FORM3

    Private Sub FORM3_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

        Me.BadgeHolderBindingSource.DataSource = BadgeHolder.FILL
        Me.DataGridView1.DataSource = Me.BadgeHolderBindingSource

        Me.TextBox1.DataBindings.Add("Text", Me.BadgeHolderBindingSource.DataSource, "LastName", False, _
            DataSourceUpdateMode.OnPropertyChanged)

    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim BHList As BindingList(Of BadgeHolder) = _
            CType(BadgeHolderBindingSource.DataSource, BindingList(Of BadgeHolder))

        BHList(0).LastName = "Smith"

    End Sub

End Class

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    Dim Browser As New WebBrowser
    TabControl1.TabPages.Add("New Tab")
    Browser.Name = "Web Browser"
    Browser.Dock = DockStyle.Fill
    TabControl1.SelectedTab.Controls.Add(Browser)
    AddHandler Browser.ProgressChanged, AddressOf Loading
    AddHandler Browser.DocumentCompleted, AddressOf Done
    Int = Int + 1
    CType(TabControl1.SelectedTab.Controls.Item(0), WebBrowser).Navigate(UrlLocation.Text)
End Sub

Private Sub OpenLinkInNewWindowToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OpenLinkInNewWindowToolStripMenuItem.Click

End Sub

Private Sub OpenLinkInNewTabToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OpenLinkInNewTabToolStripMenuItem.Click

End Sub

objProcess = New System.Diagnostics.Process()
objProcess.StartInfo.FileName = Application.StartupPath & "\MSDE2000\setup.exe"