2.0 KiB
2.0 KiB
CNCDefinitions
Record Source
Controls
Control Name | Reference |
---|---|
MachineName | MachineName (from Queries/MachinesQ1) |
CycleTime | CycleTime (from Queries/MachinesQ1) |
Field4 | Tool (from Queries/MachinesQ1) |
Field4 (Row Source) | |
Field9 | Prime (from Queries/MachinesQ1) |
Field9 (Row Source) |
VBA Code
Option Compare Database 'Use database order for string comparisons
Private Sub Field4_DblClick(Cancel As Integer)
Me!Tool = "STD"
Refresh
End Sub
Private Sub Field9_DblClick(Cancel As Integer)
Me!Prime = Not (Me!Prime)
Refresh
End Sub
What it does
VBA Code Description
Overview
This VBA code snippet is part of an Excel add-in, responsible for handling double-click events on two specific fields: Field4
and Field9
.
Field4_DblClick Event Handler
Purpose
When the user double-clicks on a cell containing data in Field4
, this event handler is triggered.
Actions
- Set Tool Value: The code sets the value of
Me!Tool
to the string "STD". - Refresh: After setting the tool value, the add-in calls the
Refresh
method to update the display with the new tool value.
Field9_DblClick Event Handler
Purpose
When the user double-clicks on a cell containing data in Field9
, this event handler is triggered.
Actions
- Toggle Prime Value: The code toggles the value of
Me!Prime
by using the bitwise NOT operator (Not
). IfMe!Prime
is currently set, it will be reset toFalse
, and vice versa. - Refresh: After toggling the prime value, the add-in calls the
Refresh
method to update the display with the new prime value.
Comparison Context
The first line in each code snippet (Option Compare Database
) specifies that string comparisons should be performed using database order. This is a VBA option that ensures case-insensitive and locale-aware string comparisons.