tsorgu tablosunda id1 alanı metin cinsinde  ve alan büyüklüğü 2 karakter olmasına rağmen
strSQL = "UPDATE tSorgu SET id1 =" & "0" & "9" & " WHERE id =" & asde & ";"
ile id1 alanına "09" kaydetmek istiyorum ama nasıl yazarsam yaz

herhangi bir metin tarih formatında mı yazılmış nasıl kontrol ediyoruz

---

tarih formatı ile biçim maskesi olan metin kutusunu boş olarak görmüyor
neden olabilir

girilen stringi kontrol etmek için şu var

Is Null Or ((Like "*?@?*.?*") And (Not Like "*[ ,;]*"))

 
metin5.value yi buna göre kontrol etmek için bunun neresine ekleyeceğiz

iyi günler
"% 52 DM tip2, Lumbalgo siyatik, Depresif belirtilerşe giden uyum bozukluğu"
"%52 DM tip2, Lumbalgo siyatik, Depresif belirtilerşe giden uyum bozukluğu"
"52% DM tip2, Lumbalgo siyatik, Depresif belirtilerşe giden uyum bozukluğu"
"52 % DM tip2, Lumbalgo siyatik, Depresif belirtilerşe giden uyum bozukluğu"

"DM tip2,  52 %  Lumbalgo siyatik, Depresif belirtilerşe giden uyum bozukluğu"
"DM tip2,  52%  Lumbalgo siyatik, Depresif belirtilerşe giden uyum bozukluğu"

bu sadece örnek bir veri

Çalışmamda liste kutusundan seçtiğim açıklamanın id değerini gönderiyorum. Yalnız rapora metinsel ifadesini nasıl getirim. (sayısal değeri geliyor.)

kararlar_frm formundan seçilen kişiye ceza kararı tbl_disiplinkarari tablosuna (cezaanamadde ve cezaaltmadde) değerleri tabloya sayısal olarak gönderiyorum.

frm_tebligatlar formundan öğrenciye yapılan tebligatı yazdır dediğimde cezaanamadde ve cezaaltmadde nin rpr_tebligogrenci raporunda metinsel gelmesini nasıl sağlarız.

frmFaturaekle formunda btnEkle butonunda aşağıdaki kod strSQL1 satırında seçilen Faturacinsi olarak yazdığım ifade yerinde fatura cinslerinin her biri için ayrı ayrı if-end if döngüsüne yazdım.  Fakat çok uzun sürüyor.

strSQL1 = "SELECT * FROM tblFirmalar WHERE ((Faturacinsi)=seçilenfaturacinsi);"

Bunun yerine fatura cinsini aranan olarak tanımlayıp ve aşağıdaki gibi yazmayı denedim.

Dim aranan As String

aranan = Forms!frmFaturaekle!akFaturacinsi.Text

strSQL1 = "SELECT * FROM tblFirmalar WH