[VB6] Errore in uscita da form modale

[erosmax]

Allora, una delle tanti:

FORM1:

If Sex = 3 And nuovo = 0 Then
    GirlN = "JENNY"
    GirlN.Refresh
    BoxCh(0).Visible = False
    BoxCh(1).Visible = False
    BoxCh(2).Visible = False
    strip(0) = 1300
    strip(1) = 1600
    strip(2) = 2000
    nuovo = 1
    Volto = 303
    GirlF.Picture = LoadResPicture(Volto, 0)
    Form1.Hide
    Donne.Picture = LoadResPicture(501, 0)
    Donne.Show vbModal
End If

FORM "DONNE"

Private Sub Form_Unload(Cancel As Integer)
     Unload Me
     Donne.Hide
     Form1.Show
     Form1.chiamata
End Sub

Se tolgo Donne.Hide mi da l'errore detto prima.

Ho bisogno che, una volta passata a questa form, la prima si blocchi e, dopo aver cliccato sulla form DONNE, ritorni nuovamente al punto dove l'ho lasciato, richiamando la Function Chiamata.

Così funziona

[IKON]

In form1

Togli form1.hide

poi metti

dim frmDonne as new donne
load frmDonne
with frmDonne
  .picture = ....
  .show 1
end with

unload frmDonne

me.chiamata 

In form donne togli tutto


Poi mi piacerebbe sapere che fa questo programma!!! ;-)

[erosmax]

... forse potrebbe andare
E' un Video Strip Poker che devo inserire nel mio sito Freeware.