hocam şöyle yaptım ama olmadı
Private Sub Metin174_BeforeUpdate(Cancel As Integer)
Dim A, B, C, D, E As Integer
A = Me.Liste165
B = Me.Liste167
C = Me.Liste168
D = Me.Liste172
E = Me.Liste173
Me.Metin174 = A + B + C + D + E
End Sub
Bana bir harf öğretenin kırk yıl kölesi olurum.(Hz.Ali)