Forum Discussion
ACCESS: controllo strttura a schede
Salve,
L'indice della scheda corrente corrisponde semplicemente al valore del controllo struttura a schede, quindi: Me!NomeControlloStrutturaASchede.Value
Dove 0 è la prima schede, 1 la seconda e così via.
Per riportare il focus sulla scheda corrente, puoi salvarla in una variabile e poi impostare di nuovo il valore del controllo:
Dim lngSchedaCorrente As Long
lngSchedaCorrente = Me!NomeControlloStrutturaASchede.Value
If Msgbox(ecc... = True
Me!NomeControlloStrutturaASchede.Value = lngSchedaCorrente
End If
...
Servus
Karl
************
Access News
Access DevCon
Private Sub Successivo_Click()
Dim ingschedacorrente As Long
lngSchedaCorrente = Me!TabCtl176.Value
If Me![Corrente] < Me![Totale] Then
DoCmd.GoToRecord , , acNext
End If
risposta = MsgBox("vuoi rimanere nella scheda?", vbYesNo)
If risposta = 6 Then
Me!TabCtl176.Value = lngSchedaCorrente
End If
End Sub
Funziona evviva
