Skip to main content

AccessTr.neT


Alan İçerisindeki Boşluğu Engellemek

Alan İçerisindeki Boşluğu Engellemek

Çözüldü #1

alan içindeki kelime ya da rakamlar arasındaki boşluğu engellemek için vb kodu nasıl olmalı acil cevaba ihtiyacım var
Ozur
Cevapla
Çözüldü #2
Sadece boşluk değil diğer mide bulandırıcı karakterleri de kilitleyebilirsiniz. Kod kullanımlaında *'?% işaretlerini de kilitliyorum örnekte.

Private Sub SirketKodu_AfterUpdate()
Me.SirketKodu.Value = UCase$(Me.SirketKodu)
Me.SirketKodu = At(Me.SirketKodu)
End Sub

Function At(Deger As String)
Dim T As Integer
Dim dd As String
For T = 1 To Len(Deger)
If Mid(Deger, T, 1) = " " Or Mid(Deger, T, 1) = Chr(34) Or Mid(Deger, T, 1) = "*" Or Mid(Deger, T, 1) = "'" Or Mid(Deger, T, 1) = "?" Or Mid(Deger, T, 1) = "%" Then
Else
dd = dd & Mid(Deger, T, 1)
End If
Next
At = dd
End Function
Murat YANDEMİR ( PyramiD YAZILIM Uluslar Arası Nakliye Programları )
Bilgisayar Programcısı (1989'dan beri)

+rep Yollar biter Access bitmez. +rep
Cevapla
Çözüldü #3
sn. yandemir çok teşekkür ederim işlem tamam
Ozur
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da
Task