Public Class Form1
    Inherits System.Windows.Forms.Form
    Public Shared MainForm As Form1' Musst Du eingeben!
 
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As _
      System.EventArgs) Handles MyBase.Load
 
        StatusBar1.Panels(0).Text = "Feld1"
 
        MainForm = Me ' Musst Du auch eingeben!
 
 
    End Sub
 
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As _
      System.EventArgs) Handles Button1.Click
 
        Dim form2 As New Form2
 
        form2.Show()
 
    End Sub
 
End Class

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As _
      System.EventArgs) Handles Button2.Click
 
        Form1.MainForm.StatusBar1.Panels(0).Text = "Freitag"
        Form1.MainForm.StatusBar1.Refresh()
 
    End Sub