Visual Basic - Ayuda

Hola.
Soy un completo neófito en VB. Aunque he leído algo, todavía no comprendo el lenguaje.
Mi problema es: Tengo cuatro versos distintos para una cuarteta. Quiero "randomizar" sus posiciones en la cuarteta cada vez que se pulse un botón (4 versos, son 24 cuartetas distintas). ¿Alguna idea de cómo hacerlo, la referencia a algún código que ya lo hace y que pueda estudiar?
Gracias.
Neodimio

Si en un form añades tres cajas de texto y un boton puede ser algo así

Private Sub Command1_Click()
Dim verso1 As Integer, verso2 As Integer, verso3 As Integer, verso4 As Integer
Dim verso(4) As String
verso(0) = "Verso uno"
verso(1) = "Verso dos"
verso(2) = "Verso tres"
verso(3) = "Verso cuatro"
verso1 = Int(Rnd * 4)
verso2 = Int(Rnd * 4)
verso3 = Int(Rnd * 4)
verso4 = Int(Rnd * 4)
Do Until verso1 <> verso2
verso2 = Int(Rnd * 4)
Loop

Do Until verso3 <> verso2 And verso3 <> verso1
verso3 = Int(Rnd * 4)
Loop

Do Until verso4 <> verso3 And verso4 <> verso2 And verso4 <> verso1
verso4 = Int(Rnd * 4)
Loop
Text1 = verso(verso1)
Text2 = verso(verso2)
Text3 = verso(verso3)
Text4 = verso(verso4)

End Sub