Skip to main content

AccessTr.neT


Textbox Birleştirme Ve Metin Ekleme

Textbox Birleştirme Ve Metin Ekleme

Çözüldü #1
Üstadım;
ekli dosyamın userform bölümünde
Textbox1 de ve Textbox2 de derece kademe var
Textbox3 ve Textbox4 de sadece derece kısımlarını aldım


Textbox5 ' e
Textbox3 de ki sayı büyükse Textbox1 de ki derece kademeyi
Textbox4 de ki sayı büyükse Textbox2 de ki derece kademeyi
alarak Label de yazdığım metni yazmak istiyorum.

ama bir türlü yapamadım. Rica etsem yardımcı olabilmeniz mümkün mü?
.rar SORU TEXTBOX BİRLEŞTİRME.rar (Dosya Boyutu: 12,79 KB | İndirme Sayısı: 4)
Cevapla
#2
Peki eşit olma durumu var mı?

Metin3=metin4 durumu?
Cevapla
#3
Eşit olma durumu var ustam. Unuttuğum için Özür dilerim.
Cevapla
#4
Üstad aşağıda ki gibi birşey yapmaya çalıştım ama
Kod:
If TextBox1 > TextBox2 Then
TextBox5 = TextBox1.Value
ElseIf TextBox1 < TextBox2 Then
TextBox5 = "Emsalin ulaştığı derece/kademe daha düşük olduğu için, emsal esas alınarak ilgilinin derece/kademesi (" & TextBox2.Value & ") olarak tespit edilmiştir"
ElseIf TextBox1 = TextBox2 Then
TextBox5 = "Emsalin ulaştığı derece/kademe daha düşük olduğu için, emsal esas alınarak ilgilinin derece/kademesi (" & TextBox2.Value & ") olarak tespit edilmiştir"
End If

Textbox5 e sadece 12/3 olarak geliyor. Metin kısmı gelmiyor.
Cevapla
#5
aşağıdaki kodu dener misiniz?
Dim lblTxt As String
If CDbl(TextBox3.Value) > CDbl(TextBox4.Value) Then
    lblTxt = TextBox1.Value
Else
    lblTxt = "Emsalin ulaştığı derece/kademe daha düşük olduğu için, emsal esas alınarak ilgilinin derece/kademesi (" & TextBox2.Value & ") olarak tespit edilmiştir"
End If
TextBox5.Value = lblTxt
Cevapla
#6
Üstadım
Emeğine Sağlık. Hakkını Helal et. Sağ olasın
malatyalı, 31-01-2010 tarihinden beri AccessTr.neT üyesidir.
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da
Task