VB TextBox.Text için Silme İşlemleri

Aşağı Git Tüm Forumlar Web Tasarım - Programlama Yazılım Geliştirme Delphi / C++ /Vb VB TextBox.Text için Silme İşlemleri

Bu konudaki kullanıcılar: 1 misafir

5
Cevap 537
Tıklama 0
Öne Çıkarma

1. sayfa

VB TextBox.Text için Silme İşlemleri

Cevap Yaz

emre_ermag155

11 yıl

Yüzbaşı

Konu Sahibi

1. Textboxtaki tüm yazıları silecek sadece rakamlar ve "." kalabilecek.
2. Textboxtaki sayı 100,00 den büyükse sondan 1 tane silecek ve imleç sonda kalacak.
İnternette araştırdım ama bulamadım
Dil olarak vb olacak ama vb'den anlayan pek yok o yüzden eğer kodları düzgün açıklarsanız c# vb'ye çevirebilirim.

Bu mesajda bahsedilenler: @Kaygerya

thenemne1

11 yıl

Teğmen

Bir buttona felan tıklayınca mı yapıcak bu işlemleri birde ayrıntılı anlatırmısın sondan 1 tane silecek derken

< Bu mesaj bu kişi tarafından değiştirildi thenemne1 -- 11 Ekim 2014; 17:28:58 >
Bu mesaja 1 cevap geldi.

emre_ermag155

11 yıl

Yüzbaşı

Konu Sahibi

timer ile if kontrollü
If val(Textbox1.Text)>100,00 Then

Bu mesaja 1 cevap geldi.

Bu mesajda bahsedilenler: @thenemne1

thenemne1

11 yıl

Teğmen

Tamamda "," varken büyük küçük kontrolü yapamazsın. Bu silme olayını hala anlamadım 100,00'den büyükse neyi silecek? örnek verir misin?

Bu mesaja 1 cevap geldi.

emre_ermag155

11 yıl

Yüzbaşı

Konu Sahibi

"""işareti göstermek için kullandım programda olmayacak.
* imleç her zaman sonda olacak
"100,01"->"100,0"
"g"->""
"z15"->"15"
"f3vre3gs35fv443"->"33"
"?1,5"->"1,5"
yeşiller karşıda

timer kontrolü olacağından işlem otomatik gerçekleşecek

Bu mesaja 1 cevap geldi.

Bu mesajda bahsedilenler: @thenemne1

thenemne1

11 yıl

Teğmen

Visual basicten nefret ediyorum birkaç şey denedim dili hiç bilmiyorum hataları olabilir.

Textbox'un eventler yerine gel ora neresi bilmiyorsan
Propertiesde şimşek simgesi var ona tıkla Text Changed eventine çift tıkla kod yeri açılacak içine bunu yapıştır.
< Resime gitmek için tıklayın > burda

Dim metin As String = "" 
          For Each item As String In TextBox1.Text 
              If item = "0" Or item = "1" Or item = "2" Or item = "3" Or item = "4" Or item = "5" Or 
                  item = "6" Or item = "7" Or item = "8" Or item = "9" Then 
                  metin += item.ToString() 
              ElseIf item = "," Then 
                  If CInt(metin) > 100 Then 
                      metin = "100,0" 
                  ElseIf CInt(metin) < 0 Then 
                      metin = "00,0" 
                  Else 
                      metin += ",0" 
                  End If 
                  Exit For 
              End If 
          Next 
          TextBox1.Text = metin.ToString() 
          TextBox1.Select(TextBox1.Text.Length, 0)

Beğenmezsen bu var hazır fonksiyonlu TIMER'a ekleyebilirsin;

If Val(TextBox1.Text) > 100 Then 
              TextBox1.Text = "100,0" 
          ElseIf Val(TextBox1.Text) < 0 Then 
   
          Else 
              TextBox1.Text = Val(TextBox1.Text).ToString + ",00" 
          End If

Cevap Yaz

1. sayfa

Tüm Forumlar Web Tasarım - Programlama Yazılım Geliştirme Delphi / C++ /Vb VB TextBox.Text için Silme İşlemleri