>I am trying to pass an array of textboxes. What am I doing wrong...
>

>Sub changetextcolor(textboxname() As TextBox)
>     textboxname(1).BackColor = RGB(255, 0, 0)
>    textboxname(2).BackColor = RGB(0, 255, 0)
>End Sub
>Private Sub Command1_Click()
>    Dim txtbxs(2) As TextBox
>    txtbxs(0) = Me.Text1
>    txtbxs(1) = Me.Text2
>    Call changetextcolor(txtbxs())
>End Sub
>

You need to assign the object reference to your txtbxs array using the "Set" command. Also a minor bug in that your array elements don't match.

Sub changetextcolor(textboxname() As TextBox)
    textboxname(0).BackColor = RGB(255, 0, 0)
    textboxname(1).BackColor = RGB(0, 255, 0)
End Sub
Private Sub Command1_Click()
    Dim txtbxs(2) As TextBox
    Set txtbxs(0) = Me.Text1
    Set txtbxs(1) = Me.Text2
    Call changetextcolor(txtbxs())
End Sub