Konu Araçları | Seçenekler: | Gösterim Stili
Tarih
10/04/2011 22:57
Konu Sahibi
~~KaG~~
Yorumlar
6
Okunma
3080
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy

~~KaG~~

Kıdemli Üye
Kullanici Avatari
Aktif Üye
K.... A....
477
06/01/2011
47
Karabük
Ofis 2003
28/11/2014,11:50
Çözüldü 
Arkadaşlar ListBox1 e Tıklayınca TextBox1 de Gözüksün Kodları Unuttum Hatırladığım Kadarıyla Yazdım ama Olmadı.

Visual Basic Code
  Private Sub ListBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListBox1.SelectedIndexChanged
             
        ListBox1.SelectedItem =  TextBox1.Text

   End Sub 


Cevapla

ercansahin

BlackEagle
Kullanici Avatari
Uzman
E.... Ş....
3.739
14/11/2008
Ankara
Ofis 2010 32 Bit
07/09/2017,13:09
Çözüldü 

Visual Basic Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Private Sub ListBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListBox1.SelectedIndexChanged
        Dim baglanti As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source='db.mdb'")

        baglanti.Open()
        Dim komut As New OleDb.OleDbCommand("SELECT * FROM Tablo1 Where Nick = '" & ListBox1.SelectedItem & "'", baglanti)

        Dim getir As OleDb.OleDbDataReader
        getir = komut.ExecuteReader()
        getir.Read()

        TextBox1.Text = getir("Nick")

        baglanti.Close()
    End Sub

Ekleyerek denermisiniz.


Cevapla

~~KaG~~

Kıdemli Üye
Kullanici Avatari
Aktif Üye
K.... A....
477
06/01/2011
47
Karabük
Ofis 2003
28/11/2014,11:50
Çözüldü 
Teşekkürler Sn.BlackEagle Img-grin


Cevapla

ercansahin

BlackEagle
Kullanici Avatari
Uzman
E.... Ş....
3.739
14/11/2008
Ankara
Ofis 2010 32 Bit
07/09/2017,13:09
Çözüldü 
Sanırım probleminiz çözüldü değil mi? Konuyu cevaplanmış bölümüne taşıyabiliriz o halde.


Cevapla

~~KaG~~

Kıdemli Üye
Kullanici Avatari
Aktif Üye
K.... A....
477
06/01/2011
47
Karabük
Ofis 2003
28/11/2014,11:50
Çözüldü 
Evet Taşıyabilirsiniz. Sağolun Tekrar Lol


Cevapla

prtkl

Aktif Üye
Kullanici Avatari
Aktif Üye
150
09/03/2010
0
Bilecik
Ofis 2003
12/10/2017,14:45
(10/04/2011, 22:58)ercansahin Adlı Kullanıcıdan Alıntı:

Visual Basic Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Private Sub ListBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListBox1.SelectedIndexChanged
        Dim baglanti As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source='db.mdb'")

        baglanti.Open()
        Dim komut As New OleDb.OleDbCommand("SELECT * FROM Tablo1 Where Nick = '" & ListBox1.SelectedItem & "'", baglanti)

        Dim getir As OleDb.OleDbDataReader
        getir = komut.ExecuteReader()
        getir.Read()

        TextBox1.Text = getir("Nick")

        baglanti.Close()
    End Sub

Ekleyerek denermisiniz.



Merhabalar rica etsem  bu kodları accesse uyarlayabilir misiniz?


prtkl, 09-03-2010 tarihinden beri AccessTr.neT üyesidir
Cevapla


Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
Çözüldü TextBox'a Tarih Formatı Girdirme Mettleshade 2 504 24/11/2016, 18:38 Mettleshade
Çözüldü alt alta textbox gkmanil 11 2.432 29/05/2016, 14:06 atoz112
Çözüldü TextBox ı for ile değişkenli kullanmak Gorkemku 1 1.597 26/05/2014, 10:02 alpeki99
Çözüldü Textbox matematiksel işlem ve para formatı drummers 3 2.125 15/04/2012, 23:02 drummers
Çözüldü Toplu Textbox Biçimlendirme Hk drummers 4 2.435 04/04/2012, 22:47 drummers

Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2017 MyBB Group.
Forum use Krzysztof "Supryk" Supryczynski addons.