Coding the Batch Insert Form_Load() Procedure

See Also

Quick Tour

Batch Insert Form

The Batch Insert Form_Load() procedure sets the column headings for the grid. It looks like:

Private Sub Form_Load()

Grid1.Enabled = True

CurrRow = 0 'Top row

ReadRow = 0

ReadCol = 0

'Set column headings

Grid1.Row = CurrRow

Grid1.Col = 0

Grid1.Text = "Employee Number"

Grid1.Col = 1

Grid1.Text = "Employee Name"

Grid1.Col = 2

Grid1.Text = "Department Number"

NoOfCols = 3

CurrRow = CurrRow + 1

End Sub