PSLine2000Documentation/Forms/HoldPartNumberForm.md

HoldPartNumberForm

---

Record Source

• None

Controls

Control Name	Reference
None	-

VBA Code

Option Compare Database   'Use database order for string comparisons

Private Sub Form_Load()
   DoCmd.Minimize
End Sub

Private Sub PartNumber_Change()
   DoCmd.Minimize
End Sub

What it does

VBA Code Description

Overview

This VBA code snippet is written in Access 2000/XP/Vista and appears to be part of a database application. It contains two event handlers, Form_Load and PartNumber_Change, which are triggered by specific events.

Form_Load Event Handler

---

**Description:** Triggers when the form is loaded.
**Purpose:** Minimizes the current form.

**Code:**
```vb
Option Compare Database   'Use database order for string comparisons

Private Sub Form_Load()
   DoCmd.Minimize
End Sub

• The Option Compare Database line specifies that string comparisons in this code should be performed using a database case-insensitive comparison rule.
• The Private Sub Form_Load() statement defines an event handler for the form's load event. When the form is loaded, the code inside this sub-procedure executes.
• Within the event handler, DoCmd.Minimize is called to minimize the current form.

PartNumber_Change Event Handler

---

**Description:** Triggers when the PartNumber field changes.
**Purpose:** Minimizes the current form.

**Code:**
```vb
Private Sub PartNumber_Change()
   DoCmd.Minimize
End Sub

• The Private Sub PartNumber_Change() statement defines an event handler for the change event of the PartNumber field.
• When the value in the PartNumber field changes, the code inside this sub-procedure executes.
• Within the event handler, DoCmd.Minimize is called to minimize the current form.

Common Pattern

Both event handlers call DoCmd.Minimize, which minimizes the current form. This suggests that minimizing the form might be a common or desired behavior in the application, and this code is used to achieve it when specific events occur.