Konu Araçları | Seçenekler: | Gösterim Stili
Tarih
18/02/2012 18:18
Konu Sahibi
esrefgul44
Yorumlar
2
Okunma
1339
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy
Kullanici Avatari

esrefgul44

Üye
Aktif Üye
EŞ.... GÜ....
 49
35
10/10/2011
0
Kütahya
Ofis 2010
25/03/2018,12:15
Çözüldü 

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

Kullanici Avatari

Yandemir

Only Office 2003
Onursal Üye
MU.... YA....
 45
1.440
26/08/2009
487
Tekirdağ
Yazılım
Ofis 2003
14/07/2018,17:15
Çözüldü 
Sadece boşluk değil diğer mide bulandırıcı karakterleri de kilitleyebilirsiniz. Kod kullanımlaında *'?% işaretlerini de kilitliyorum örnekte.

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


Visual Basic Code
1
2
3
4
5
6
7
8
9
10
11
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

Kullanici Avatari

esrefgul44

Üye
Aktif Üye
EŞ.... GÜ....
 49
35
10/10/2011
0
Kütahya
Ofis 2010
25/03/2018,12:15
Çözüldü 
sn. yandemir çok teşekkür ederim işlem tamam


Ozur


Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
Çözüldü Sürekli Formda Etiketlerin İçerisindeki Metnin Dikey Olarak Ortalanması mmert06 2 78 22/06/2018, 12:29
Son Yorum: mmert06
Çözüldü Sorgu İçerisindeki Verileri Tek Tek Kontrol Etme cazcaz678 4 254 22/03/2018, 22:09
Son Yorum: cazcaz678
Çözüldü Çok Fazla Alan Tanımlı Hatası cevahir1 2 182 20/03/2018, 09:02
Son Yorum: cevahir1
Çözüldü Alan Kritere Göre Gelmesi hegu 10 321 04/03/2018, 22:57
Son Yorum: hegu
Çözüldü Kenar Boşluğu Hatası kadirdursun 2 260 28/02/2018, 11:23
Son Yorum: ozanakkaya

Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2018 MyBB Group.