Microsoft KB Archive/180527

= BUG: Setting WindowState = 0 Doesn't Set Window State to Normal =

Article ID: 180527

Article Last Modified on 3/11/2005

-

APPLIES TO


 * Microsoft eMbedded Visual Basic 3.0
 * Microsoft Windows CE Toolkit for Visual Basic 6.0

-



This article was previously published under Q180527



SYMPTOMS
Setting the WindowState property of a form to '0 - Normal' has no effect.



RESOLUTION
Save the form's height and width before changing the WindowState property (such as Maximizing), and then restore the height and width when desired as follows: Option Explicit Dim FormHeight Dim FormWidth

Private Sub Form_Load 'initialize form size, could be set at design-time also. Form1.height = 2000 Form1.width = 3000 'Save the form's height and width. FormHeight = Form1.Height FormWidth = Form1.Width Command1.Caption = "Maximized" Command2.Caption = "Normal" End Sub

Private Sub Command1_Click Form1.WindowState = 2 'Maximized End Sub

Private Sub Command2_Click 'Restore the form's original height and width. Form1.Height = FormHeight Form1.Width = FormWidth End Sub



STATUS
Microsoft has confirmed that this is a problem in the Microsoft products that are listed at the beginning of this article.



Steps to Reproduce Behavior
 Start a new Windows CE HPC Pro Project in either eMbedded Visual Basic or Visual Basic 6.0. Form1 is created by default. Add two command buttons to Form1, placing them in the upper-left-hand corner of the form so they will be visible when the form is resized by the Load event of the form.  Paste the following code into Form1: Private Sub Form_Load Command1.Caption = "Maximized" Command2.Caption = "Normal" 'initialize form size, could be set at design-time also. Form1.height = 2000 Form1.width = 3000 End Sub

Private Sub Command1_Click Form1.WindowState = 2 'Maximized End Sub

Private Sub Command2_Click Form1.WindowState = 0 'Normal End Sub  Press F5 to run the project. Click on Command1 and note that the form is maximized. Click on Command2 and note that the window does not return to its normal state.</li></ol>

Additional query words: wince vbce vbce6 evb

Keywords: kbbug kbtoolkit kbpending KB180527

-

[mailto:TECHNET@MICROSOFT.COM Send feedback to Microsoft]

© Microsoft Corporation. All rights reserved.