Ü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ü?
Textbox Birleştirme Ve Metin Ekleme
Peki eşit olma durumu var mı?
Metin3=metin4 durumu?
Metin3=metin4 durumu?
Eşit olma durumu var ustam. Unuttuğum için Özür dilerim.
Üstad aşağıda ki gibi birşey yapmaya çalıştım ama
Textbox5 e sadece 12/3 olarak geliyor. Metin kısmı gelmiyor.
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
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
Üstadım
Emeğine Sağlık. Hakkını Helal et. Sağ olasın
Emeğine Sağlık. Hakkını Helal et. Sağ olasın
malatyalı, 31-01-2010 tarihinden beri AccessTr.neT üyesidir.
Konuyu Okuyanlar: 1 Ziyaretçi