VB To Increase Record Update By 1

I have a form with multiple fields on it. We will call them SLO

They are text boxes and there are 6 of them named SLO1, SLO2.....SLO6

What I want to do, is use VB to update each as a string to a table individually. But Id like to only type the code once, and use a DO WHILE and increase the value by one. Example.

Current Code looks like this:

Private Sub UpdateButton_Click()
Set rstNewInventoryDataRecord = CurrentDb.OpenRecordset("Select * FROM MetricData")
Set CurrentForm = Screen.ActiveForm
Dim Counter As Integer
Counter = 1
rstNewInventoryDataRecord.AddNew
rstNewInventoryDataRecord.SLO = CurrentForm.SLOT1.Caption
rstNewInventoryDataRecord.Update
MsgBox "Update Complete"
End Sub

What I want to do is use the counter to increase by one after each loop and stop after 6. So...Do while Counter < 7

And increase the CurrentForm.SLOT1.Caption by one each time.

I've tried

rstNewInventoryDataRecord.SLO = CurrentForm.SLOT & Counter.Caption
and
rstNewInventoryDataRecord.SLO = CurrentForm."SLOT" & Counter.Caption

As well as a few other ideas all to no avail. Is this possible?