Want to protect your cyber security and still get fast solutions? Ask a secure question today.Go Premium

x
?
Solved

Prevent checkbox click event occur while editing it in vb6

Posted on 2016-11-07
8
Medium Priority
?
162 Views
Last Modified: 2016-11-07
When we fill our checkbox of our vb6 form when loading, the events are trigger and all the instructions of the event begins.

The code is for when a user checks on it, it saves to a table:

Private Sub Form_Load()
 check1.value=sql value saved previously
End Sub

Open in new window


Private Sub check1_Click()
 sql instruction save the state of the variable...
End Sub

Open in new window


However, before the screen is display, we read the table and set the checkbox according of what has been saved previously.  This trigger the "click" events and freezes the apps.

How can we set the checkbox without triggering the events?
0
Comment
Question by:rayluvs
  • 5
  • 3
8 Comments
 
LVL 50

Accepted Solution

by:
Martin Liss earned 2000 total points
ID: 41877590
Create a Boolean variable, set it to True when editing and False when done, and in the editing routing query the value of the Boolean and exit if True.
0
 
LVL 50

Expert Comment

by:Martin Liss
ID: 41877599
That should be routine and not routing.
0
 

Author Comment

by:rayluvs
ID: 41877622
Can you give an example?
0
Independent Software Vendors: We Want Your Opinion

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

 
LVL 50

Assisted Solution

by:Martin Liss
Martin Liss earned 2000 total points
ID: 41877789
Sure. Click a check box, click the "Start Edit Mode" button and then click the same or the other checkbox. Click the "End Edit Mode" button and click a checkxox.
28981520.zip
0
 

Author Comment

by:rayluvs
ID: 41877847
We modified your code to present our problem.

We added 2 checkbox Check2 & check3

When the apps load, it sets the values in Check2 & check3 which causes the events of each click to be triggered.

What we want that when setting in form load, the events be disabled.

Set the stops at the check licks and you will see what we mean.

checkbox
0
 
LVL 50

Expert Comment

by:Martin Liss
ID: 41877856
Add mbEditing = True right before Check2.Value = 1 in Form_Load.
0
 

Author Comment

by:rayluvs
ID: 41877873
Yes, it worked!  Su[er obvious and didn't see it!

Thanx!
0
 
LVL 50

Expert Comment

by:Martin Liss
ID: 41877877
You're welcome and I'm glad I was able to help.

If you expand the “Full Biography” section of my profile you'll find links to some articles I've written that may interest you.

Marty - Microsoft MVP 2009 to 2016
              Experts Exchange MVE 2015
              Experts Exchange Top Expert Visual Basic Classic 2012 to 2015
0

Featured Post

What does it mean to be "Always On"?

Is your cloud always on? With an Always On cloud you won't have to worry about downtime for maintenance or software application code updates, ensuring that your bottom line isn't affected.

Question has a verified solution.

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

This article describes how to use a set of graphical playing cards to create a Draw Poker game in Excel or VB6.
We live in a world of interfaces like the one in the title picture. VBA also allows to use interfaces which offers a lot of possibilities. This article describes how to use interfaces in VBA and how to work around their bugs.
Get people started with the process of using Access VBA to control Excel using automation, Microsoft Access can control other applications. An example is the ability to programmatically talk to Excel. Using automation, an Access application can laun…
Show developers how to use a criteria form to limit the data that appears on an Access report. It is a common requirement that users can specify the criteria for a report at runtime. The easiest way to accomplish this is using a criteria form that a…
Suggested Courses

572 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