… = DataSource[…] (gb.db.form)

Dim hDataSource As DataSource
Dim aVariant As Variant
aVariant = hDataSource [ Key As String ]

Retourne la valeur de la clé du champ de l'enregistrement en cours.