Selamat Datang Di Blog Azmi

This is default featured slide 1 title

Go to Blogger edit html and find these sentences.Now replace these sentences with your own descriptions.

This is default featured slide 2 title

Go to Blogger edit html and find these sentences.Now replace these sentences with your own descriptions.

This is default featured slide 3 title

Go to Blogger edit html and find these sentences.Now replace these sentences with your own descriptions.

This is default featured slide 4 title

Go to Blogger edit html and find these sentences.Now replace these sentences with your own descriptions.

This is default featured slide 5 title

Go to Blogger edit html and find these sentences.Now replace these sentences with your own descriptions.

Senin, 16 Desember 2013

Tentang Mesran.net

Tentang Mesran.net dan mesran.blogspot.com



mesran.net adalah sebuah web yg di dalamnya terdapat banyak hal-hal yang bermanfaat bagI mahasiswa jurusan computer
Pada mesran.Net dan mesran.blogspot.com terdiri beberapa artikel di antaranya artikel mengenai TipsBelajar bahasa Pemograman dan beberapa bahasa pemograman salah satunya VisualBasic . Net, serta program yang berorientasi pada Database , contoh : Program Visual Basic Net Simpan Edit Hapus Record Pada Database Access  bahkan ada banyak lagi .
Terima kasih mesran.Net karena telah menyediakan berbagai jenis program dan membantu saya memahami sertiap bahasa pemrograman dan jenis-jenisnya.
Dan Terima kasih untuk Bapak Mesran,M.Kom yang telah meluangkan waktunya untuk kami yakni membuat blog, posting artikel dan quiz online yang mana ini adalah hal sangat luar biasa untuk kami memahami semua bahasa pemrograman yang begitu sulit untuk dipahami menjadi mudah untuk dipahami.
semoga dengan slogan “Hanya ingin berbagi kebaikan dan mendapatkan kebaikan yang lain” dapat memberikan banyak ilmu yang  bermanfaat untuk kita semua


Aamiin.

LISTVIEW PERHITUNGAN PENJUMLAHAN BARANG

 BENTUK DESAIN LISTVIEW.....





Isikan Perintah di Bawah ini , Pada Bagian Masing-masing :

Public Class Form1
    Sub BuatTabel()
        lv.Columns.Add("Pembeli", 80, HorizontalAlignment.Center)
        lv.Columns.Add("Kode Barang", 100, HorizontalAlignment.Left)
        lv.Columns.Add("Nama Barang", 100, HorizontalAlignment.Left)
        lv.Columns.Add("Merk", 100, HorizontalAlignment.Left)
        lv.Columns.Add("Jumlah Beli", 100, HorizontalAlignment.Left)
        lv.Columns.Add("Harga", 100, HorizontalAlignment.Left)
        lv.View = View.Details
        lv.GridLines = True
        lv.FullRowSelect = True
    End Sub
    Sub isitabel()
        Dim lst As New ListViewItem
        lst.Text = np.Text
        lst.SubItems.Add(kb.Text)
        lst.SubItems.Add(nb.Text)
        lst.SubItems.Add(merek.Text)
        lst.SubItems.Add(jb.Text)
        lst.SubItems.Add(harga.Text)
        lv.Items.Add(lst)

    End Sub

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        BuatTabel()
        kb.Items.Add("TS001")
        kb.Items.Add("TS002")
        kb.Items.Add("VG001")
        kb.Items.Add("VG002")

    End Sub

    Private Sub kb_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles kb.SelectedIndexChanged
        Dim X As String
        Dim y As String

        X = Microsoft.VisualBasic.Left(kb.Text, 2)
        y = Microsoft.VisualBasic.Right(kb.Text, 3)
        Select Case X
            Case "TS" : merek.Text = "Toshiba"
            Case "VG" : merek.Text = "V-GEN"
        End Select
        Select Case y
            Case "001" : nb.Text = "Flashdisk 4GB"
            Case "002" : nb.Text = "Flashdisk 2GB"
        End Select

        If X = "TS" And y = "001" Then
            harga.Text = 105000
        ElseIf X = "TS" And y = "002" Then
            harga.Text = 75000
        ElseIf X = "VG" And y = "001" Then
            harga.Text = 50000
        ElseIf X = "VG" And y = "002" Then
            harga.Text = 80000

        End If
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bersih.Click
        np.Text = ""
        kb.Text = ""
        nb.Text = ""
        merek.Text = ""
        jb.Text = ""
        harga.Text = ""
    End Sub

    Private Sub hapusall_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles hapusall.Click
        lv.Items.Clear()
    End Sub

    Private Sub hapus_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles hapus.Click
        lv.Items.Remove(lv.SelectedItems(0))
    End Sub

    Private Sub keluar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles keluar.Click
        End
    End Sub

    Private Sub simpan_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles simpan.Click
        isitabel()
        np.Text = ""
        kb.Text = ""
        nb.Text = ""
        merek.Text = ""
        jb.Text = ""
        harga.Text = ""

     
    End Sub

    Private Sub lv_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles lv.SelectedIndexChanged

    End Sub

    Private Sub jb_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles jb.KeyPress
        If Asc(e.KeyChar) = 13 Then
            th.Text = harga.Text * jb.Text
            simpan.Focus()
        End If
    End Sub

    Private Sub jb_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles jb.TextChanged
      
    End Sub
End Class

Berikut Postingan Saya Kali ini....
Semoga Bermanfaat bagi teman - teman yang berkunjung....

KHAIRULAZMI.NET

Jumat, 15 November 2013

MENGHITUNG NILAI MAHASISWA DENGAN VS.2008

Kepada Teman-teman sekalian..
di sini kita akan belajar bagaimana menghitung Nilai Mahasiswa dengan Microsoft Visual Studio 2008
bagi teman-teman yang ingin belajar...
Silahkan Ikuti Langkah-langkah di bawah ini ....

langsung ajah :

> langkah ke-1

Silahkah Anda Buat Form 1 melalui Create Project...

