Cara Merubah Ukuran Image di VB6 menggunakan HScrollBar dan VScrollBar

Cara Merubah Ukuran Image di VB6 menggunakan HScrollBar dan VScrollBar

Pada kesempatan ini TeknoTips.NET akan mengulas tentang "" dengan judul artikel "Cara Merubah Ukuran Image di VB6 menggunakan HScrollBar dan VScrollBar".

Trik kali ini saya akan membagikan bagaimana menerapkan HScrollbar dan VScrollbar di VB6 dengan bantuan sebuah kontrol image untuk memperbesar atau memeperkecil suatu gambar dengan kedua kontrol tersebut.

Berikut adalah pengertian antara HScrollbar dan VScrollbar. HScrollbar adalah sebuah komponen yang digunakan untuk memasukan data secara analog dengan menggeser tombol scroll ataupun menekan tombol [Left] dan [Right] sedangkan VScrollbar sebenarnya memilik fungsi yang sama dengan HScrollbar. Namun VScrollbar untuk arah atas-bawah, sedangkan HScrollbar untuk arah kiri-kanan. Berikut adalah properti yang digunakan dalam HScrollbar dan VScrollbar :
  • LargeChange  -> Untuk menentukan ukuran perubahan (Value) ketike user menggeser bar
  • Max                -> Menentukan nilai (value) Maximum
  • Min                ->  Menentukan nilai (value) Minimum
  • SmallChange -> Untuk menentukan nilai perubahan value ketika user melakukan klik pada                                   tanda panah
  • Value             -> Untuk mendapatkan/menentukan nilai HScrollBar

Dengan kedua kontrol itulah kita dapat merubah ukuran (Width dan Height) suatu gambar hanya dengan menggeser sebuah Scroll yang otomatis akan merubah tinggi dan lebar image tersebut.


Merubah Ukuran Image di VB6 menggunakan HScrollBar dan VScrollBar

Berikut adalah langkah langkah pembuatannya:
1. Buka form VB6 Anda
2. Tanamkan 1 VScrollBar, 1 HScrollbar1 PictureBox, 1 Image dan beberapa Label
3. Letakan Image1 didalam PictureBox kemudian berikan gambar didalam Image1
4. Desainlah seperti gambar dibawah ini:
Merubah Ukuran Image di VB6
Desain Form

5. Setelah itu Anda ketik kode berikut dibawah ini di jendela kode :

Private Sub Form_Load()
Image1.Height = 1000
Image1.Width = 1000
VScroll1.LargeChange = 1
VScroll1.Left = 3600
VScroll1.Min = 1000
VScroll1.Max = 3000

HScroll2.LargeChange = 100
HScroll2.Left = 240
HScroll2.Min = 1000
HScroll2.Max = 3000
End Sub
Private Sub HScroll2_Change()
Image1.Width = HScroll2.Value
End Sub
Private Sub VScroll1_Change()
Image1.Height = VScroll1.Value
End Sub

6. Simpan kode Anda dan jalankan program

7. Setelah program berhasil dijalankan coba perbesar/perkecil gambar dengan cara menarik 
    HSrollBar dan VScrollBar.

Demikian Cara Menggunakan HScrollBar dan VScrollBar Untuk Merubah Ukuran Image di VB6. Selamat mencoba semoga berhasil.

Keyword : Tutorial Visual Basic 6.0,
Untuk mendapat notifikasi setiap artikel terbaru, masukkan e-mail anda disini : Tuliskan komentar relevan anda dibawah ini dengan jelas & sopan, sesuai dengan topik ulasan mengenai Tutorial Visual Basic 6.0 Terbaru 2019.

Untuk menghindari spam dan tautan aktif, komentar akan dimoderasi. Dapatkan balasan dari melalui e-mail anda :

Komentar artikel "Cara Merubah Ukuran Image di VB6 menggunakan HScrollBar dan VScrollBar"

Posting Komentar

Iklan Atas Artikel

Iklan Tengah Artikel 1

Iklan Tengah Artikel 2

Iklan Bawah Artikel