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.
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.
Alıntıdır.