Program Apotik Sederhana Menginputkan Data Pasien dengan Menu Login dan MDI Parent Pada Visual Studio 2010 Ultimate

Assalamualaikum wr wb.

Kali ini saya akan berbagi turorial membuat menu login dan program apotik sederhana dengan data pasien menggunakan mdi parent.

Berikut langkah-langkahnya :

1.    Buka Visual Studio 2010 Ultimate

2.    Buat form 1 dan desain seperti ini, bisa dikreasikan lagi

3.    Buat form 2 untuk menu mdi parent, cara untuk membuat form 1 sama dengan membuat form seperti biasa, hanya saja pada properties yang ada tulisan seperti di bawah ini, false diubah menjadi true

Setelah itu buat menu strip kemudian tulis program dan exit

4.    Buat form 3 untuk menu input data pasien

Selanjutnya berikut toolbox dan source code pada setiap form :

1)      Form 1 menu login

Keterangan Interface
No.	Nama Komponen	Variabel Komponen
1	Label	lblLogin
2	Label	lblUser
3	Text Box	txtUser
4	Label	lblPw
5	PictureBox	Pbmata
6	Text Box	lblUser
7	Button	btnExit
8	Button	btnLogin

     coding program  

Class Form 1
Variable Komponen	Event	Source Code
btnLogin	Click	private void btnLogin_Click(object sender, EventArgs e)         {             if (txtUser.Text == "" || txtpw.Text == "") //apabila user atau password kosong, maka akn ada tampilan error             {                MessageBox.Show("Username atau Password Masih Kosong !!", "ERROR", MessageBoxButtons.OK, MessageBoxIcon.Error); //menampilkan tampilan yang memberitahukan bahwa username atau password masih kosong             }             else if (txtUser.Text == "sitimuliasari" && txtpw.Text == "7777777")             { MessageBox.Show("Login Berhasil", "Information", MessageBoxButtons.OK, MessageBoxIcon.Information); //apabila username dan password telah sesuai, maka login berhasil             }             else             { MessageBox.Show("Username atau Password yang Anda Masukkan Salah", "ERROR", MessageBoxButtons.OK, MessageBoxIcon.Error); //menampilkan error apabila username atau password ada yang salah             }            this.Close(); //keluar dari form1         }
btnexit	Click	private void btnexit_Click(object sender, EventArgs e)         {             MessageBox.Show("Program Selesai", "Information", MessageBoxButtons.OK, MessageBoxIcon.Information);             this.Close();         } //menutup program
Pbmata1	Click	private void pbmata1_Click(object sender, EventArgs e)         {             pbmata1.Visible = true;             txtpass.PasswordChar = '\0';             pbmata1.Visible = false;         } //mata pertama berfungsi tidak berbentuk bintang lagi
Pbmata2	Click	private void pbmata2_Click(object sender, EventArgs e)         {             pbmata1.Visible = true;             txtpass.PasswordChar = '*';             pbmata2.Visible = false;         } //mata pertama berfungsi agar berbentuk bintang

2) Form 2 MDI Parent

Keterangan Interface
No.	Nama Komponen	Variabel Komponen
1	Menu Strip	programToolStripMenuItem
2	Menu Strip	exitToolStripMenuItem

          coding programnya sebagai berikut :

Class Form 2
Nama Komponen	Event	Source Code
exitToolStripMenuItem	Click	private void exitToolStripMenuItem_Click_1(object sender, EventArgs e)         {             MessageBox.Show("Apakah Anda Yakin Ingin Keluar ?", "Warning", MessageBoxButtons.OKCancel, MessageBoxIcon.Warning);             Environment.Exit(0);         } //digunakan untuk keluar dari form
programToolStripMenuItem	Click	private void programToolStripMenuItem_Click(object sender, EventArgs e)         {             Form3 frm3 = new Form3();             frm3.MdiParent = this;             frm3.Show();         } //digunakan untuk menampilkan Form3 di dalam form MDI Parent
Form2	Load	private void Form2_Load(object sender, EventArgs e)         {             Form1 frm1 = new Form1();             frm1.MdiParent = this;             frm1.Show();         } //untuk menampilkan Form 1 di dalam MDIParent

3) Form 3 Program

Keterangan Interface
No.	Nama Komponen	Variabel Komponen
1.	Text Box	txtNmPsien
2.	Text Box	txtPnykit
3.	Label	lbldtpsien
4.	Button	btnSearch
5.	Picture Box	pictureBox1
6.	Button	btnExit
7.	Data GridView	dgrPasien
8.	Button	btnCLear
9.	Button	btnSave
10.	Text Box	txtAlamat
11.	Text Box	txtRuangan
12.	Label	lblalamat
13.	Label	lblruangan
14.	Label	lblpenyakit
15.	Label	lblnamapasien
16.	Text Box	txtSearch

    coding program sebagai berikut :

    

Class Form 3
Nama Komponen	Event	Source Code
btnSave	Click	private void btnSave_Click(object sender, EventArgs e)         {             string[] row = new string[]//mengisikan baris dengan string             {                 txtNmPsien.Text,txtPnykit.Text,txtRuangan.Text,txtAlamat.Text}; //memanggil variabel nama,penyakit, ruangan, dan alamat             dgrPasien.Rows.Add(row); //menampilkan kolom pada data gridview         }
btnClear	Click	private void btnCLear_Click(object sender, EventArgs e)         {             foreach (DataGridViewCell oneCell in dgrPasien.SelectedCells) ) //fungsi perulangan untuk data gridview             {                 if (oneCell.Selected)                     dgrPasien.Rows.RemoveAt(oneCell.RowIndex); //perulangan untuk data gridview             }         }
btnExit	Click	private void btnExit_Click(object sender, EventArgs e)         {             DialogResult dr = MessageBox.Show("Anda ingin keluar ?", "Awas!", MessageBoxButtons.OKCancel); // untuk menampilkan validasi peringatan ketika akan keluar dari program             if (dr == DialogResult.OK)             {                 this.Close();             }         }
btnSearch	Click	private void btnSearch_Click(object sender, EventArgs e)         {             for (int i = 0; i < dgrPasien.RowCount - 1; i++)             {                 if (dgrPasien.Rows[i].Cells[0].Value.Equals(txtSearch.Text))                 {                     dgrPasien.Rows[i].Visible = true;                 }                 else                 {                     dgrPasien.Rows[i].Visible = false;                 }    //fungsi perulangan untuk mencari data             }         }

Semoga berhasil :)