Solved

Resize cancel

Posted on 1998-08-06
3
194 Views
Last Modified: 2010-05-03
I have written some code that when a form gets resized by the user, the controls on it are reorganized.
If the form gets to small that I can't reorganize the controls anymore I want to cancel the resize operation.
Is there anyone who knows how to cancel this operation?
0
Comment
Question by:ndb
  • 2
3 Comments
 
LVL 2

Expert Comment

by:swilt
ID: 1468096
This is a bit flickery, but it works

Private Sub Form_Resize()
   Static nWidth As Long, nHeight As Long
   
    If Me.Width < 3000 Or Me.Height < 3000 Then
        Me.Width = nWidth
        Me.Height = nHeight
    Else
        nWidth = Me.Width
        nHeight = Me.Height
    End If
End Sub
0
 
LVL 1

Author Comment

by:ndb
ID: 1468097
This doen't work. If I resize the form and come under the size I've sayd then the form stays at that size. 'till here it works but if the user continues resizing the form then he/she gets an error.
0
 
LVL 2

Accepted Solution

by:
swilt earned 50 total points
ID: 1468098
I could not reproduce any errors, try the following code.
Which line of code causes the error and what is the error

Private Sub Form_Resize()
    On Error Resume Next
   
    Static nWidth As Long, nHeight As Long
     
    If Me.Width < 3000 Or Me.Height < 3000 Then
        Me.Width = nWidth
        Me.Height = nHeight
    Else
        nWidth = Me.Width
        nHeight = Me.Height
    End If
End Sub

0

Featured Post

Is Your Active Directory as Secure as You Think?

More than 75% of all records are compromised because of the loss or theft of a privileged credential. Experts have been exploring Active Directory infrastructure to identify key threats and establish best practices for keeping data safe. Attend this month’s webinar to learn more.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

When trying to find the cause of a problem in VBA or VB6 it's often valuable to know what procedures were executed prior to the error. You can use the Call Stack for that but it is often inadequate because it may show procedures you aren't intereste…
Background What I'm presenting in this article is the result of 2 conditions in my work area: We have a SQL Server production environment but no development or test environment; andWe have an MS Access front end using tables in SQL Server but we a…
As developers, we are not limited to the functions provided by the VBA language. In addition, we can call the functions that are part of the Windows operating system. These functions are part of the Windows API (Application Programming Interface). U…
Get people started with the process of using Access VBA to control Outlook using automation, Microsoft Access can control other applications. An example is the ability to programmatically talk to Microsoft Outlook. Using automation, an Access applic…

911 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

15 Experts available now in Live!

Get 1:1 Help Now