VB Code:
  1. StatusBarPanel1.Icon = New Icon("sample.ico")
provided that sample.ico is in your bin folder