Şimdi Ara

Ne olur VB6 Bilene asla zor olmayan Birşey ACİL Yardım

Daha Fazla
Bu Konudaki Kullanıcılar: Daha Az
1 Misafir - 1 Masaüstü
5 sn
9
Cevap
0
Favori
563
Tıklama
Daha Fazla
İstatistik
  • Konu İstatistikleri Yükleniyor
0 oy
Öne Çıkar
Sayfa: 1
Giriş
Mesaj
  • Arkadaşalar mrb ;

    Ben bir Visual Basic6 Kullanıcısıyım. Fakat aşadaki konu hakkında bilginizi istiyorum

    Aşağıda ornek olarak verdiği bu textbox kodunu arasındaki boslukları silerek alt alta satır satır textboxa yazdırma ıstıyorum bunun kodunu nir türlü bulamadım. Bilene zor olmayan bır konu oldugu bildiğim için yardım ıstıyorum. Lütfen yardımcı olun

    Örnek bu kod Text1de yazılı olsun

    991 Nokia 2330 NO00246 24 C10012 45,00 TL 40,000000 TL 5,000000 TL 10,000000 TL Kurumsal & bireysel Kredi Kartlı Kredi Kartlı Kategori 5 YOK 120,00 TL 79,00 TL 199,00 TL

    Ama ben Aşadağıki gibi yazdırmak istiyorum
    Not : Aralardaki boşluklar "tab" tuşu ile yapılmıştır

    991
    Nokia 2330
    NO00246
    24
    C10012
    45,00 TL
    40,000000 TL
    5,000000 TL
    10,000000 TL
    Kurumsal & bireysel
    Kredi Kartlı
    Kredi Kartlı







  • textbox1.MultiLine=True
    textbox1.Text=Replace(textbox1.Text,CHR$(9),CHR$(13))
  • kardeş bu kodlar hata veriyor ve istediğim şekilde alt alta indirmedi bu neden olabilir acaba? Textbox1.MultiLine = True Hata veriyor
  • projendeki textbox'ın ismi nedir? ve Multiline satırını kaldırıp denedinmi?
  • Projemdeki textin adı text11 multiline kaldırıp aynı kodları tekrar denedım bu sefer mevcut boslukları aldı fakat alt alta sıralamadı tegmenım bu arada paylaşımların benim için çok önemli teşekkür ederim şimdiden



    < Bu mesaj bu kişi tarafından değiştirildi klasercan -- 11 Ekim 2011; 21:58:16 >
  • textbox kontrolünün özliklerinden multi line true olduğunu kontrol edipt tekrar deneyebilirmisin.
    text11.Text=Replace(text11.Text,CHR$(9),CHR$(13))
  • HOcam eline saglık text dosyasında bosluk bıraktı ama label te alt alta yazdı teşekkür ederim peki tegmenım bu alt alt yazanları 1.satırı bir text dosyasına 2nci satırı diger text dosyasına nasıl yazdırabılırım ?
  • eğer amacın hepsini ayrı textboxlara atmak ise ve standart olarak aynı sayıda ve sırada alan geliyor ise
    daha önce verdiğim kodları çalıştırmadan önce aşağıdaki kod yardımıyla tüm değerleri tek seferde bir dizi elemanına aktarman mümkün.
    Dim Veri
    Veri=Split(text11.Text , CHR$(9))
    artık elemanları indis numarası ile kulanabilirsin.
    Veri(0),Veri(1)



    < Bu mesaj bu kişi tarafından değiştirildi LaCagot -- 12 Ekim 2011; 9:01:14 >
  • Hocam ben bunu bir datagrid koyarak cozumledım vermıs oldugum bılgıler ıcın cok tesukkur ederım hepsı cok yardımcı oldu :D
  • 
Sayfa: 1
- x
Bildirim
mesajınız kopyalandı (ctrl+v) yapıştırmak istediğiniz yere yapıştırabilirsiniz.