14/04/11 21:38
Aangelus
Salve a tutti ho scritto un programmino che seleziona a caso una domanda da me inventata, il problema mi si presenta quando il form si apre e dovrebbe caricare il seguente codice generando un errore di :variabile oggetto o variabile del blocco with non impostata
Data1.Recordset.MoveLast
ultimo = Data1.Recordset.Fields("ID"
Randomize
N = Fix(Rnd * ultimo)
Data1.Recordset.MoveFirst
Data1.Recordset.Move (N)
Command2.Caption = Data1.Recordset.Fields("Risposta 1"
cosa che non riesco a capire e che se lo faccio eseguire da una command button funziona volevo premettere che il text1 e collegato al database tramite text1.datafield
Grazie a tutti
Ho trovato la risposta al mio problema e la posto nel caso possa servire a qualcuno il codice corretto è:
Data1.refresh ..............................
Data1.Recordset.MoveLast
ultimo = Data1.Recordset.Fields("ID"
Randomize
N = Fix(Rnd * ultimo)
Data1.Recordset.MoveFirst
Data1.Recordset.Move (N)
Command2.Caption = Data1.Recordset.Fields("Risposta 1"
Data1.Recordset.MoveLast
ultimo = Data1.Recordset.Fields("ID"
Randomize
N = Fix(Rnd * ultimo)
Data1.Recordset.MoveFirst
Data1.Recordset.Move (N)
Command2.Caption = Data1.Recordset.Fields("Risposta 1"
cosa che non riesco a capire e che se lo faccio eseguire da una command button funziona volevo premettere che il text1 e collegato al database tramite text1.datafield
Grazie a tutti
Ho trovato la risposta al mio problema e la posto nel caso possa servire a qualcuno il codice corretto è:
Data1.refresh ..............................
Data1.Recordset.MoveLast
ultimo = Data1.Recordset.Fields("ID"
Randomize
N = Fix(Rnd * ultimo)
Data1.Recordset.MoveFirst
Data1.Recordset.Move (N)
Command2.Caption = Data1.Recordset.Fields("Risposta 1"
Ultima modifica effettuata da Aangelus 16/04/11 12:32
aaa