Kemudian Ambil Komponen-Komponen yang Di perlukan melalui Toolbox..
Seperti ini :
-label
-textbox
-combobox
-botton

setelah itu desain sesuai selera yang anda inginkan....

> langkah ke-2

setelah selesai  mendisain ...
ubah nama dari ;
-textbox
-combobox,dan
- Tombol botton
menjadi nama sesuai pada label
contoh :
pada kotak label "nama"
pada kotak textbox ubah menjadi "nama" di (name) yg terdapat pada properties..

setelah selesai merubah semuanya ...
Sekarang saatnya kita memasukkan Perintah-Perintah...

> Langkah ke - 3

Double Klik sembarangan di Form 1..
dan yang perlu di perhatikan jangan di Klik  di bagian  label,textbox,combobox,dan lainnya...
Setelah di Double klik...

Silahkan Ketikkan Perintah Di bawah ini :
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        npm.Items.Add("12110376")
        npm.Items.Add("12110377")
        npm.Items.Add("12110378")
        npm.Items.Add("12110379")
        npm.Items.Add("12110380")
        npm.Items.Add("12110381")
        npm.Items.Add("12110382")
        Jenjang.Items.Add("S1")
        Jenjang.Items.Add("D3")
        Jenjang.Items.Add("D1")
        Jurusan.Items.Add("Sistem Informasi")
        Jurusan.Items.Add("Teknik Informatika")
        Jurusan.Items.Add("Manajemen Informatika")
        k_dosen.Items.Add("KKTI4301")
        k_dosen.Items.Add("KKTI4302")
        k_dosen.Items.Add("KKTI4303")
        k_dosen.Items.Add("KBTI4303")
        k_dosen.Items.Add("KBTI4302")
        k_dosen.Items.Add("KBTI4306")
        k_dosen.Items.Add("KBTI4305")
        k_matakuliah.Items.Add("ADK01")
        k_matakuliah.Items.Add("MTL02")
        k_matakuliah.Items.Add("SBD03")
        k_matakuliah.Items.Add("SD04")
        k_matakuliah.Items.Add("KD05")
        k_matakuliah.Items.Add("SO06")
        k_matakuliah.Items.Add("PV07")

        Dim i As Integer
        For i = 1 To 100
            N_kehadiran.Items.Add(i)
        Next i
        i = 1
        Do While i <= 100
            N_tugas.Items.Add(i)
            i = i + 1
        Loop
        i = 100
        Do Until i = 0
            N_UTS.Items.Add(i)
            i = i - 1
        Loop
        i = 1
        While i <= 100
            N_Uas.Items.Add(i)
            i = i + 1
        End While
    End Sub

 > Langkah ke-4 

Setelah anda mengetikkan Perintah di atas tadi..
selanjutnya, anda kembali lagi ke tampilan Desain...
kemudian Double klik Button Keluar ...
Kemudian Ketikkan Perintah Di bawah ini .....

    Private Sub Btn_Keluar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btn_Keluar.Click
        Me.Close()
    End Sub

 > Langkah ke-5

Setelah anda mengetikkan Perintah di atas tadi..
Sama seperti Sebelumnya, anda kembali lagi ke tampilan Desain...
kemudian Double klik Button Hapus ...
Kemudian Ketikkan Perintah Di bawah ini .....

    Private Sub Btn_Hapus_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btn_Hapus.Click
        npm.Text = ""
        nama.Text = ""
        jenjang.Text = ""
        jurusan.Text = ""
        k_dosen.Text = ""
        nama_dosen.Text = ""
        k_matakuliah.Text = ""
        Nama_matakuliah.Text = ""
        N_kehadiran.Text = ""
        N_tugas.Text = ""
        Nilai_Akhir.Text = ""
        N_Uas.Text = ""
        N_UTS.Text = ""
        Nilai_huruf.Text = ""
        Keterangan.Text = ""
        npm.Focus()
    End Sub

 > Langkah ke-6

Setelah anda mengetikkan Perintah di atas tadi..
selanjutnya, anda kembali lagi ke tampilan Desain...
kemudian Double klik Combobox NPM ...
Kemudian Ketikkan Perintah Di bawah ini .....

    Private Sub npm_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles npm.SelectedIndexChanged
        Select Case npm.Text
            Case "12110376"
                nama.Text = "Khairul Azmi"
            Case "12110377"
                nama.Text = "Khairul Bunaya"
            Case "12110378"
                nama.Text = "Elvita Khairani"
            Case "12110379"
                nama.Text = "Ahmad Khoiri"
            Case "12110380"
                nama.Text = "Muhammad Khoirullah"
            Case "12110381"
                nama.Text = "Nawawi"
            Case "12110382"
                nama.Text = "Engki Krisnanda"

        End Select
    End Sub

 > Langkah ke-7 

Setelah anda mengetikkan Perintah di atas tadi..
selanjutnya, anda kembali lagi ke tampilan Desain...
kemudian Double klik Combobox NPM ... ...
Kemudian Ketikkan Perintah Di bawah ini .....

   Private Sub kode_dosen_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles k_dosen.SelectedIndexChanged
        Select Case k_dosen.Text
            Case "KKTI4301"
                nama_dosen.Text = "Pilipus Tarigan,ST,M.Kom"
            Case "KKTI4302"
                nama_dosen.Text = "Hery Sunandar,ST,M.Kom"
            Case "KBTI4303"
                nama_dosen.Text = "Tonny Limbong, S.Kom, M.Kom"
            Case "KKTI4303"
                nama_dosen.Text = "Marzuki Sinambela, MT"
            Case "KBTI4302"
                nama_dosen.Text = "Zekson Aritona Matondang M.Kom"
            Case "KBTI4306"
                nama_dosen.Text = "Yasir Hasan, S.Kom"
            Case "KBTI4305"
                nama_dosen.Text = "Mesran, S.Kom, M.Kom"
        End Select
    End Sub

> Langkah ke-8

