Private Sub Liste0_Click()
Me.personelno = Me.Liste0.Column(1)
Me.adi = Me.Liste0.Column(2)
Me.soyadi = Me.Liste0.Column(3)
Me.sicili = Me.Liste0.Column(4)
Me.rutbesi = Me.Liste0.Column(5)
End Sub
Birkaç alanı böyle yazarak getirdim. Benzersiz alanları ilişkisiz yaptım.
Tşk Sn.ozguryasin
"Oyun bitince şah ve piyon aynı kutuya atılır "
