Paint
End Sub

Private Sub tmrClock_Timer()
   If (m_cSBar.PanelExists("CLOCK")) Then
      If (m_cSBar.PanelText("CLOCK") &lt;&gt; Format$(Now, "short time")) Then
         m_cSBar.PanelText("CLOCK") = Format$(Now, "short time")
      End If
   End If
End Sub
</pre><p>&#160;</p><p>&#160;</p><p>&#160;</p><p>&#160;</p><p>&#160;</p><p>&#160;</p></td><td class="rightbar" valign="top" bgcolor="#C2BEB1">
<!-- No right bar content currently defined -->
</td></tr><tr class="footer"><td></td>
<td>
<p class="center"