Setelah anda mengetikkan Perintah di atas tadi..
selanjutnya, anda kembali lagi ke tampilan Desain...
kemudian Double klik Combobox Mata Kuliah ... ...
Kemudian Ketikkan Perintah Di bawah ini ..... 

    Private Sub kode_matakuliah_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles k_matakuliah.SelectedIndexChanged
        Select Case k_matakuliah.Text
            Case "ADK01"
                Nama_matakuliah.Text = "Arsitektur dan Organisasi komputer"
            Case "MTL02"
                Nama_matakuliah.Text = "Matriks dan Transformasi linier"
            Case "SBD03"
                Nama_matakuliah.Text = "Sistem Basis Data"
            Case "SD04"
                Nama_matakuliah.Text = "Struktur Data"
            Case "KD05"
                Nama_matakuliah.Text = "Komunikasi Data"
            Case "SO06"
                Nama_matakuliah.Text = "Sistem Operasi"
            Case "PV07"
                Nama_matakuliah.Text = "Pemograman Visual"

        End Select
    End Sub

> Langkah ke-9

Setelah anda mengetikkan Perintah di atas tadi..
selanjutnya, anda kembali lagi ke tampilan Desain...
kemudian Double klik Button Process ... ...
Kemudian Ketikkan Perintah Di bawah ini ..... 
    Private Sub Btn_Proses_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btn_Proses.Click
        Nilai_Akhir.Text = 0.1 * Val(N_kehadiran.Text) + 0.15 * Val(N_tugas.Text) + 0.35 * Val(N_UTS.Text) + 0.4 * Val(N_Uas.Text)
        Select Case Nilai_Akhir.Text
            Case Is >= 80
                Nilai_huruf.Text = "A"
                Keterangan.Text = "LULUS"
            Case 70 To 79
                Nilai_huruf.Text = "B"
                Keterangan.Text = "LULUS"
            Case 60 To 69
                Nilai_huruf.Text = "C"
                Keterangan.Text = "LULUS"
            Case 50 To 59
                Nilai_huruf.Text = "D"
                Keterangan.Text = "GAGAL"
            Case Is <= 49
                Nilai_huruf.Text = "E"
                Keterangan.Text = "GAGAL"
        End Select
    End Sub
End Class

Untuk Mengujinya...Silahkan Klik tombol Debug atau Bisa juga tekan Tombol F5...

Berikut Tampilan Hasil dari Perintah-perintah yang teman Ketik tadi..


Demikianlah Hasil Dari Postingan Saya Kali ini...
semoga Bermanfaat bagi teman-teman semua..
jangan Lupa Mampir lagi ya.... Khairul azmi.net

Dan Bagi teman-teman yang ingin belajar Lebih lanjut..
Silahkan kunjungi blog Di bawah Ini :
TugasBelajar Bahasa Pemrograman

Senin, 24 Juni 2013

Program Penjualan Barang bahasa C dan Penggunaan Gotoxy




#include "stdio.h"
#include "conio.h"
void main () {
int i , kode [5] , jumlah [5] , jumdata = 3 ;
char * produk ;
float harga , total, disc=0,tobay;
clrscr();

printf ("\n input data penjualan") ;
for (i=0 ; i<=jumdata ; i++) {
printf ( "\n kode produk : ") ;
scanf ("%d" , &kode [i] ) ;
printf ( "\n jumlah produk : ") ;
scanf ("%d" , &jumlah [i]) ;
}
clrscr () ;
printf ("\n informasi penjualan produk") ;
printf ("\n ----------------------------------------") ;
printf ("\n No kode produk                harga  jumlah   total   discount  pembayaran") ;
printf ("\n ----------------------------------------") ;
for (i=0 ;  i <=jumdata ; i++ ) {

if (kode [i] == 1){
produk = "TV" ; harga = 20000000 ;
}else if (kode [i] == 2) {
produk = "DVD" ; harga = 650000 ;
}else if (kode[i] ==3) {
produk = "CD ROOM" ; harga = 4500000 ;
}
total = harga * jumlah [i] ;

{
if (total>4000000){
    disc=0.2*total;
}else if (total<2000000){
    disc=0.15*total;
}
tobay=total-disc;
gotoxy (1, 6+i) ; printf (" %i    %d   %s" , i+1 , kode [i] , produk) ;
gotoxy (30 ,6+i) ; printf ("%10.0f %i %10.0f %1.f  %10.0f" , harga , jumlah [i] , total , disc, tobay) ;
}
printf ("\n---------------------------------------------") ;
}
}




Selamat Mencoba semoga bermanfaat bagi teman-teman semua....

Tugas Bahasa Pemrograman
 Jangan lupa tinggalin comen ya...

Selasa, 11 Juni 2013

Cara Uninstall Aplikasi dengan Uninstaller Pro

