sayın ozanakkaya öncelikle teşekkürler.

modül şöyle

Public Function kurumAdi() As String



kurumAdi = Dlookup ("adim", "firmam", "[Kimlik] = 1")



End Function

form loadolayı  ise

Private Sub Form_Load()



Me.Metin199.SetFocus

Me.Metin199.Text = kurumAdi()

Me.Etiket206.Caption = kurumAdi()

End Sub

bu şekilde çalışıyo  ancak benim istediğim  hani =Date()  yazıp sistem tarihini gösteriyoruz ya işte öyle birşey