Yes, that's what I have: 10 texts on Form1, and 2 combos on Form2. The first code that I got from David did work in it's own application, but not in mine. I have the button to open Form2 (combo boxes) on another form (I only hide this third form). When the exchange is done, it goes back to the third form. There are also list indexes that I exchange on that form (It works). The second form might hide, if the user selects close when they close it, it hides. The user might select the "x" instead, though, which unloads the form. Your way works in a seperate program, too, but not in mine. I am not ready to post my project, but maybe my little extra explanations here about what you seem to not understand will help.
But here's some more code. Here's in my Public Sub Exchange() Sub. This is to exchange the list indexes on the third form that I was talking about:
VB Code:
  1. 'If Details are being moved, then call
  2.     If chkMoveDetails.Value = True Then
  3.         Call MoveDetails
  4.     ElseIf chkMoveDetails.Value = False Then
  5.         'Take no effect
  6.     End If
I only want the textboxes (details) exchanging if the user has checked a checkbox checked (It's called chkMoveDetails).
VB Code:
  1. Public Sub MoveDetails()
  2.     Dim DetailsExchangeSpace As String
  3.     frmDetails.Show
  4.     frmDetails.txtDetails(0).Visible = True
  5.     frmDetails.txtDetails(1).Visible = True
  6.     frmDetails.txtDetails(2).Visible = True
  7.     frmDetails.txtDetails(3).Visible = True
  8.     frmDetails.txtDetails(4).Visible = True
  9.     frmDetails.txtDetails(5).Visible = True
  10.     frmDetails.txtDetails(6).Visible = True
  11.     frmDetails.txtDetails(7).Visible = True
  12.     frmDetails.txtDetails(8).Visible = True
  13.     frmDetails.txtDetails(9).Visible = True
  14.     frmDetails.Hide
  15.     DetailsExchange = frmDetails.txtDetails(cboExchange.ListIndex)
  16.     frmDetails.txtDetails(cboExchange.ListIndex) = txtDetails(cboExchange.ListIndex)
  17.     frmDetails.txtDetails(cboWith.ListIndex) = DetailsExchange
  18. End Sub
frmDetails is the form with my textbox array on it. txtDetails is the textbox array.