by Jonathan Halder | Mar 5, 2025 | Blogging, MS Access, MS Access VBA Coding, TDD
Today I was refactoring some tests to make them easier to write for my application. In this application, I am testing lines on a subform to make sure they have the correct values. I used a class I created called a FormGetter which uses an interface so I can create a...
by Jonathan Halder | Mar 4, 2025 | Blogging, MS Access, MS Access VBA Coding
Today’s adventure was helping a customer who had moved from an on premise Exchange server at their business to Microsoft 365 email accounts in the cloud. They needed to update their Access application with the new email settings. As I dove into the code, I found...
by Jonathan Halder | Feb 26, 2025 | Blogging, MS Access, MS Access Forms, MS Access VBA Coding, TDD
This is a very basic set of 2 classes to produce a CustomTags object that can take an Access Control object from a form and store an internal dictionary intended to use string keys to store string values for that tag. The ControlTags and ControlTag currently use early...
by Jonathan Halder | Feb 25, 2025 | Blogging, MS Access, MS Access Forms, MS Access VBA Coding, TDD
Ok, so to use test driven development here, I will start writing tests to describe the behaviors of the control I want and then code to make the tests pass. I copied the code from the module from last time with the TestCustomTags Sub to a new Test module I created...
by Jonathan Halder | Feb 24, 2025 | Blogging, MS Access, MS Access Queries, MS Access VBA Coding
Today one of my customers ran into a problem with my coding of a system meant to group related lines together on a purchase order. There are estimating details that contain an affiliation number for grouping lines together. They are unique per phase number. These need...
by Jonathan Halder | Feb 21, 2025 | Blogging, MS Access, MS Access Forms, MS Access VBA Coding
So I’m doing some proof of concept here. I want to use a starting syntax like the following in the Debug.Print line: Public Sub TestCustomTags() Dim testCT As CustomTags Set testCT = New CustomTags Dim ctl As Access.Control Set ctl = Form_TestForm.TestControl...