Cara Uninstall Aplikasi dengan Uninstaller Pro
Di dalam laptop atau pun komputer anda pasti ada banyak sekali aplikasi yang sudah terinstall. Dan tentunya segala jenis aplikasi tersebut anda install karena anda membutuhkan aplikasi tersebut untuk tujuan tertentu. Misalnya saja seperti aplikasi microsoft word. Anda menginstall nya karena anda butuh sebuah aplikasi perkantoran yang dapat menyimpan dokumen penting anda. Maka dari itu anda install aplikasi microsoft word. Begitulah kira-kira gambaran nya mengapa di dalam laptop atau pun komputer terdapat banyak sekali aplikasi-aplikasi yang terinstall.
Cara Uninstall Aplikasi dengan Uninstaller Pro Pictures
Namun, jika anda sudah terlanjur menginstall suatu aplikasi, dan anda menggunakan aplikasi tersebut dalam jangka waktu 2 bulan saja. Maka setelah 2 bulan pastinya aplikasi tersebut tidak akan terpakai atau pun digunakan lagi. Dan solusi terbaik adalah anda harus mengapus atau pun meng-uninstallnya dari komputer atau pun laptop anda. Nah, hal itulah yang akan congkel bahas pada artikel kali ini. Yaitu bagaimana cara mudah unistall aplikasi dengan cepat menggunakan uninstaller pro. Aplikasi ini sangat mudah dipahami oleh banyak orang, dikarenakan tampilan nya yang sederhana dan tidak rumit. Bahkan mungkin orang awam pun bisa menggunakan aplikasi ini dengan mudah.
Berikut langkah-langkah uninstall aplikasi menggunakan uninstaller pro.
  • Pertama-tama, buka browser anda dan masuk pada link berikut https://sites.google.com/site/leizersoftware/menu-uninstallr-pro .
  • Kemudian klik Freeware Download Now.
  • Buka file terkompress yang sudah anda download tadi dan jalankan file MenuUninstallerPro.Exe.
  • Tunggu hingga proses instalasi nya selesai. Dan ingat! untuk meng-install aplikasi ini anda di haruskan terkoneksi ke internet.
  • Selanjutnya pada jendela instalasi, klik Next.
  • Setelah proses download semua file pendukung selesai, maka jendela instalasi akan keluar dan klik Next.
  • Setujui persyaratan lisensi yang muncul, lanjutkan dengan klik Next.
  • Kemudian, pada kolom informasi, isikan data-data asli anda dan klik Next.
  • Pada jendela penempatan folder instalasi, klik Next.
  • Jika proses instalasi sudah selesai, jangan lupa klik Finish.
  • Terakhir, untuk membuang atau pun uninstall program yang tidak anda inginkan, klik salah satu program tersebut lalu pilih Standart Uninstall.

Cara Mengcopy Aplikasi Android

Cara Mengcopy Aplikasi Android
Cara Mengcopy Aplikasi Android Pictures
Untuk pengguna android mungkin sudah terbiasa dengan menginstal aplikasi dari pihak ketiga untuk perangkat androidnya mau itu tablet atau pun smartphone, mengmang tidak dapat di pungkiri untuk melakukan penginstalan aplikasi-aplikasi lainnya kita butuh koneksi internet karena untuk mengakses data dari google play. dan sudah pasti untuk menginstal aplikasi yang ukurannya besar kita membutuhkan koneksi yang cepat dan stabil, bukan rahasia umum lagi jika koneksi internet di indonesia (sangat kencang ) dalam mimpi.
Mungkin sedikit akan menjadi solusi dengan mengcopy aplikasi android dari perangkat lain, mungkin dari smartphone teman atau keluarga anda yang lebih dulu telah mendownload aplikasi yang di inginkan. berikut adalah langkah bagaimana cara mengkopi aplikasi android dari perangkat lain yang telah menginstal aplikasi yang di maksud dan dapat dengan mudah dikirim melalui bluetooth atau simpan di komputer.
  • Pertama anda harus menginstal aplikasi File Expert  aplikasi ini memiliki beberapa fungsi tidak hanya untuk membackup file APK, tetapi banyak fungsi yang lain, sebagai file explorer, install / uninstall program, Theme Manager dll.

  • Jalankan aplikasi File Expert
Cara Mengcopy Aplikasi Android Pictures
  • Pilih pada menu My Apps
Cara Mengcopy Aplikasi Android Pictures
  • Akan muncul aplikasi-aplikasi yang terinstal, pilih aplikasi yang akan dicopy / dibuat APKnya dengan menceklist (memberi centang) di sebelah kanan dari aplikasinya Pada contoh saya memilih aplikasi IP Calculator untuk dibuat APKnya
Cara Mengcopy Aplikasi Android Pictures
  • Kemudian pilih/tap pada  Backup di sebelah bawah. maka secara otomatis file APK akan dibuat dan disimpan pada folderbackup_apps.
  • Untuk masuk ke folder backup_apps,  dari halaman utama masu ke menu My Files
Cara Mengcopy Aplikasi Android Pictures
Semoga berguna download aplikasi di google play disini.

Cara Menyembunyikan Aplikasi Aktif dengan Windows Hider

Cara Menyembunyikan Aplikasi Aktif dengan Windows Hider
Segala jenis aplikasi aktif yang ada pada windows akan selalu ditampilkan pada bagian taskbar komputer. Itu merupakan suatu hal yang pasti karena pada sistem windows sudah ditanamkan secara default segala jenis aplikasi yang aktif akan ditampilkan di taskbar. Meskipun aplikasi tersebut tidak dijalankan, tetap akan terlihat juga pada bagian taskbar komputer. Dan dengan adanya pengaturan default akan tampilan aplikasi aktif pada taskbar tersebut, ada yang senang dan ada pula yang kurang suka atau pun kurang nyaman. Ya hal ini bisa saja terjadi sesuai dengan pendapat masing-masing juga sebenarnya. Dan sudah pasti juga segala sesuatu nya ada yang setuju dan ada yang bertentangan.
Cara Menyembunyikan Aplikasi Aktif dengan Windows Hider Pictures
Nah, bagaimana solusi terbaik yang bisa dilakukan jika anda memang benar-benar ingin aplikasi aktif di komputer anda tidak ditampilkan di taskbar ? Kalau bicara masalah solusi terbaik sebenarnya tidak ada. Itu semua tergantung dari si pengguna saja sih, sukanya pake software apa. Tidak ada patokan mana software yang terbaik. Oleh karena itu kami kali ini akan membahas mengenai hal tersebut. Mengenai bagaimana caranya agar aplikasi aktif di komputer tidak terlihat di taskbar atau pun dengan kata lain aplikasi aktif tersebut disembunyikan di taskbar. Tapi anda harus ingat, aplikasi ini tidak dihilangkan dari taskbar anda, tetapi hanya di hidden kan saja alias disembunyikan.
Berikut langkah-langkah nya.
  • Download terlebih dahulu aplikasi Windows Hider nya pada link berikut http://codecaged.com/windows-hider/ .
  • Pada link tersebut ada 2 jenis file yang dapat di download, yaitu:
    - Klik menu Installer (jika ingin menggunakan installer di dalamnya) dan klik button download.
    - Klik menu Portable (jika ingin dalam bentuk file ekstraksi tanpa instal) lalu klik button download.
  • Install dan jalankan aplikasi tersebut.
  • Buka sebuah aplikasi lain seperti Ms. Excel misalnya. Maka setelah anda buka, aplikasi Ms. Excel akan muncul pada jendela sebelah kiri pada aplikasi Windows Hider.
  • Klik pada aplikasi tersebut di Windows Hider dan klik button Add.
  • Setelah anda klik button Add, maka secara otomatis aplikasi Ms. Excel akan berpindah ke jendela Windows Hider yang di sebelah kanan.
  • Untuk menyembunyikan aplikasi tersebut, klik button Hide/Show Current Group.
  • Untuk menampilkan nya kembali di taskbar, cukup tekan lagi button Hide/Show Current Group.
