- Buat Tabel, yg salah satu field name misalnya TextFoto dengan data typenya text - input tabel tsb dimana di field TextFoto coba isi Rmh1 - Bikin Form dengan records sourcenya tabel yang di atas - masukan di tab event on current, sintaks sbb : Private Sub Form_Current() If Len(Trim(txtFoto)) <> 0 Then Image81.Picture = CurrentProject.path & "\foto\" & Trim(txtFoto) Me.Refresh End If End Sub - dlm form itu masukan sebuah Text Box dengan properties name dan control sourcenya textFoto - msh dlm form itu juga, masukan image pada posisi foto yang dinginkan, kemudian kita diminta untuk memilih folder foto yang tersedia (posisi file Rmh1.jpg), INGAT : lihat propertisnya image berapa ? contoh diatas Image81. semoga membantu.... --- Pada Sel, 7/2/12, Ronny <ronny.yahya@bridgestone.co.id> menulis:
|
__._,_.___
SPAM IS PROHIBITED
.
__,_._,___
No comments:
Post a Comment