I'm new to VB 6.0. I really don't know what is the easiest way to handle events, when window is resized by user. Please help.
Here is full form's text from VB, I want to execute
Public Sub formResize()
every time vhen window is resized

thanks


Option Explicit

Const BORDER = 120 'Bulgarian constant
Const MIN_WINDOW_SIZE = 4200 'too

Private Sub Form_Load()
Resize
rtbStatusList.Text = "30.11.2005 15:24:11 Papiermangel" + vbCr + "30.11.2005 16:55:00 Papierende" + vbCr + "30.11.2005 20:12:11 Keine Verbindung"
rtbStatusList.Text = rtbStatusList.Text + rtbStatusList.Text
rtbStatusList.Text = rtbStatusList.Text + rtbStatusList.Text
End Sub

Private Sub Resize()
On Error Resume Next
End Sub

Public Sub formResize()
Dim w As Integer
Dim h As Integer

w = ScaleWidth
h = ScaleHeight
If (w < MIN_WINDOW_SIZE) Then
w = MIN_WINDOW_SIZE
End If
If (h < MIN_WINDOW_SIZE) Then
h = MIN_WINDOW_SIZE
End If
fraCardInfo.Width = w - picCreditCard.Width - BORDER * 3
fraButtons.Width = w - picCreditCard.Width - BORDER * 3
picCreditCard.Left = w - picCreditCard.Width - BORDER
rtbStatusList.Width = w - BORDER * 2
rtbStatusList.Height = h - rtbStatusList.Top - BORDER
End Sub