AccessTr.neT
bul ve değiştir - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Visual Basic .NET (https://accesstr.net/forum-visual-basic-net.html)
+--- Forum: Visual Basic .NET Cevaplanmış Soruları (https://accesstr.net/forum-visual-basic-net-cevaplanmis-sorulari.html)
+--- Konu Başlığı: bul ve değiştir (/konu-bul-ve-degistir.html)



bul ve değiştir - kral55011 - 05/03/2011

slm,
visual basicte bul ve değiştir nasıl yapabilirim,
bir metinde kelimeyi arayop bulacak istenirsede değiştirilecek,



Cvp: bul ve değiştir - ercansahin - 05/03/2011

Vbnet kullandığım için Vbnet ile hazırlanmıştır.


Bu işlem için öncelikle projemize 1 form, 3 TextBox, 1 Button ve 3 adet Label ekliyoruz.

TextBox1=txtaranacak
TextBox2=txtaranan
TextBox3=txtyeni olarak adlandırıyoruz.
Label isimlerini istediğiniz gibi adlandırabilirsiniz.

Sonrasında ise Botton1'in Tıklandığında olayına aşağıdaki kodu yazıyoruz.

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim accesstrnet, blackeagle As String
accesstrnet = Me.txtaranan.Text
blackeagle = Me.txtyeni.Text
txtaranacak.Text = txtaranacak.Text.Insert(txtaranacak.Text.IndexOf(txtaranan.Text), txtyeni.Text)
txtaranacak.Text = txtaranacak.Text.Remove(txtaranacak.Text.IndexOf(txtaranan.Text), txtaranan.Text.Length)
MsgBox("Aradığınız: " & accesstrnet & " kelimesi " & blackeagle & " ile değişti.", MsgBoxStyle.Exclamation, "TEBRİKLER")
End Sub



Cvp: bul ve değiştir - kral55011 - 05/03/2011

teşekkürler blackeagglee...


Cvp: bul ve değiştir - ercansahin - 05/03/2011

Rica ederim.Sorununuzun çözüldüğüne sevindim.