Ozaman forma veya rapora AD isimli metin kutusu ekle ve form veya raporun açıldığında olayına aşağıdaki kodu yaz.
Kod:
ReadRegistry "HKCU", "Software\Microsoft", "KULLANICI", "S", "", KULLANICI
Me!AD.Value = KULLANICI
ReadRegistry "HKCU", "Software\Microsoft", "KULLANICI", "S", "", KULLANICI
Me!AD.Value = KULLANICI