Skip to main content

AccessTr.neT


otomatik deger

otomatik deger

Çözüldü #1
19/A İşler listesindeki DENEME İşine ait hakediş formunda Poz No alanına tıklanınca değer otomatik gelsin istiyorum. Örnek ilk satır için E.1, ikinci satırda tıklanınca E.2 ........tıkladıkça devam etsin.
.rar İHALE ve HAKEDİŞ.rar (Dosya Boyutu: 1,12 MB | İndirme Sayısı: 9)
Cevapla
Çözüldü #2
22:15'de konu açıp 22:15'de siteden ayrılırsanız sorunuza çözüm bulunsa bile cevap yazılmaz.

Örneğinizi uzun uzun incelemek zorunda kaldım, çünkü hangi formdan bahsediliyor anlamak güç.

"A" ve "A Alt Form" formlarında bahsi geçen işlemi gerçekleştirdim.

- "A Alt Form" formuna denetim kaynağı "is_no" olan "is_no" adında metin kutusu ekle,
- "A Alt Form" formunda bulunan "pz_no" açılan kutusunun çift tıklandığında olayına aşağıdaki kodu ekle.



Dim tumu As String
Dim metinsol As String
Dim metinsag As String
Dim nokta As Integer
Me.is_no = Forms![a]![is_no]
tumu = DLast("[pz_no]", "AH", "[is_no]=" & Me![is_no])
nokta = InStr(1, tumu, ".")
metinsol = Left(tumu, nokta)
metinsag = Right(tumu, Len(tumu) - nokta) + 1
Me.pz_no = metinsol & "" & metinsag

"pz_no" açılan kutusunun çift tıkladığında bir artacak şekilde yeni değeri yazar.
Cevapla
Çözüldü #3
Sn.Sledgeab
Özür dilerim ve Teşekkür ederim...
Cevapla
Çözüldü #4
Neden özür dilediğinizi anlayamadım.
Örneğinizi uzun uzun incelemek zorunda kaldığım için özür diliyorsanız, uzun uzun incelemeseydim sorunuzu cevaplayamazdım. Img-grin
Konu cevaplanmışlara taşınmıştır.
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da
Task