Wait a minute. I was on the right track

Look here :

Code:
Private Sub Command1_Click()
Static iClicked As Integer
Dim sbut As String
iClicked = iClicked + 1
    Select Case iClicked
        Case 1
            sbut = "A"
        Case 2
            sbut = "B"
        Case 3
            sbut = "C"
        Case Is > 3
        iClicked = 0
    End Select
    
    Text1.Text = sbut
End Sub
If you were to use the same logic here for each button, it would work

Yes, some tweaking is still required, but the rough framework would be there.