replace komutu
Tarih
26/08/2010 15:38
Konu Sahibi
accessman
Yorumlar
15
Okunma
3607
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy



accessman

Kullanici Avatari
Onursal
2.367
31/10/2008
425
Denizli
Ofis 2003
20/09/2016,00:20
Çözüldü 
iyi günler
metin içerisindeki belli kelimeleri değiştirmek için kullandığımız
bu komutu içerisinde "" geçen kelimelerde nasıl kullanıyoruz
mesela metnimiz şöyle olsun
bugün okula "arabayla" gittim.dün "arabayla" çarşıya gitmiştim.
ilk "arabayla" kelimesini "bisikletle" şekline çevirmek istiyoruz
şunu yazarsak
Replace(metin, "arabayla", "bisikletle")
heriki arabayla kelimesini değiştirecek
halbuki biz sadece ilk arabayla kelimesini değiştireceğiz
ozaman bende şöyle düşündüm
Replace(metin, "okula "arabayla"", "okula "bisikletle"")
yazınca
type mismatch
uyarısı veriyor
nasıl bir kod yazmam lazım
içerisinde "" geçen kelimeleride değiştirebileyim
@benbendedeilem
Cevapla

alpeki99
Yeniden başlayabilmek...
Kullanici Avatari
Uzman
O....
6.024
29/10/2008
Ordu
Ofis 2013 32 Bit
27/02/2017,22:47
Çözüldü 
Sponsor Reklam

Kod:
1
2
3
4
5
6
7
8
9
Dim sonuc As String
Dim kelime2 As String
Dim kelime1 As String

kelime1 = Chr(34) & "olcay" & Chr(34)
kelime2 = Chr(34) & "zumrut" & Chr(34)

    sonuc = Replace(Metin0, kelime1, kelime2, 1, , vbTextCompare)
    MsgBox sonuc


Forma ekleyecekleriniz:

1 Adet Metin Kutusu --> Metin0 adında
1 Adet Buton --> Ne isim verirseniz artık

Butonun tıklanma olayına yukarıdaki kodu yazacaksınız. Metin kutusunun içine Merhaba "olcay" nasılsın yazıp butona tıklayın.

AccessTr.Net teknik konular içeren bir sitedir. Bu tip sitelerde en iyi şekilde yardım alabilmeniz için Site Kurallarını mutlaka okumanız ve buna göre hareket etmeniz lazım.
Cevapla

accessman

Kullanici Avatari
Onursal
2.367
31/10/2008
425
Denizli
Ofis 2003
20/09/2016,00:20
Çözüldü 
teşekkürler
sonuc = Replace(Metin0, kelime1, kelime2, 1, , vbTextCompare)
satırında
olcay yerine zümrüt yazıyor
, , vbTextCompare
kısımlarının manası nedir

@benbendedeilem
Cevapla

alpeki99
Yeniden başlayabilmek...
Kullanici Avatari
Uzman
O....
6.024
29/10/2008
Ordu
Ofis 2013 32 Bit
27/02/2017,22:47
Çözüldü 
Sponsor Reklam
Çift tırnak işareti yerine Chr(34) kullanıyoruz. 1 diye geçen yer hangi karakterden itibaren kontrol edileceğini ifade ediyor. vbTextCompare kısmında 3 seçenek vardır. Binary, Database ve Text. Biz metin karşılaştıracağımız için vbTextCompare seçtik.

Orada olcay yerine zümrüt yazarken çift tırnaklar ile yazdığını gözden kaçırmayın. İşin esprisi zaten çift tırnak.
AccessTr.Net teknik konular içeren bir sitedir. Bu tip sitelerde en iyi şekilde yardım alabilmeniz için Site Kurallarını mutlaka okumanız ve buna göre hareket etmeniz lazım.
Cevapla

accessman

Kullanici Avatari
Onursal
2.367
31/10/2008
425
Denizli
Ofis 2003
20/09/2016,00:20
Çözüldü 
mesela
a değişkeni integer
a= 6 + 8 + 9
ilk + işaretini nasıl - yaparız
a= replace (a, "+","-")
olurmu
veya şöyle ifade edeyim
a = b + c + d
hepsi integer
sadece ilk + yı - yapmak için ne yazmalıyız


@benbendedeilem
Cevapla

alpeki99
Yeniden başlayabilmek...
Kullanici Avatari
Uzman
O....
6.024
29/10/2008
Ordu
Ofis 2013 32 Bit
27/02/2017,22:47
Çözüldü 
Sponsor Reklam

Kod:
Dim sonuc As String

    sonuc = Replace(Metin0, "+", "-", 1, 1, vbTextCompare)
    MsgBox sonuc


Aynı butonun tıklama koduna bunları yazmalısınız. Burada öncekine göre dikkat ederseniz, 1, 1 gelmiş. İkinci 1 rakamının ne olduğunu anlamak isterseniz 2 yazın onun yerine.

AccessTr.Net teknik konular içeren bir sitedir. Bu tip sitelerde en iyi şekilde yardım alabilmeniz için Site Kurallarını mutlaka okumanız ve buna göre hareket etmeniz lazım.
Cevapla


Konuyu Okuyanlar: 1 Ziyaretçi


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
  Form Küçültme Komutu metınaycıcek 2 57 23/02/2017, 00:06 metınaycıcek
  Çapraz sorguda Between Like komutu orderyazbim 4 203 17/01/2017, 00:52 orderyazbim
  Alt formda hesaplatma komutu nedeni ile focus sorunu shalala 22 639 12/12/2016, 12:49 atoz112
  Tablolar arası hesaplanmış alanda Iff komutu yardımı nightashes 17 501 06/12/2016, 18:46 nightashes
Çözüldü IIF komutu saityazar 4 1.068 22/08/2016, 12:01 atoz112


Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2017 MyBB Group.
DMCA.com Protection Status
© Desing by XSTYLED| Develops by ozanakkaya