Wrapping controls WithEvents in classes (2 Viewers)

Gasman said:
Can you review Page 45 please?
Are we talking about the form here, as at yet, there is nothing added to the new class?

This control class will require adding a new variable to clsFrm.
 Open clsFrm
 In the header of clsFrm ass the following line of code:
Private mclsCtlCboRecSel As clsCtlCboRecSel
 Compile and Save the class.
Click to expand...
Gasman, thanks for taking the time to actually do this stuff. You are going to be Head Master of Hogwarts real soon now, I promise.

Private WithEvents mcbo As ComboBox 'Dimension a combo box Withevents

Not text box withevents. Fixed in the book. And in the database.

This section is adding stuff into the new clsCtlRecSelSimple.

The idea is that I have txtRecPK which is bound to the PK of whatever table the form is working with. I really need to right now flesh out comments in the class as well as in the book which explains how this is all going to work. The very first thing i do is add the line in the form but... it can't compile yet because we haven't created (or at least saved) clsCtlRecSelSimple.

Sigh.

I will need to move the instructions to add that line into the form down below where we create clsRecSelSimple and save it.

THEN that new dim in the header of the form class will compile.

Even mad scientists screw up sometimes. <grin>

I'll fix it and push it out to a new pdf. It works in the database because I fixed it there, just not in the book.
 
@Gasman, What do you think about...

Part of the problem with writing is that I have to go back and do the same thing over and over throughout the book as I add new control wrappers. There are a ton of controls, not all of which will ever be used but some will. Which will???

As far as writing this thing, and getting the reader up to speed on this stuff, what do you think about me the author just creating empty classes, presenting them right up front in a little section, and then we can just open up an already existing control wrapper class as we get to it. The basics of any of these wrappers is a header, the Init and term events, an Init(lSomeControl as some control) method.
I could just write the class structure for each and every, compile it so that will happen, then paste it into the book. The reader could now just cut and paste each clsCtlWrapper, insert it into a class and save as the correct class name. Done, empty classes that exist, no compile errors because classes don't exist etc.

I just finished editing the control scanner (in Access) to add code in each and every control type. That stuff is also just cut and paste kinda stuff.

This stuff is tedious as an author, and no doubt as a reader.

Whatdayathink?
 
I think it is OK as it is. It helps towards understanding what goes where.
The only issue copying the code from the pdf is the extra text that gets in the way, like page numbers, and comments not concatenating, so become extra lines. Even had a AllowEdits state which failed the compile, but was actually the tail end of 'Restore the original

I am busy all day today, so will look more at the weekend, so you can take a break. :)
 
Gasman said:
I think it is OK as it is. It helps towards understanding what goes where.
The only issue copying the code from the pdf is the extra text that gets in the way, like page numbers, and comments not concatenating, so become extra lines. Even had a AllowEdits state which failed the compile, but was actually the tail end of 'Restore the original

I am busy all day today, so will look more at the weekend, so you can take a break. :)
Click to expand...
I have just spent an hour building out missing shell ctl classes, finding and replacing bad naming convention stuff etc.

Do you pull the latest of the pdf and the database from github as you start working with this? Again, I have to keep the book in sync with the db and VV. Any find and replace I do in the db I have to immediately go do in the book.
 
The book writing continues. I have gone through and corrected a bunch of naming conventions whackiness. Any time I do something in the db I have to go make the same corrections in the book. I have also created (in the db) shell classes for every control mentioned in my control scanner in clsFrm, and gotten it all compiling. That has not yet made it into the book.

@Gasman has been doing a terrific job of proof reading and actually doing stuff. Thanks @Gasman! If anyone else wants to start working through it and providing feedback that will also be appreciated.

As so often happens, I have to multi-task and so progress seems sporadic. But it is happening. @Gasman mentioned something a few posts ago I have to go find and fix. That is next.
 
john,

I'm kicking myself in the ass for not looking through your database that has literally been sitting in the corner of my desktop for about a year and a half. For the longest time I've never been able to wrap my head around using collections of classes to do various things. Woke up this morning with one of those AHA! moments and started testing. It's finally making some sense but I doubt I could readily explain it to anyone. I've had pilfered code that I could alter, but never really understood it. I think it was your Control scanner section that got me past the mental block. Thanks!

I've spent the last 4-5 hours working on some old code I had, converting it over to a class. My old code was limited due to the difficulties of dealing with multiple types of controls but I think this may do the trick. So far everything thing has worked perfectly.

I'm going to revisit some of my old classes too.
 
moke123 said:
john,

I'm kicking myself in the ass for not looking through your database that has literally been sitting in the corner of my desktop for about a year and a half. For the longest time I've never been able to wrap my head around using collections of classes to do various things. Woke up this morning with one of those AHA! moments and started testing. It's finally making some sense but I doubt I could readily explain it to anyone. I've had pilfered code that I could alter, but never really understood it. I think it was your Control scanner section that got me past the mental block. Thanks!

