Membuat Kalkulator Sederhana Dengan VB 6.0



BUATLAH FORM DI BAWAH INI


Memuat foto

 Ketiklah Listing Di Bawah Ini

Tombol Tambah
Private Sub Command1_Click()
Text3.Text = Val(Text1.Text) + Val(Text2.Text)
End Sub

Tombol Kali
Private Sub Command10_Click()
Text3.Text = Val(Text1.Text) * Val(Text2.Text)
End Sub

Tombol Bagi
Private Sub Command11_Click()
Text3.Text = Val(Text1.Text) / Val(Text2.Text)
End Sub

Tombol Kurang
Private Sub Command12_Click()
Text3.Text = Val(Text1.Text) - Val(Text2.Text)
End Sub

Tombol Pangkat
Private Sub Command2_Click()
Text3.Text = Val(Text1.Text) ^ Val(Text2.Text)
End Sub


Tombol Tebal
Private Sub Command3_Click()
Label6.FontBold = True
End Sub
Private Sub Command4_Click()
Label6.FontItalic = True
End Sub

Tombol Garis Bawah
Private Sub Command5_Click()
Label6.FontUnderline = True
End Sub

Tombol Biru
Private Sub Command6_Click()
Label6
.ForeColor = vbBlue
End Sub

Tombol Kuning
Private Sub Command7_Click()
Label6.ForeColor = vbYellow
End Sub

Tombol Normal
Private Sub Command8_Click()
Label6.ForeColor = vbBlack
Label6.FontBold = False
Label6.FontItalic = False
Label6.FontUnderline = False
End Sub

Tombol Keluar
Private Sub Command9_Click()
End
End Sub

Klik Dua Kali Pada Timer
Private Sub Timer1_Timer()
Label1.Caption = Format(Now, "dd-mm-yyyy")
Label2.Caption = Format(Now, "hh:mm:ss Am/Pm")
End Sub



Program ini dibuat oleh Heri Afrizal di bireuen
http://hery-pc.blogspot.com

Popular posts from this blog

Image
Saya sarankan jangan melihat gambar gambar ini..!!
Read more

Cara Merangsang Klitoris Wanita

Image
Cara Merangsang Klitoris Wanita - Wanita punya beberapa titik rangsangan yang sangat berguna diketahui oleh para pria untuk agar mereka bisa mencoba melakukan beberapa kombinasi aksi maut demi kepuasan pasangan wanitanya. Mungkin Anda sudah cukup mengetahui tentang G-Spot yang sudah sangat popular itu, sekarang mari kita lihat bagian lain yang tidak pernah gagal memberikan orgasme baginya yaitu klitoris . Memahami bagian klitoris wanita adalah kunci agar pasangan wanita Anda menjadi ketagihan. Stephanie Eldred, koresponden dari AskMen akan menjelaskan semuanya agar para pria lebih mengerti tentang bagian penting ini. Tentang klitoris Klitoris adalah bagian yang berbentuk seperti kuncup yang berada sedikit di atas bagian depan vagina wanita, di ujung inner labia/labia minora. Ukuran dan bentuk klitoris pada wanita berbeda-beda, tetapi pada umumnya berukuran 1/8 sampai 3/8 inchi. Klitoris wanita sama dengan penis pada pria, terdapat banyak ujung syaraf yang membua...
Read more

Membuat nomor urut secara otomatis pada database MySQL menggunakan php

Image
Waktu dulu pernah saya tulis tutorial serupa tentang Cara membuat nomor urut terbentuk secara otomatis pada database MySQL, hanya saja kali ini saya akan memberikan contoh pemrosesan nya menggunakan php, yang mana pada saat pemrosesanya nanti akan dibuatkan query ke MySQL terlebih dahulu untuk mengambil data nomor yang terakhir, dan nantinya data nomor tersebut akan ditambah 1 (satu) sebelum dimasukan ke table database. Baiklah, kita langsung saja membuatkan contohnya.... Pertama-tama silahkan buat terlebih dahulu database baru bernama terserah anda, dan tambahkan table beserta field-field nya, silahkan copy saja contoh table dibawah ini agar lebih mempercepat tutorial ini, hehe... CREATE TABLE `namatable` (   `nomor` int(11) NOT NULL,   `nama` varchar(50) NOT NULL,   `alamat` varchar(100) NOT NULL,   PRIMARY KEY  (`nomor`) ) ENGINE=MyISAM DEFAULT CHARSET=utf8; Baiklah, database baru berikut contoh table diatas sudah terbentuk, kemudian si...
Read more