CARA MEMBUAT UPLOAD GAMBAR DI VISUAL BASIC

-

Hai sob, gimana kabarnya semoga baik2 saja ya dan sehat selalu.. malam ini ane coba share ni dan berbagi ilmu untuk sobat yang lagi belajar visual basic 6 tentang bagaimana cara membuat form upload gambar di VB. Tanpa berlama-lama langsung saja ya ikutin langkah-langkah nya sebagai berikut :    


1 1. Buka jendela baru form yang akan kita masukkan gambar

    2  Aktifkan Microsoft Common Dialog Control dengan cara Klik menu project lalu pilih Component


2 2.       Masukkan beberapa kontrol yaitu CommondDialog, image dan command pada form seperti gambar dibawah


3 3.       Langkah selanjutnya yaitu menambahkan script yang ada pada command Upload sbb:

Private Sub Command1_Click()
CommonDialog1.ShowOpen
Image1.Picture = LoadPicture(CommonDialog1.FileName)
End Sub

4 4.       Jalankan Program anda

    Mudah bukan semoga berhasil yaa.. selamat mencoba baca juga
    Baca juga : Cara Membuar Login di Visual Basic

Postingan populer dari blog ini

MEMASUKAN PRESET KAMERA RAW KE ADOBE PHOTOSHOP CC

-
Gambar
  Selamat pagi dan selamat beraktifitas ya sobat semua pada kesempatan ini saya akan membagikan tutorial cara menambahkan preset camera RAW di adobe CC, yuk langsung saya simak caranya   1.        Siapkan file preset yg akan kita insert ke photoshop, kemudian silahkan sobat copy kemudian pastekan di folder setting dengan cara Local Disk C >   User > AppData > Roaming > Adobe > Camera Raw > Setting. Jika folder app data belum muncul silahkan sobat munculkan terlebih dahulu atau caranya bisa sobat lihat disini 2.        Lalu silahkan sobat pastekan di folder setting tadi 3.        Setelah selesai lalu silahkan buka adobe photoshop sobat pilih Filter > Camera Raw Filter 4.        Setelah muncul kotak dialog pilih preset maka otomatis preset yang kita tambahkan tadi akan muncul Sekian semoga bermanfaat bagi teman-teman terimakasih  
Baca selengkapnya

CARA MEMBUAT PROGRAM PERKALIAN SEDERHANA PADA VISUAL BASIC

-
Gambar
Untuk cara-cara nya simak langkah- langkah sebagai berikut :  1.        Masukkanlah 4 buah label, 3 buah teks box, dan 3 buah command.. 2.        Buatlah field – field sebagai berikut : Atribut Caption Name Command1 &Hitung Cmdhitung Command2 &Hapus Cmdhapus Command2 &Keluar Cmdkeluar Label1 RUMUS PERKALIAN Label1 Label2 Bilangan Pertama Txtbil1 Label3 Bilangan Kedua Txtbil2 Label1 Hasil txtbilhasil 3.        Klik 2x pada command hitung lalu tuliskan scrip sebagai berikut : Private Sub cmdhitung_Click(Index As Integer) Dim bil1, bil2, bilhasil bil1 = Val(txtbil1.Text) bil2 = Val(txtbil2.Text) bilhasil = bil1 * bil2 txtbilhasil.Text = bilhasil End Sub 4.        Untuk command hapus tuliskan scrip sebagai berikut : Private Sub cmdhapus_Click(Index As Integer) txtbil1.Text = ""
Baca selengkapnya

Cara Menampilkan folder yang tersembunyi (hidden) di windows 7

-
Gambar
Secara default di windows terdapat beberapa file tersembunyi yang bertujuan untuk menjaga agar file tersebut tidak rusak atau terhapus oleh user, lalu bagaimana cara agar folder tersebut bisa muncul ? disini saya akan memberi tutorialnya yaitu sebagai berikut :   1.        Buka Windows Explorer sobat 2.        Setelah muncul pilih menu organize > folder and search options 3.        Setelah muncul kotak dialog pilih tab View kemudian ceklis di bagian Show hidden files, folder,and drives seperti gambar berikut : 4.        Setelah selesai klik OK
Baca selengkapnya