Maka aplikasi Ms. Excel akan hilang di taskbar. Walaupun di hidden kan aplikasi nya, tetapi anda tetap bisa menggunakan aplikasi tersebut tanpa harus di tutup terlebih dahulu.

Kamis, 06 Juni 2013

Jawaban Soal No.2


#include <iostream.h>
#include <conio.h>

main()
{
      char nama[30];
     int golongan;
     long int gaji_pokok, tunj_istri, tunj_anak,gaji_bersih, pajak, potongan;

      cout<<"GAJI PEGAWAI PT.TELKOM\n";
      cout<<"-------------------------\n";
      cout<<"Nama Pegawai : ";
      cin>>nama;
      cout<<"Golongan : ";
      cin>>golongan;

if (golongan==1)
{
        gaji_pokok=1500000;
        pajak=0.15*gaji_pokok;
        potongan=0.1*gaji_pokok;

}

else

if (golongan==2)
{
        gaji_pokok=2500000;
        pajak=0.15*gaji_pokok;
        potongan=0.1*gaji_pokok;

}

else

if (golongan==3)
{
        gaji_pokok=3500000;
        pajak=0.15*gaji_pokok;
        potongan=0.1*gaji_pokok;
}



        gaji_bersih=gaji_pokok+tunj_istri+tunj_anak-(pajak+potongan);


cout<<"Golongan        : "<<golongan<<endl;
cout<<"Gaji         : Rp. "<<gaji_pokok<<endl;
cout<<"Pajak           : Rp. "<<pajak<<endl;
cout<<"pinjaman        : Rp. "<<potongan<<endl;
cout<<"Gaji Bersih     : Rp. "<<gaji_bersih<<endl;

getch();
}

Untuk Menampilkan Hasil....
Tekan CTRL + F9










Demikilahlah postingan saya  Nama : Khairul Azmi    NPM : 12110376
Selamat Belajar Bahasa Pemrograman

Rabu, 15 Mei 2013

Pemograman Bahasa C Membuat Diskon dengan Switch Case

Untuk Membuat Program Diskon, Ketikkan Perintah Seperti yang ada pada Gambar 1 di bawah ini :



Tekan Tombol Ctrl + F9, untuk menampilkan hasil seperti berikut.
atau klik icon bertanda petir pada menubar....

Gambar 2.





Selamat Mencoba semoga bermnfaat bagi Agan-agan semua....
Tugas Bahasa Pemrograman
 Jangan lupa tinggalin comen ya...

Sabtu, 04 Mei 2013

Cara Membuat Buku Tamu


Cara Membuat Buku Tamu  :
1. Masuk ke Blogger.com
2. Pilih Layout > Tambah Gadget / Widget
3. Klik HTML/Javascript
4. Masukkan kode di bawah ini ke dalam kotak box tersebut.

<style type="text/css">
#gb{
position:fixed;
top:50px;
z-index:+1000;
}
* html #gb{position:relative;}
.gbtab{
height:100px;
width:30px;
float:left;
cursor:pointer;
background:url('https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEgnd1iWDKoZw5orsvHYOfW8UxJUil4IOveM-T1KfhcaBQKWjfhPEPNKZq6LDMyUSuzHBfOvAI4GRC2EgH2fagSof1-hG_Ts41K-ywwrK4NRFx1vTmPtCKNw04V3awXrs0xnWA_sA5IjSWDy/s1600/impoint.blogspot.com+bukutamu.png') no-repeat;
}
.gbcontent{
float:left;
border:2px solid #A5BD51;
background:#F5F5F5;
padding:10px;
}
</style>
<script type="text/javascript">
function showHideGB(){
var gb = document.getElementById("gb");
var w = gb.offsetWidth;
gb.opened ? moveGB(0, 30-w) : moveGB(20-w, 0);
gb.opened = !gb.opened;
}
function moveGB(x0, xf){
var gb = document.getElementById("gb");
var dx = Math.abs(x0-xf) > 10 ? 5 : 1;
var dir = xf>x0 ? 1 : -1;
var x = x0 + dx * dir;
gb.style.right = x.toString() + "px";
if(x0!=xf){setTimeout("moveGB("+x+", "+xf+")", 10);}
}
</script>
<div id="gb">
<div class="gbtab" onclick="showHideGB()"> </div>
<div class="gbcontent">

<Letakkan disini kode Buku Tamu Anda>

<div style="text-align: center;"><span style="font-size: 10px;"><span style="font-family: &quot;Trebuchet MS&quot;,sans-serif;">Supported by <a href="http://sazuke-4rt.blogspot.com/2013/01/buku-tamu.html" target="_blank">Sasuke Blog</a></span></span></div><div style="text-align:right"><a href="javascript:showHideGB()">
[tutup]
</a>
</div>
</div>
<script type="text/javascript">
var gb = document.getElementById("gb");
gb.style.right = (30-gb.offsetWidth).toString() + "px";
</script></div>

5. Ganti tulisan <Letakkan disini kode buku tamu anda> (berwarna merah) dengan kode Guestbook yang anda buat di Shoutmix atau Cbox.ws tadi.
6. Simpan Template.

Buku tamu tersebut sudah terpasang rapih dan lebih optimal di blog anda. Semoga dapat bermanfaat. Jika ada yang masih belum paham silahkan berkomentar. Anda juga dapat mengganti background gambar buku tamu tersebut pada kode berwarna biru diatas. Demikian artikel mengenai Cara Membuat Buku Tamu .

Sumber : http:\\khairulazmi.net

Selasa, 30 April 2013

Belajar dasar pemrograman Delphi 7



Hai! setelah sekian lama vakum dalam dunia blogging, akhirnya saya memutuskan kembali lagi dalam dunia tulis-menulis blog. langsung saja, sebagai langkah awal, saya akan sedikit share tentang dasar pemrograman Delphi 7.
  Delphi 7 
Delphi 7 adalah bahasa pemrograman visual yang berbasis object-oriented dan berbahasa dasar Pascal. Berbagai kemudahan yang ditawarkan membuat sebagian programmer pemula bisa membuat program yang sedikit kompleks.

Oke, untuk mempersingkat, kita langsung saja menuju ke praktik. sebagai permulaan, kita akan membuat sebuah program kalkulator penjumlah dua angka melalui Delphi 7.

Lho, kok sederhana sekali? ya, karena saya memang sengaja membuat tutorial untuk para pemula dalam bahasa pemrograman ini :)

 Baik, kita mulai.

Saat awal kita membuka program Delphi, secara default Delphi akan membuatkan sebuah project kosong untuk anda.

Perhatikan, di bagian tengah adalah form kosong. Di sebelah kiri ada object tree view dan object inspector. Di bagian atas ada menu menu utama program.

 Pada form utama, klik bagian tengah form yang kosong. Perhatikan object inspector di bagian kiri bawah. Sorot bagian caption dan ganti dengan: kalkulator. Coba perhatikan, nama jendela form kosong yang ada di tengah berubah menjadi "kalkulator".

  belajar dasar pemrograman delphi 7
 Selanjutnya, masih di object inspector, sorot bagian border style dan pilih: bsSingle.

  belajar dasar pemrograman delphi 7
Hal lain juga bisa sobat lakukan pada form, semisal mengganti icon ataupun mengubah tombol-tombol sistem di pojok kanan atas form. Semua hal tersebut bisa sobat eksplorasi di object inspector dan sorotlah pada bagian-bagian form yang anda ingin modifikasi. Lakukan saja sekehendak sobat. Ingat, semakin sobat menjelajahi maka sobat akan semakin paham fungsinya.
Langkah selanjutnya, tambahkan komponen edit box dengan cara klik komponen di atas form di bagian standard. Buatlah dua edit box.

  belajar dasar pemrograman delphi 7
 Dengan cara yang sama, tambahkan komponen label pada form.

belajar dasar pemrograman delphi 7
Klik pada Label yang baru saja kita tambahkan dan sorot bagian caption di jendela object inspector. Ganti caption Label 1 dengan "angka 1" serta Label 2 dengan "angka 2"

  belajar dasar pemrograman delphi 7
 Masih dengan cara yang sama, tambahkan komponen button pada form. Ganti caption-nya dengan "jumlah".
  belajar dasar pemrograman delphi 7
 Terakhir, tambahkan sekali lagi komponen Label pada Form. Ganti caption-nya dengan "hasilnya adalah="

  belajar dasar pemrograman delphi 7
 Nah,setelah semua tampilan visual telah kita masukkan di form, saatnya kita memberikan kode program ke dalam program kita. Secara logika, program penjumlahan akan melakukan eksekusi ketika tombol "jumlah" ditekan. Saat tombol ini ditekan, kita menginginkan berapapun angka yang dimasukkan ke dalam edit box 1 akan dijumlahkan dengan angka dalam edit box 2. Hasil penjumlahan ini kemudian akan ditampilkan melalui Label 3. Oleh karena itu, untuk memulai memasukkan kode program, lakukan dobel klik pada tombol "jumlah". secara otomatis, Delphi akan membuat prosedur yang akan dieksekusi ketika tombol jumlah ditekan.
  belajar dasar pemrograman delphi 7
Buatlah variabel untuk mempermudah pemrograman. Deklarasi variabel lokal diletakkan di atas begin. Untuk kalkulator ini, variabel yang digunakan adalah a, b, c dengan tipe ketiganya adalah integer. Selanjutnya, ketik program utama tepat di bawah begin. Berikut kode program secara lengkap.
var a,b,c:integer;
begin a:=strtoint(edit1.text);
b:=strtoint(edit2.text);
c:=a+b;
label3.caption:='Hasilnya adalah '+inttostr(c);
end;
Perhatikan bahwa nilai angka yang dimasukkan pada edit box 1 dan 2 adalah bernilai string. oleh karena itu kita harus menggunakan perintah strtoint untuk mengubahnya menjadi integer. dan sebaliknya, untuk menampilkan hasil penjumlahan pada caption label 3, integer harus diubah menjadi string melalui perintah inttostr.

belajar dasar pemrograman delphi 7
Minimize jedela kode program untuk kembali ke jedela tampilan visual form. Klik sekali pada edit box 1 dan sorot bagian text di jendela object inspector. Hapus dan kosongkan tulisan di dalamnya. Lakukan hal yang sama pada edit box 2.
belajar dasar pemrograman delphi 7
Langkah terakhir, tata ulang semua komponen di dalam form agar enak dilihat. Lakukan resize pada ukuran form agar terkesan simpel. Anda juga bisa menambahkan komponen XP manifest (komponen Win32) untuk mempercantik tampilan visual form. Klik RUN atau tekan F9 untuk melakukan compile program.
belajar dasar pemrograman delphi 7
Lakukan uji program dengan memasukkan sembarang angka ke dalam edit box 1 dan 2 lalu tekan "jumlah". Untuk keluar, tekan tanda silang di pojok kanan atas.

Senin, 29 April 2013

Tutorial Lengkap Membuat Aplikasi Parkir Kendaraan Menggunakan Java Netbeans Dan MySQL

Tutorial Lengkap Membuat Aplikasi Parkir Kendaraan Menggunakan Java Netbeans Dan MySQL

Written By Khairul Azmi

Tutorial Lengkap Membuat Aplikasi Parkir Kendaraan Menggunakan Java Netbeans Dan MySQL - Halo sobat , kali ini ane mau ngasih tutorial tentang bagaimana cara bikin aplikasi parkir kendaraan di netbeans dengan menggunakan database mysql,. Tutorial ini saya buat  segampang mungkin, semoga aja ga ribet buat sobat :D
Ok kita langsung ke tutorial nya, disini saya akan bagi menjadi 4 kategori
1. Membuat database di Mysql
2. Membuat Koneksi dari netbeans ke mysql
3. Membuat form login pada Netbeans
4. Membuat form menu pada netbeans
Kategori 1 Membuat Database di mysql
1. Pastikan Xampp sudah terinstal dengan benar di Pc sobat
2. Buka CMD (Start - run) lalu ketik CMD
3. Ketik cd\
4. cd xampp/mysql/bin
5. mysql –u root
6. create database datalogin; <<< sebagai contoh saya membuat database dengan nama “datalogin”
7. use datalogin; << Memilih database yang akan kita gunakan
8. create table login (Username varchar(15)not null, Password varchar(30) not null , primary key (Username)); <<Membuat table di database datalogin dengan kolom Username max 15 karakter dan Password max 30 karakter dengan kata kunci “Username” 
9. insert into login values(‘Indra Ahmad Iskandar’, ‘admin’); << Mengisi kolom Username =Indra Ahmad Iskandar , Password=admin
10. create table parkirmasuk (notiket varchar(100)not null, tanggalmasuk varchar(30) not null , noplat varchar(10) not null, jeniskendaraan varchar (10) not null, jammasuk varchar (10) not null, primary key (notiket));
Kategori 2 Membuat Koneksi dari Netbeans ke Mysql
1. Buka Netbeans
2. Lalu pilih File-new project seperti dibawah ini
3. Lalu isi seperti dibwah ini dan klik finish
4. Klik kanan di project ParkirKendaraan pilih New-Java Package
5. Isi seperti dibawah ini
6. Klik kanan di Package Koneksi kemudian pilih New-java class
7. Isi seperti dibawah lalu finish
8. setelah selesai membuat class koneksi, Ketikan kode ini dibawah kode package Koneksi;
import com.mysql.jdbc.Driver;
import java.sql.Connection;
import java.sql.DriverManager;
import java.sql.SQLException;
import javax.swing.JOptionPane;
9. Kemudian ketikan lagi seperti berikut setelah kode di atas
public class KoneksiDB {
    public static Connection koneksi;
    public static Connection getConnection() throws SQLException {
        if(koneksi==null){
            new Driver();
            koneksi =DriverManager.getConnection("jdbc:mysql://localhost:3306/datalogin","root","");
        }
        return koneksi;
    }
    public static void main(String[] args){
        try{
            getConnection();
 JOptionPane.showMessageDialog(null,"koneksi berhasil","report koneksi",JOptionPane.INFORMATION_MESSAGE);
        }
        catch (SQLException ex){
            System.err.println("Koneksi GAGAL");
        }
    }
}
10. Klik kanan di Libraries-Add Library-Mysql JDBC Driver

11. Membuat Koneksi dari Netbeans ke Mysql telah selesai, kemudian klik kanan di KoneksiDB-Run File. Jika koneksi netbeans dan mysql sudah terhubung akan keluar pop up “koneksi berhasil” seperti ini


Harga 200rbu untuk Aplikasi Parkir Kendaraan yang sudah jadi,. minat Hub : 085711416896 (Admin blog Indrasitomcat)
Kategori 3 Membuat form login pada netbeans
1. Klik kanan pada source package-New-java Packages
2. Isi seperti dibawah ini dan finish
3. Klik kanan pada package Aplikasi yang sudah kita buat tadi pilih New-JFrame Form, da isi seperti Gambar dibawah ini
4. Desain Form seperti ini
5. Ketik kode dibawah ini setelah kode package Aplikasi;
        import javax.swing.*;
        import java.sql.*;
        import javax.swing.table.*;
        import java.awt.Dimension;
        import java.awt.Toolkit;
6. Ketik kode dibawah ini setelah kode diatas
public class FormLogin extends javax.swing.JFrame {
    /**
     * Creates new form FormLogin
     */
    Connection koneksi;
    public FormLogin() {
        initComponents();
    }
    
public void konekdatabase(){
try{
Class.forName("sun.jdbc.odbc.JdbcOdbcDriver");
koneksi=DriverManager.getConnection("jdbc:mysql://localhost:3306/datalogin","root","");
}
catch (Exception e)
{
System.err.println("Exception: "+e.getMessage());
}
}
public void Login(){
    try
{
    String hasil ="0";
    String sql = "Select count(*) as jml from login where username = '"+username.getText().trim()+"'"+"and password = '"+password.getText().trim()+"'";
    stat = koneksi.createStatement();
    set = stat.executeQuery(sql);
    set.next();
    hasil = set.getString("jml");
    if (Integer.valueOf(hasil)>0){
        JOptionPane.showMessageDialog(null,"Anda Berhasil Login!!!","Peringatan",JOptionPane.WARNING_MESSAGE);
    new FormMenu().setVisible(true);
    dispose();
    }
    else{
        JOptionPane.showMessageDialog(null,"Anda Gagal Login!!!","Peringatan",JOptionPane.WARNING_MESSAGE);
               username.requestFocusInWindow();
               username.setText("");
               password.setText("");
    }
}
   catch (Exception e){
        System.out.println("kesalahan :"+e.toString());
    }
}
seperti gambar dibawah ini
7. Sekarang kita akan membuat fungsi di tombol exit, caranya klik Kanan di tombol Exit pilih Event - Action - ActionPerformed seperti gambar dibawah ini
8. Ketik kode 
if(JOptionPane.showConfirmDialog(null,"Apakah Anda yakin akan keluar?","Keluar",JOptionPane.YES_NO_OPTION)== JOptionPane.YES_OPTION){
        System.exit(0);
}
 9. Kembali ke Form Desain, kemudian klik kanan pada tombol Login pilih Event - Action - ActionPerformed (sama seperti membuat tombol Exit) lalu ketik kode dibawah ini (hanya yang saya blok yg ditulis

private void loginActionPerformed(java.awt.event.ActionEvent evt) {                                  
        // TODO add your handling code here:
 konekdatabase();Login();   
}

10. Ok form login telah selesai.

Harga 200rbu untuk Aplikasi Parkir Kendaraan yang sudah jadi,. minat Hub : 085711416896 (Admin blog Indrasitomcat)

Kategori 4 Membuat FormKendaraanMasuk pada netbeans

1. Klik kanan pada package Aplikasi pilih New - JFrame Form


2. Kemudian isi seperti dibawah ini dan klik finish
3. Setelah Form terbuat, desain form seperti ini

4. Selanjutnya pindah ke source, dan isi kode berikut dibawah kode package Aplikasi;
import javax.swing.*;
import java.sql.*;
import javax.swing.table.*;
import java.util.Date;
import java.text.SimpleDateFormat;
import java.awt.Dimension;
import java.awt.Toolkit;
5. Ketik kode ini di bawah kode diatas
public class FormKendaraanMasuk extends javax.swing.JFrame {
String no;
String tglmasuk;
String plat_no;
String jns;
String jmmasuk;
DefaultTableModel tabMode;
Connection koneksi;
public FormKendaraanMasuk() {
        initComponents();
        Object[] row= {"No.Tiket","Tgl Masuk", "No Plat", "J.Kendaraan", "Jam Masuk"};
        tabMode=new DefaultTableModel(null,row);
        tabeldata.setModel(tabMode);
        tglskrg();
     
    }
public void tglskrg(){
Date skrg= new Date();
SimpleDateFormat format= new SimpleDateFormat("dd-MM-yyyy");
String tgl = format.format(skrg);
tftanggal.setText(format.format(skrg));
}
    public void konekdatabase(){
try{
Class.forName("sun.jdbc.odbc.JdbcOdbcDriver");
koneksi =DriverManager.getConnection("jdbc:mysql://localhost:3306/datalogin","root","");
}
catch (Exception e)
{
System.err.println("Exception: "+e.getMessage());
}
}
    public void hapustabel(){
int row=tabMode.getRowCount();
for(int i=0;i<row;i++){
tabMode.removeRow(0);
}
}
    public void tampildataketabel(){
hapustabel();
try{
String sql="Select * from parkirmasuk";
Statement stat=koneksi.createStatement();
ResultSet set=stat.executeQuery(sql);
while (set.next()){
no=set.getString("notiket");
tglmasuk=set.getString("tanggalmasuk");
plat_no=set.getString("noplat");
jns=set.getString("jeniskendaraan");
jmmasuk=set.getString("jammasuk");
String[] data={no,tglmasuk,plat_no,jns,jmmasuk};
tabMode.addRow(data);
}
}
catch(Exception e){
}
}
public void clear(){
noTiket.setText("");
platNomor.setText("");
jamMasuk.setText("");
}
    public void simpandata(){
no=noTiket.getText();
tglmasuk=tftanggal.getText();
plat_no=platNomor.getText();
jns=(String)jenis.getSelectedItem();
jmmasuk=jamMasuk.getText();
try{
konekdatabase();
Statement statement=koneksi.createStatement();
String sql="insert into parkirmasuk values ('"+no+"','"+tglmasuk+"','"+plat_no+
"','"+jns+"','"+jmmasuk+"');";
statement.executeUpdate(sql);
statement.close();
clear();
}
catch (Exception e){
}
}
    public void data(){
no=noTiket.getText();
tglmasuk=tftanggal.getText();
plat_no=platNomor.getText();
jns=(String)jenis.getSelectedItem();
jmmasuk=jamMasuk.getText();
}
6. Kembali ke desain form, selanjutnya kita akan membuat fungsi pada button simpan, caranya klik kanan pada button simpan - event - action - actionPerformed lalu ketik script dibawah ini (ketik hanya yang saya block saja)

private void btsimpanActionPerformed(java.awt.event.ActionEvent evt) {                                      

        // TODO add your handling code here:
         konekdatabase();
        data();
        if(no.equals("")||tglmasuk.equals("")||plat_no.equals("")||jns.equals("")||jmmasuk.equals(""))
        {
            JOptionPane.showMessageDialog(null, "HARAP MASUKAN DATA LENGKAP!");
        }
        else{
            simpandata();
            tampildataketabel();
        }

    }

7. jika sudah, selanjutnya kita buat fungsi button cari, caranya sama seperti di atas,. ketik script dibawah

private void btcariActionPerformed(java.awt.event.ActionEvent evt) {                                    
        // TODO add your handling code here:
konekdatabase();
        try
        {
            String cari=noTiket.getText();
            Statement statement=koneksi.createStatement();
            String sql="select * from parkirmasuk where notiket like '"+cari+"'";
            ResultSet rs=statement.executeQuery(sql);
            if(rs.next())
            {
                noTiket.setText(rs.getString(1));
                tftanggal.setText(rs.getString(2));
                platNomor.setText(rs.getString(3));
                jenis.setSelectedItem(rs.getString(4));
                jamMasuk.setText(rs.getString(5));
                }
            else{
                JOptionPane.showMessageDialog(null, "DATA TIDAK ADA DALAM DATABASE");
            }
            statement.close();
            koneksi.close();
        }
        catch (Exception ex)
        {
            System.out.println("Error: "+ex);
        }
     
    }

To be continue . . .
Nantinya akan jadi seperti ini kurang lebih :




Ok Tutorial Lengkap Membuat Aplikasi Parkir Kendaraan Menggunakan Java Netbeans Dan MySQL telah selesai, silahkan kembangkan sesuai kreasi sobat :)

Sekian tentang Tutorial Lengkap Membuat Aplikasi Parkir Kendaraan Menggunakan Java Netbeans Dan MySQL