I've spent the last 4-5 hours working on some old code I had, converting it over to a class. My old code was limited due to the difficulties of dealing with multiple types of controls but I think this may do the trick. So far everything thing has worked perfectly.

I'm going to revisit some of my old classes too.
Click to expand...
LOL, I am with ya on all that. It took me literally a year and three trips back to the well (Shamil) to finally get classes and events. When it finally clicked I went to town. It is precisely that experience that drives me to get this book out and my Blog updated. I am replacing Shamil in 2025 in this Access class / events . Apologies to Shamil for claiming to replace him...

Shamil is still out there. I see him on LinkedIn.

Do yourself a favor and pull the the latest pdf and the database from github. Go to my blog and look for:

The book Event Driven Programming in VBA on GitHub. It has three links, of which only the book and the main database are necessary.
 
@Gasman, I have performed the updates you mentioned and a little more. I added a section to the new controls to "add the control to the clsFrm" which essentially goes through the process of adding that section into the control scanner. I will do this for every new control just because it needs doing of course. Additionally I added the global variable in clsFrm for the clsCltRecSelSimple.

The TOC has been updated, the PDF has been exported, the PDF and the database have been pushed to GitHub.

TFAYD!!!
 
I don't know if I mentioned it but I am now also pushing the LibreOffice book itself to a private GitHub repository every now and then.

I don't really know more than the GitHub basics but I know enough to get my stuff off my computer in case of disaster.
 
@jwcolby54
OK, we might have a problem here.
I got as far as
Code: 
Private Sub mfrm_Current()
    FrmSyncRecSel
End Sub
which is at the top of page 51.
Has anything changed up until there? as the class was called clsCtlCboRecSel

Now Private mclsCtlCboRecSel As clsCtlCboRecSel appears tohave changed to Private mclsCtlRecSelSimple As clsCtlRecSelSimple ?
 
Gasman said:
@jwcolby54
OK, we might have a problem here.
I got as far as
Code: 
Private Sub mfrm_Current()
    FrmSyncRecSel
End Sub
which is at the top of page 51.
Has anything changed up until there? as the class was called clsCtlCboRecSel

Now Private mclsCtlCboRecSel As clsCtlCboRecSel appears tohave changed to Private mclsCtlRecSelSimple As clsCtlRecSelSimple ?
Click to expand...
Yes, and given that I'd need to change the book... we will keep it that. Are you working off the latest pdf? AFAICT it is all working in the db. And AFAICT it is all correct in the book?
 
BTW if you download the latest db (as of this morning), look in the forms for a new frmTestEditField. Open that. Double click on any of the text fields. A new form called frmLongDataEntry will open allowing you to edit whatever text box you double clicked on back in frmTestEditField. Change the contents of the field and close the form. The changes should be back in the text control that you dbl-clicked on.

This is something that a client actually needed. It neatly demonstrates a PreDeclared class (clsMsgPD), raising events (clsMsgPD), Sinking those events in a form (frmLongDataEntry), and passing an object when raising an event (frmLongDataEntry) coercing that variant into a text control.

A LOT of cool stuff IMHO.
 
Last edited:
I play the bass in my church praise team. I gotta go right now to get set up, practice with the band and then play in the 11:00 am service. After that I have to move my RV from the church parking lot back to my driveway and take my truck down to Walmart for a curbside pickup. Home from Walmart and back in the writing business about 2pm?

BTW I am taking my daughter Allie camping at Bandit's Roost campground for 4 nights. It is close by and I will be available for a fair amount of time for writing.

Around fishing with Allie of course. Or should I say "Feeding worms to the fishes"? We are not particularly successful at actually catching the fish.
 
I have downloaded the latest pdf and db.
In the pdf on page 51, I have confliicting instructions?

I can guess which it should be, but it is still conflicting?
Also we seem to have different naming conventions for Init?
We have Init, mInit and fInit. fInit does not exist?

.Name will not compile as no with?, you need to use Ctl.Name.

I think it would be easier if you took code from the DB that does compile and put back into the PDF?

1748177397770.png
 

Attachments

  • 1748176825038.png
    1748176825038.png
    23.1 KB · Views: 9
Last edited:
You must log in or register to reply here.

Similar threads

C
WithEvents subform
Replies
4
Views
539
ClaraBarton
C
isladogs
Access Europe User Group - Wed 2 Apr: Class Modules: How, Why and When To Use Them in the Real World (Anders Ebro)
Replies
2
Views
361
isladogs
isladogs
isladogs
Access Europe - Wed 7 May: Update, update, the company is in a state (Karl Donaubauer)
Replies
2
Views
332
isladogs
isladogs
isladogs
Access Europe User Group - Wed 5 Feb: Using VBE_Extras add-in with Access (John Mallinson)
Replies
1
Views
209
isladogs
isladogs
K
Need some advice on a simple Class
2
Replies
27
Views
1,107
KitaYama
K

Users who are viewing this thread

Total: 3 (members: 0, guests: 3)
Back
Top Bottom