MENAMPILKAN GAMBAR KE DALAM FORM
Project 1 . Form 1(code)Dim NewElement As IntegerPrivate sub Form (click)Load image1(NewElement)Image 1(NewElement).Visible=TrueImage 1(NewElement).Top=Cint (Form 1.Height*Rnd)Image 1(NewElement).Left=Cint (Form 1.Width*Rnd)NewElement =NewElement+1End subPrivate Sub Form _Load( )NewElement=1End Sub
Rabu, 02 September 2009
Langganan:
Posting Komentar (Atom)
Tidak ada komentar:
Posting Komentar