KaraYılan TR

HOŞGELDİNİZ KaRaYıLaN
 
AnasayfaAnasayfa  SSSSSS  AramaArama  Kayıt OlKayıt Ol  Üye ListesiÜye Listesi  Kullanıcı GruplarıKullanıcı Grupları  Giriş yap  

Paylaş | 
 

 TEXT İÇİNDE ARAMA YAPMA

Önceki başlık Sonraki başlık Aşağa gitmek 
YazarMesaj
MeMaTi
Admin


Erkek
Mesaj Sayısı : 176
Yaş : 26
Location : dfgfdg
Job/hobbies : hgffg
Humor : erwer
Kayıt tarihi : 14/08/07

MesajKonu: TEXT İÇİNDE ARAMA YAPMA   C.tesi Ağus. 25, 2007 1:21 pm

Forma 2 tane Text(text1 text2) ve 1 Tane Command1 Buton


Açıklama :
Text1 Aranılacak Yer

Text2 Aranılacak Kelime

Command1 Aramaı Başlat



Aşağıdaki Kod Olduğu gibi Yapıştırın !

=
Private Sub Command1_Click()
If sonraki = 0 Then sonraki = 1
Text1.SelStart = InStr(sonraki, Text1, Text2) - 1
Text1.SelLength = Len(Text2)
sonraki = Text1.SelStart + Text1.SelLength
Text1.SetFocus
End Sub


evet bu kadar çalıştırıp deneyin
Sayfa başına dön Aşağa gitmek
Kullanıcı profilini gör http://www.djdenizcom.tr.gg
 
TEXT İÇİNDE ARAMA YAPMA
Önceki başlık Sonraki başlık Sayfa başına dön 
1 sayfadaki 1 sayfası
 Similar topics
-
» Google Site İçi Arama Kodu !
» Fps 100 yapmak
» X ev yapma gif

Bu forumun müsaadesi var:Bu forumdaki mesajlara cevap veremezsiniz
KaraYılan TR :: PROGRAMLAMA :: VİTSUAL BASİC-
Buraya geçin: