VARIABEL VISUAL BASIC

"VARIABEL VISUAL BASIC"
Private Sub Command1_Click( )Dim a As IntegerDim b As IntegerDim c As StringDim d As Stringa= 1.2+2.3 'Berapa nilai ab=1.3+2.3 'Berapa nilai bc="100" 'Berapa nilai cd=c+200 'Berapa nilai dPrint aPrint bPrint cPrint dEnd Sub

MENAMPILKAN GAMBAR KE DALAM FORM

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