Listeyi hatırlasın

HK-G3
26-03-2011, 21:00   |  #1  
OP Yıllanmış Üye
Teşekkür Sayısı: 0
106 mesaj
Kayıt Tarihi:Kayıt: Eyl 2009


Merhaba, üstte gördüğünüz şey ilk programım :) Vakit geçirmek 
için yapmıştım ama sonra biraz uğraşmaya karar verdim.
Mesela, listbox' a eklenen kişileri programın her zaman hatırlaması için ne yapmalıyım. Çünkü bu haliyle açılıp kapandığında hepsi yok oluyor doğal olarak. Böyle olunca da hiçbir şeye yaramıyor. Bunların hatırlanmasını istersem exe den başka dosya da olması gerekir mi? (txt gibi) 
Bir de kenardaki hesap makinesinde ondalık sayı yazarken nokta kullanmak lazım. Ama Türkiye matematiğinde ondalık sayılarda virgül kullanılır bildiğiniz üzere. Peki bunun bir yolu var mı ? Öncelikle birinci soru önemli, cevapları bekliyorum :)

Son Düzenleme: HK-G3 ~ 27 Mart 2011 15:09
by_redstone
28-03-2011, 19:19   |  #2  
Yeni Üye
Teşekkür Sayısı: 0
34 mesaj
Kayıt Tarihi:Kayıt: Nis 2010

arkadaşım onun için veri tabanı kullanman gerkekio biraz uğraştırıcı yani ....

HK-G3
29-03-2011, 00:22   |  #3  
OP Yıllanmış Üye
Teşekkür Sayısı: 0
106 mesaj
Kayıt Tarihi:Kayıt: Eyl 2009

txtye kaydettirmeyi buldum ama şimdi de okutamıyorum. Listbox' ın exe ile aynı dizindeki txt yi okuması için ne yapmak lazım ?

Blur
03-04-2011, 15:07   |  #4  
Yeni Üye
Teşekkür Sayısı: 0
30 mesaj
Kayıt Tarihi:Kayıt: May 2010

Imports System.IO
Public Class Form1
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim oku As New StreamReader("c:\Veli\H.txt")
        TextBox1.Text = oku.ReadToEnd
        oku.Close()

    End Sub
End Class

'Textbox'a listeyi  yüklüyor listboxdan yapamadım.

Imports System.IO
Public Class Form1
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim dosya As New FileStream("c:\Veli\H.txt", FileMode.OpenOrCreate, FileAccess.ReadWrite)
        Dim a As String = 0
        dosya.Close()
        Dim yaz As New StreamWriter("c:\Veli\H.txt")
        Do While a <> ListBox1.Items.Count
            yaz.WriteLine(ListBox1.Items(a))
            a += 1
        Loop
        yaz.Close()

    End Sub
End Class

'Listboxdan txtye kaydediyor.
'Dosya yolu "c:\Veli\H.txt"'dir sen onu değiştirsende olur.