CARA MENGHITUNG DENDA DI VISUAL BASIC 6

-

Berikut merupakan contoh program sederhana untuk menghitung denda seperti pengembalian dan lainnya..
untuk langkah-langkah nya adalah sebagai berikut :

11.     Buatlah desain form seperti gambar berikut yang terdiri dari :
-          2 DTPicker
-          2 Text Box
-          5 Label
-          1 Command

22.   Kemudian double click pada command hitung dan masukan script berikut :
Private Sub Command1_Click()
Text1.Text = DTPicker2.Value - DTPicker1.Value
If Text1.Text >= 2 Then
Text2.Text = 1000 * Text1.Text
Else
Text1.Text = ""
Text2.Text = ""
End If
End Sub

33.    Siip selanjutnya jalankan program

SELAMAT MENCOBA !!!


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 terim...
Baca selengkapnya

MEMBUAT LOGO SCTV DI COREL DRAW

-
Gambar
Untuk membuat logo SCTV di corel draw dapat dilakukan dengan langkah – langkah sebagai berikut : 1. Buatlah tulisan SCTV dengan type font Eras Bold ITC   2. Lalu klik tulisan tadi kemudian klik menu arrange dan pilih break artistic text (ctrl K) untuk memisahkan       huruf dari   group.  3. Setelah huruf terpisah editlah huruf satu persatu   dengan cara klik kanan di dihuruf yang hendak di edit         lalu pilih converte to curves agar huruf dapat di bentuk sesuai keinginan   4. Kemudian edit huruf dengan menggunakan shape tool dengan cara klik tahan dan aturlah sesuai       gambar dibawah 1    5.   Berilah efek warna dengan cara pilih Fill pada toolbox kemudian pilih Fountain Fill a.        Type             : Linear b.    ...
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 co...
Baca selengkapnya