Başlangıç > Kodlar > Visual Basic 6 ile veri tabanında arama yapmak

Visual Basic 6 ile veri tabanında arama yapmak

Visual data manager'da yapilan veri tabani, formun uzerine data nesnesi eklendikten ve bilgiler forma taşındıktan sonra formun üzerine yerleştirilen command butonunda arama yapabilmek için gerekli kod.


Private sub ara_click()
Data1.Recordset.Movefirst
Do while Data1.Recordset.EOF=False
if Rata1.Recordset.sicilno=aranan.text then
form1.text1=Data1.Recordset.adi'istenilen   yazilir.ve eklenir

Exit Do
Else
Data1.Recordset.Movenext
End if
Loop
if Rata1.Recordset.EOF Then
msgbox("kayit bulunamadi")
End if
End sub


TD Software


Reklamlar
  1. 30/11/2011, 03:30

    adam bir açıklama yapar sicilno ne oluyor tablo adımı

    Beğen

  1. No trackbacks yet.

Bir Cevap Yazın

Aşağıya bilgilerinizi girin veya oturum açmak için bir simgeye tıklayın:

WordPress.com Logosu

WordPress.com hesabınızı kullanarak yorum yapıyorsunuz. Çıkış  Yap / Değiştir )

Twitter resmi

Twitter hesabınızı kullanarak yorum yapıyorsunuz. Çıkış  Yap / Değiştir )

Facebook fotoğrafı

Facebook hesabınızı kullanarak yorum yapıyorsunuz. Çıkış  Yap / Değiştir )

Google+ fotoğrafı

Google+ hesabınızı kullanarak yorum yapıyorsunuz. Çıkış  Yap / Değiştir )

Connecting to %s

%d blogcu bunu beğendi: