Skip to main content

AccessTr.neT


Uzun Metin Kutusuna İstenilen Kadar Sıra Numarası Ekleme

Uzun Metin Kutusuna İstenilen Kadar Sıra Numarası Ekleme

#4
"MusteriSayisi" metin kutusundan çıkıldığında olayına yazdım kodu sayı 15den büyükse bile sadece 15 yazıyor
dilerim işinize yarar
Private Sub MusteriSayisi_Exit(Cancel As Integer)
If CLng(Me.MusteriSayisi) > 15 Then Me.MusteriSayisi = 15
Me.Musteriler = ""
For x = 1 To CLng(Me.MusteriSayisi)
Me.Musteriler = Me.Musteriler & x & " - " & vbNewLine
Next x
End Sub
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da

Bu Konudaki Yorumlar
Cvp: Uzun Metin Kutusuna İstenilen Kadar Sıra Numarası Ekleme - Yazar: berduş - 17/10/2019, 22:40
Task