Hızlı Konu Açma

Hızlı Konu Açmak için tıklayınız.

Son Mesajlar

Konulardaki Son Mesajlar

Reklam

Forumda Reklam Vermek İçin Bize Ulaşın

Formlar Arasında Veri Transferi Yapmak

BOMBFACTORY

Uzman Üye
Uzman Üye
Trabzonspor
Katılım
5 Ocak 2014
Mesajlar
3,333
Tepkime puanı
6
Puanları
136
Merhaba arkadaşlar, bu makalemde sizlere iki form arasında veri taşımayı göstereceğim.

Şimdi Form1'e 2 tane Label ve 1 tane de Buton koyuyoruz.




Şimdi kodlama bölümüne geçelim.

Buton1_click Event'ına (olayına) çift tıklama yolu ile geçelim.


Kod:

Private Sub btnform1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnform1.Click Dim f As New Form2 f.ShowDialog() 'f.ShowDialog() (bu şekilde yazıldığında buton bir kez tıklandığında form2 açılır form2'nin görevi bitmeden form1'e dönüş yapılamaz.) 'f.Show() ' f.Show() (bu şekilde yazıldığında ise form1'deki buton'a her tıklamada form2'yi yeniden açar.) End Sub

Şimdi sıra geldi Form2'deki değeri Form1'deki Label'a göndermeye. Şimdi Form2'deki kontrolleri düzenleyelim; 1 tane buton ve 1 Tane textbox koyuyoruz.




Ve şimdi geçelim kodlama bölümüne;

Kod:

Private Sub btnform2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnform2.Click Form1.Label2.Text = Me.TextBox1.Text Me.Close() End Sub

Private m_form1 As Form1 'form1'deki controllere ulaşabilmek için private bir değişken tanımlıyoruz.

Kod:

Public Sub LoadMe(ByRef form As Form1) m_form1 = form ' Tanımladığımız Private değişkeni Public Sub içinde kullanarak. Form1'deki bütün herşeye ulaşmamızı sağlıyor. End Sub

Projemizi çalıştırıyoruz şimdi. İlk açılış olarak Form1'i seçiyoruz.





Ve projemizi çalıştırıp Form1'de bulunan Diğer Form’a geçiş yapacağımız Buton'a tıklıyoruz.





Form2'yi açıldıktan sonra Form2'de bulunan buton'a tıklıyoruz ve form2'deki textboxta bulunan yazı Form1'e Geçmiş oluyor.





Bir sonraki makalemde veritabanından çektiğimiz verileri Datagrid'de görüntüleyip seçtiğimiz veriyi bir başka forumdaki TextBoxlar'a göndereceğiz.
 

Users Who Are Viewing This Konu (Users: 0, Guests: 1)

Üst