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

Derecelendirme: 0/5 - 0 oy

esrefgul44

Üye
Kullanici Avatari
Aktif Üye
E.... G....
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
Cevapla

Yandemir

Only Office 2003
Kullanici Avatari
Onursal Üye
M.... Y....
1.440
26/08/2009
487
Tekirdağ
Yazılım
Ofis 2003
10/02/2018,21:42
Çö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
Cevapla

esrefgul44

Üye
Kullanici Avatari
Aktif Üye
E.... G....
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
Cevapla


Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
Çözüldü Sorgu İçerisindeki Verileri Tek Tek Kontrol Etme cazcaz678 4 179 22/03/2018, 22:09 cazcaz678
Çözüldü Çok Fazla Alan Tanımlı Hatası cevahir1 2 99 20/03/2018, 09:02 cevahir1
Çözüldü Alan Kritere Göre Gelmesi hegu 10 219 04/03/2018, 22:57 hegu
Çözüldü Kenar Boşluğu Hatası kadirdursun 2 212 28/02/2018, 11:23 ozanakkaya
Çözüldü Mükerrer Kayıtı Engellemek 1tk 3 200 03/01/2018, 15:47 1tk

Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2018 MyBB Group.
 
 
Forum use Krzysztof "Supryk" Supryczynski addons.