Visual Basic 6 - Gioco del Tokio (aiuto)

Conoscete quel gioco di dadi che si kiama tokio???
si lanciano 2 dadi e bisogna fare + dell'altro e se si fa meno si può dire una bugia...
se viene 21 è tokio..
(non conta l'ordine dei dadi si mette il numero + grande davanti...)

stò cercando di fare una cosa del genere... ma non sò kome fare a mettere il numero maggiore davanti...

Randomize
Dim Minimo As Integer
Dim Massimo As Integer
Dim gce As Single
Minimo = 11
Massimo = 66
'Estrazione
gce = Int((Massimo - Minimo + 1) * Rnd) + Minimo
ttiro.Text = gce
Tira.Enabled = False

'il pc ci crede sempre e tira!
Randomize
Dim pcn As Single 'dichiarazione di variabile
'Estrazione Pc
pcn = Int((Massimo - Minimo + 1) * Rnd) + Minimo
'e poi decide se dichiarare il falso...
'cioè se fa meno di tè prende il  tuo puntiggio e ci aggiunge 0 o 1 o 2
If pcn < gce Then
pcdk = Int(gce + Rnd * 2)
Else
pcdk = pcn
End If
'verificare le coppie... (incompleto)
cpvr = gce Mod 11

'e se viene meno di tokio? il pc dikiara tokio!
If gce = 21 Or gce = 12 Then
pcdk = 21
End If

pcdic.Text = pcdk 'quello ke il pc dichiara

kome fare a mettere il numero maggiore davanti...

Se intendi far diventare 25 > 52

If Left(gce, 1) < Right(gce, 1) Then

gce = Right(gce, 1) & Left(gce, 1)

End If