I have an ActiveX Control. and I want to resize it when you hit a button on it.

Currently what happens is that when I click the button, it take two clicks before it resizes. The first click it does nothing. On the second click the control resizes correctly.
once it's resized i only need to click it once again for it to size back to normal.

So assume it's width is 400 and the height is 400
when i click on it, i want to width to be 400 and the height to be 200. when i click the button again, it should size back to 400x400

i use this code with a command button for simplicity

Private Sub Command1_Click()
If UserControl.Height = 400 Then
Size 400, 200
Else: Size 400, 400
End If
End Sub

Any help would be appreciated. btw, how does one get teh VB to look like the code layout on the forum?