/* */

Monday, November 7, 2011

[belajar-access] Listbox

 

Rekan2 Accesser mohon pencerahannya,

Saya buat sebuah listbox yg isinya hanya "CODE" Dan sebuah Image pada form. Saya mengharapkan setiap kali saya klik data/code yg ada di listbox tsb gambarnya munculkan di Imange.

Tsb codingnya :

Private Sub List10_Click()
Dim path As String
On Error GoTo HideMe
path = "C:\IMAGES"
Me![Image5].Picture = path & "\" & Me.List10.ItemData(Me.List10.ListIndex) & ".jpg"
GoTo nol
HideMe:
Me![Image5].Picture = ""
nol:
End Sub

Kesalahannya ada dimana ???

Terima kasih, Salam Accessers
BambangMahfudin

__._,_.___
Recent Activity:
SPAM IS PROHIBITED
MARKETPLACE

Stay on top of your group activity without leaving the page you're on - Get the Yahoo! Toolbar now.

.

__,_._,___

No comments:

Post a Comment