Menampilkan gambar di Visual Basic

Buat form seperti di bawah ini dengan menambahkan image🙂

Ketikkan kode  berikut pada kode editor


Private Sub Form_Load()

Form1.WindowState = 2
End Sub

Private Sub Form_Paint()
Dim x As Integer, y As Integer
Dim lebarGbr As Integer
Dim TinggiGbr As Integer
Dim lebarfrm As Integer
Dim tinggifrm As Integer

lebarGbr = Image1.Width
TinggiGbr = Image1.Height
lebarfrm = Form1.Width
tinggifrm = Form1.Height

For x = 0 To lebarfrm Step lebarGbr
     For y = 0 To tinggifrm Step TinggiGbr
          PaintPicture Image1, x, y
          Next y
Next x
End Sub

Run dan hasilnya seperti ini🙂

1 Response to “Menampilkan gambar di Visual Basic”


  1. 1 Johna628 Agustus 8, 2014 pukul 7:20 pm

    Hiya, I am really glad I have found this information. Nowadays bloggers publish just about gossips and web and this is really annoying. A good blog with interesting content, that is what I need. Thanks for keeping this website, I’ll be visiting it. Do you do newsletters? Can not find it. gdkeddegcadf


Tinggalkan Balasan

Isikan data di bawah atau klik salah satu ikon untuk log in:

Logo WordPress.com

You are commenting using your WordPress.com account. Logout / Ubah )

Gambar Twitter

You are commenting using your Twitter account. Logout / Ubah )

Foto Facebook

You are commenting using your Facebook account. Logout / Ubah )

Foto Google+

You are commenting using your Google+ account. Logout / Ubah )

Connecting to %s




Me (^^)

About

Blog ini adalah catatan kuliah ku, tidak hanya mengenai materi kuliah tetapi juga tentang kegiatan, pengalaman aku selama kuliah :) .


=-=-=-=-=
image header = "Byousoku 5 cm " with edited :)

Liroesdy on Net (=^_^=)

Blog Stats

  • 59,078 hits
Click to view my 

Personality Profile page

My Personal Blog

Liroesdy Blog

Liroesdy Lab

Liroesdy Lab

%d blogger menyukai ini: