rs!yetistigicevre = Forms!frm_ogrenciler!frmalt1.Form!txtcevre.Column(0)
"INSERT INTO ........... (.............) VALUES ('" & ........... & "')"
Dim sayi As Integer sayi = DCount("Id", "Tablo1") Const tableSize As Integer = sayi Dim dizi(tableSize, 3) As String