Dear miliser
Saya punya masalah ni...
saya lagi bikin program di kampus aku. untuk
memudahkan, berikut petikan kode program yang ada :
Private Sub TxtStambuk_KeyPress(KeyAscii As Integer)
If KeyAscii = vbKeyReturn Then
DtMahasiswa.Recordset.FindFirst "stambuk = '" +
TxtStambuk.Text + "'"
LblStambuk.Caption =
DtMahasiswa.Recordset!STAMBUK
LblAlamat.Caption = DtMahasiswa.Recordset!alamat
LblTtl.Caption = DtMahasiswa.Recordset!ttl
ImgFoto.Picture = LoadPicture("C:\......\" &
TxtStambuk.Text + ".jpg")
dst..
If DtMahasiswa.Recordset.NoMatch Then
MsgBox "Data yang Anda cari tidak ditemukan,
Periksa kembali Nomor Stambuk yang Anda masukan",
vbOKOnly + vbInformation, "Konfirmasi"
dst...
end if
end if
perintah diatas adalah perintah untuk menampilkan
data
mahasiswa beserta foto masing2, masalahnya adalah
ketika nomor stambuk yang diimput salah atau belum
ada, programnya g mau jalan dengan informasi nomor
yang saya masukan (file jpg)tidak ditemukan,dalam hal
ini masalahnya terletak pada listing load picture.
pertanyaan saya ada bagaimana listing yang akan saya
dibuat agar penolakan setara dengan listing :
If DtMahasiswa.Recordset.NoMatch Then
MsgBox "Data yang Anda cari tidak ditemukan,
Periksa kembali Nomor Stambuk yang Anda masukan",
vbOKOnly + vbInformation, "Konfirmasi"
dst...
end if
Saya mohon bantuannya......
Wasallam
__________________________________________________
Do You Yahoo!?
Tired of spam? Yahoo! Mail has the best spam protection around
http://mail.yahoo.com
Untuk berhenti berlangganan kirim email kosong ke : [EMAIL PROTECTED]
Bagi terjangkit virus lokal, zip virus tersebut
dan kirim ke [EMAIL PROTECTED], kami
akan membuat removalnya untuk anda.
Yahoo! Groups Links
<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/indoprog-vb/
<*> To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/
