If Not Me.NewRecord Then
Dim bul As String
If IsNull(Me.pz_no) Then
pz_no = "E.1"
Form.Requery
End If
bul = Me.pz_no
Me!txtBackColor3.ControlSource = "=[pz_no] = " & "'" & bul & "'"
Else
Me!txtBackColor3.ControlSource = "=False"
End If
form açıldığında ilk boş satıra E.1 yazacak. boş olan 2. satırı çift tıkladığında poz noya göre tamamlayacak