[SORGU] Sorguda hücre içindeki değerin bir kısmını almak

kadirakyil · 29-09-2017, 15:12

Merhaba üstadlar,

aradım ama bulamadım, işlendi ise tekrar sorduğum için affınıza sığınıyorum.

Liste kutusunun sorguda ölçü olarak kullandığı metin kutusundaki değerin bir kısmını ölçü olarak almasını nasıl sağlayabilirim.

Örnekse:

AAAA1000 01 01 30 değerinin
son iki hanesi olan 30 u görmeden (Tamamen yapmak istediğim budur)
AAAA1000 01 01 değerini sorgulamasını istiyorum.

İlgili metin kutusuna değeri yine bir başka liste kutusundan atıyorum .

Private Sub Liste81_Click()
Me.ResimNoAl = Me.Liste81.Column(2)

Bu işlevi yaparken son iki hanesi hariç Me.ResimNoAl a yaz diyebilirsemde işlevi istediğim gibi yapabilmiş olurum.

Şimdiden teşekkür ederim.
Saygılarımla.
Kadir.

onur_can · 29-09-2017, 21:27

Merhaba Kadir Bey,
Aşağıdaki kodu uygulayın

Visual Basic
Dim a As String
Dim b As Integer
Dim c As Integer
Dim d As String
 
a = Me.Liste81.Column(2)
b = Len(a)
c = b - 2
d = Left(a, c)

dsezgin · 29-09-2017, 21:29

Visual Basic
Private Sub Liste81_Click()
Me.ResimNoAl = mid(Me.Liste81.Column(2),1,len(Me.Liste81.Column(2))-2)
end sub

ile sonuc alinabilir.

kadirakyil · **Kayıt Tarihi:** 14.10.2013

Merhabalar,

Konuyu silmeyi denedim becerememiştim, daha sonra da siteye erişim hatası aldım.
Cevaplarınız için çok teşekkür ederim. Zamanım biraz kısıtlı olduğu için kendim biraz daha uzun bir yolla yaptım.

Saygılarımla.

Mid fonksiyonunu sağdan çalıştıramadığım için Kutu içeriğini 2 kere ters çevirerek yaptım.

Visual Basic
Me.ResimNoAl1 = Me.Liste81.Column(2)
Dim kodal As String
kodal = Me.ResimNoAl1
Dim kodal2 As String
kodal2 = StrReverse(kodal)
Dim Sonuc As String
Sonuc = Mid(kodal2, 4, 20)
Me.ResimNoAl = StrReverse(Sonuc)

dsezgin · 02-10-2017, 21:00

Yazdigim cevaba fazlaliklar eklenmis, mesaj 3'u guncelledim.

Benzer Konular...
Konu:		Yazar	Cevaplar:	Gösterim:	Son Mesaj
	Sorguda Gruplandırma Sorunu	halil.tefci	4	390	14-03-2025, 12:27 Son Mesaj: halily
	çapraz Sorguda Form	omur34	5	386	11-03-2025, 09:44 Son Mesaj: omur34
	Access Ile Web Den Veri Almak Ve Güncelleme Yapmak.	karamurat42	0	356	08-10-2024, 15:42 Son Mesaj: karamurat42
	Ana Forma Bağlı Alt Formdaki Verilerin Ana Formda Toplamını Almak	ozan028	5	529	09-09-2024, 17:14 Son Mesaj: ozan028
	[SORGU] Sorgu Ifadesi Içindeki Fonksiyon Ifade Içinde Kullanılamaz Hatası	Mecnun24	7	710	27-08-2024, 16:53 Son Mesaj: Mecnun24
	Sorguda Birleşim	evren89	5	477	30-07-2024, 19:51 Son Mesaj: evren89
	Format([giris], "dd-mm-yyyy" Sorgu Ifadesi Içindeki Derleme Hatası.	gncbil	5	631	07-06-2024, 10:48 Son Mesaj: dsezgin
	Farklı Tablodan Mükerrer Olmayan Bilgi Almak	bilservisci	5	553	17-12-2023, 18:04 Son Mesaj: dsezgin

Oturum Aç




Beni Hatırla Şifremi Unuttum?

Access SQL