AccessTr.neTMicrosoft AccessAccess Cevaplanmış Soruları

Sorguda metin görünmüyor

1 2
06/06/2010, 13:18

ercansahin

Ayrıca; sonradan farkettiğimiz bir hata söz konusu, form üzerinde sizin tarafınızdan hazırlanan örnekte boş kayıtlara tıklandığında hata vermesi söz konusu.. Bu hatanın düzeltilmesi için kodu
Kod:
Private Sub Form_Current()
If IsNull(Me![ÜrünNo]) Then
   DoCmd.GoToControl "ÜrünAdı"
   Else
   Dim BAK As Integer
   BAK = BAK = Val(Nz(Me.SipariştekiBirim.Value, 0) - Nz(Me.Metin30.Value, 0))

   If BAK <= 0 Then
   Me.Metin42 = "Sipariş Veriniz"
   Else
   Me.Metin42.Value = BAK
   End If
     End If    
End Sub
şeklinde düzeltmelisiniz.
06/06/2010, 13:28

benremix

Sn Ercan hocam çözüm için teşekkürler. Saygılar...
06/06/2010, 13:51

by body 1

Problem çözüldü , istediğim şekilde oldu.
Tekrardan ; sonuca ulaşmamda yardımcı olan herkesten Allah razı olsun.Tşkr.
1 2