Welcome to This my Mind (˘ʃƪ˘): Mei 2012 :)

Senin, 28 Mei 2012

Membuat Jam Digital menggunakan VB

Public Class Form1

    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        Dim jam As Date
        jam = DateTime.Now
        TextBoxJam.Text = jam.Hour.ToString()
        TextBoxMenit.Text = jam.Minute.ToString()
        TextBoxDetik.Text = jam.Second.ToString()
        'TextBoxTanggaltanggal.text=jam.Date.ToString()
    End Sub

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim tgl As Date = Now.Date
        TextBoxTanggal.Text = tgl
        Timer1.Start()
    End Sub
End Class

HASILNYA >>



SELAMAT MENCOBA :) :D

Script Membuat Kalkulator Sederhana

 


<html>
<head>
<title>Kalkulator Sederhana</title>
<style type="text/css">
</style>
 <SCRIPT LANGUAGE="Javascript">
window.defaultStatus="Let count your number"

function tambah()
{
a=eval(form.a.value)
b=eval(form.b.value)
c=a+b
form.hasil.value = c
}

function kurang()
{
a=eval(form.a.value)
b=eval(form.b.value)
c=a-b
form.hasil.value = c
}

function kali()
{
a=eval(form.a.value)
b=eval(form.b.value)
c=a*b
form.hasil.value = c
}

function bagi()
{
a=eval(form.a.value)
b=eval(form.b.value)
c=a/b
form.hasil.value = c
}

function pangkat()
{
a=eval(form.a.value)
b=eval(form.b.value)
c=Math.pow(a, b)
form.hasil.value = c
}

function akar()
{
a=eval(form.a.value)
c=Math.sqrt(a)
form.hasil.value = c
form.b.value = "Akar pangkat 2"
}

function kosong()
{
form.a.focus()
form.a.value=""
form.b.value=""
form.hasil.value=""

}

</SCRIPT>
</head>

<body onload=kosong()>
<font face="verdana" size="4">Program Kalkulator</font></br>
<FORM name="form">
<table>
    <tr>
        <td valign="top">
        Angka 1 <input type="text" name="a" >
        Angka 2 <input type="text" name="b" >
        Hasil<input type = "text" name = "hasil" disabled = "true" >
        </td>
        <td>
        <input type="button" value="Hapus" onClick="kosong()">
        <input type="button" value="+" onClick="tambah()">
        <input type="button" value="-" onClick="kurang()">
        <input type="button" value="*" onClick="kali()">
        <input type="button" value="/" onClick="bagi()">
        <input type="button" value="^" onClick="pangkat()">
        <input type="button" value="SQRT" onClick="akar()">
        </td>
    </tr>
</table>
</FORM>
</body>
</html>


INI HASILNYA =




 SILAHKAN DICOBA dan SEMOGA BERHASIL :)