PKK PancaKarya

 Membuat Aplikasi pendaftaran login dari produk Pancakarya (kuliner)


1. Tampilan awal 

Tampilan awal berupa identitas basic seperti nama dll


2. Setelah Berasil login, akan mucnul seperti ini 


3. Setelah Berhasil login dan memencet ok, akan muncul menu seperti ini 


dengan Code Script :
Sub hitung()
        Dim udukmoz As Int32 = Convert.ToInt32(TextBox1.Text) * 10
        Dim udukbakar As Int32 = Convert.ToInt32(TextBox2.Text) * 10
        Dim escampur As Int32 = Convert.ToInt32(TextBox3.Text) * 10
        Dim birpletok As Int32 = Convert.ToInt32(TextBox4.Text) * 8
        TextBox5.Text = CStr(udukmoz + udukbakar + birpletok + escampur) + "000"

    End Sub
    Private Sub Form3_Load(sender As Object, e As EventArgs) Handles MyBase.Load

    End Sub

    Private Sub reset_Click(sender As Object, e As EventArgs) Handles reset.Click
        MessageBox.Show("Pesanan anda terkonfirmasi", "Terkonfirmasi", MessageBoxButtons.OK, MessageBoxIcon.Information)

        product_countmoz = TextBox1.Text
        product_countkar = TextBox2.Text
        product_countcam = TextBox3.Text
        product_counttok = TextBox4.Text

        product_ttl = TextBox5.Text
        Me.Hide()
        Form5.Show()

    End Sub

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        hitung()

    End Sub

    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        TextBox5.Text = String.Empty
        TextBox1.Text = String.Empty
        TextBox2.Text = String.Empty
        TextBox3.Text = String.Empty
        TextBox4.Text = String.Empty
    End Sub

4. Setelah itu, akan masuk ke tampilan perhitungan total 


dengan code script : 
Private Sub Form5_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        TextBox1.Text = product_countmoz
    End Sub

    Private Sub TextBox2_TextChanged(sender As Object, e As EventArgs) Handles TextBox2.TextChanged
        TextBox2.Text = product_countkar
    End Sub

    Private Sub TextBox3_TextChanged(sender As Object, e As EventArgs) Handles TextBox3.TextChanged
        TextBox3.Text = product_countcam
    End Sub

    Private Sub TextBox4_TextChanged(sender As Object, e As EventArgs) Handles TextBox4.TextChanged
        TextBox4.Text = product_counttok
    End Sub

    Private Sub TextBox5_TextChanged(sender As Object, e As EventArgs) Handles TextBox5.TextChanged
        TextBox5.Text = product_ttl
    End Sub

    Private Sub Label5_Click(sender As Object, e As EventArgs) Handles Label5.Click


    End Sub

    Private Sub reset_Click(sender As Object, e As EventArgs) Handles reset.Click
        Me.Hide()
        Form4.Show()
    End Sub
End Class



5. Setelah semua selesai akan tampil terimakasih/penutup 


























Comments

Post a Comment

Popular posts from this blog

TERKUAK!!! begini cara buat tabel HTML yang sangat meng-ez abiez

Image
Halo readderzzz,  Pada kesempatan kali ini, saya akan memberikan tips and tricks cara termudah membuat tabel di bahasa pemograman HTML.    A. Pengertian tabel di HTML  Tabel merupakan cara untuk menampilkan informasi dalam bentuk sel yang terdiri atas baris dan kolom. Tabel dibuat dengan menggunakan tag <table>. Sebuah tabel dibagi menjadi baris-baris, dan tiap baris dibagi ke dalam cell-cell.  Baris dibuat dengan tag <tr>, dan cell-cell yang akan membentuk kolom dibuat dengan tag <td>.Dalam konteks HTML, table mempunyai peranan yang sangat penting. Selain digunakan untuk menampilkan tabel berisi data, table juga digunakan untuk menyusun teks dalam kolom, ataupun membuat laporan terstruktur lainnya.   B. Cara membuat tabel HTML dari yang termudah ke yang ter lumayan sulit   Tabel mudah :  adapun contoh tabel mudah yaitu :  Contoh Coding-an HTML nya :  Tabel mudah, cuma ditambahin Colspan & Rowspan Colspan atau column span merupakan atribute HTML y
Read more

PHP Part 4 : Operator Aritmatika

  Operator Aritmatika Dalam PHP : Operator sering digunakan untuk program yang mengandung perhitungan atau suatu kondisi juga digunakan untuk memanipulasi atau mengubah suatu nilai pada variabel yang sudah ditentukan.  Operator Aritmatika banyak digunakan dalam dunia AKUTANSI baik akutansi keuangan dan akutansi Ekonomi. contoh nya 100.000 - 50.000          100.000 dan 50.000 biasa disebut operasi dan tanda - adalah operasi.   Dalam bahasa pemrograman PHP, terdapat 3 operasi utama yaitu : Operator Binary Operator Unary Operator Ternary Operator Aritmatika : Penjumlahan <?php     $yudhis = 2 ;     $udin = 3 ;     //tampilkan melalui echo     echo ( $yudhis + $udin ); <?php        2. Pengurangan <?php     $yudhis = 2006 ;     $udin = 2005 ;     //tampilkan melalui echo     echo ( $yudhis - $udin ); <?php        3. Perkalian <?php     $yudhis = 20043 ;     $udin = 200245 ;     //tampilkan melalui echo     echo ( $yudhis * $udin ); <?php         4. Pembagian <?
Read more

Ini dia 4 operator PHP : Dasar-dasar

Image
1. OPERATOR PENUGASAN Operator penugasan atau assisment adalah suatu operator yang memberi nilai kepada suatu variabel/kode. Nilainya sendiri itu bisa nilai tunggal yang jelas.  <?php $angka3 = 2022 ; echo "contoh penugasan 'isi nilai pengurangan' adalah  2022 - 2006 = " .( $angka3 -= 2006 ). "<br/>" ; //contoh saja di koding saya ini. nilai variabel $angka3 adalah 2022 //echo untuk menampilkan awalan dan ".($angka3 -= 2006) adalah perintah nya // dan hasilnya akan muncul seperti ini. 2. OPERATOR PERBANDINGAN  Operator ini berfungsi untuk membandingkan 2 nilai yang berbeda, hanya ada 2 nilai yaitu TRUE jika hasil perbandingannya sama dan FALSE jika nilainya tak sama atau berbeda   <?php //deklarasi variabel dulu dongs $angka1 = 99 ; $angka2 = 100 ; //lanjut ke perintah nya if ( $angka1 < $angka2 ){     echo "awikwok kecil coegg aokwokko" ; } else {     echo "diluar nalar akal sehat" ; } //echo awikwok dan echo diluar
Read more