Begini langkah-langkahnya
1. Buka Visual Studio
2. Buat New Project, tidak usah membuat solution baru
cukup add to solution yang sudah dibuat
Visual C#-Windows Forms Application
3. Tampilan form akan seperti ini
4. Ganti nama form menjadi Validation Form
Properties dari komponen toolbox dapat mudah diatur di bagian kanan visual studio
Tambahkan background form
5. Drag beberapa komponen dan atur hingga menjadi seperti ini
6. Tambahkan button, errorProvider, Label, progressBar dan TextBox ke dalam Validation Form
7. Atur properties label, ganti ID menjadi lblNama
ganti backColor menjadi transparent agar label menyatu dengan gambar
8. Atur properties textBox, beri ID=txtNama
9. Beri text pada button "Eksekusi"
10. Pada errorProvider ganti Name/ID nya menjadi x1 dst..
11. Klik kanan form, view Code
masukkan script
using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
using System.Windows.Forms;
namespace FormVal
{
public partial class Form1 : Form
{
public Form1()
{
InitializeComponent();
}
private void label1_Click(object sender, EventArgs e)
{
}
private void button1_Click(object sender, EventArgs e)
{
bar1.Value = 0;
if (txtNama.Text == "")
{
x1.SetError(txtNama, "Masukkan Nama");
}
else
{
x1.SetError(lblNama, "");
}
if (txtNIS.Text == "")
{
x2.SetError(txtNIS, "Masukkan NIS");
}
else
{
x2.SetError(lblNIS, "");
}
if (txtKelas.Text == "")
{
x3.SetError(txtKelas, "Masukkan Kelas");
}
else
{
x3.SetError(lblKelas, "");
}
if (txtSMP.Text == "")
{
x4.SetError(txtSMP, "Masukkan SMP Asal");
}
else
{
x4.SetError(lblSMP, "");
}
for (int i = 0; i < bar1.Maximum; i++)
{
bar1.Value++;
}
if (txtNama.Text == "" && txtNIS.Text == "" && txtKelas.Text == "" && txtSMP.Text == "")
{
MessageBox.Show("Anda belum mengisi sama sekali");
}
else if (txtNama.Text == "" || txtNIS.Text == "" || txtKelas.Text == "" || txtSMP.Text == "")
{
MessageBox.Show("Mohon mengisi bagian yang kosong");
}
else if ((txtNIS.Text.Contains('a')) || (txtNIS.Text.Contains('b')) || (txtNIS.Text.Contains('c')) || (txtNIS.Text.Contains('d')) || (txtNIS.Text.Contains('e')) || (txtNIS.Text.Contains('f')) ||
(txtNIS.Text.Contains('g')) || (txtNIS.Text.Contains('h')) || (txtNIS.Text.Contains('i')) || (txtNIS.Text.Contains('j')) || (txtNIS.Text.Contains('k')) || (txtNIS.Text.Contains('l')) ||
(txtNIS.Text.Contains('m')) || (txtNIS.Text.Contains('n')) || (txtNIS.Text.Contains('o')) || (txtNIS.Text.Contains('p')) || (txtNIS.Text.Contains('q')) || (txtNIS.Text.Contains('r')) ||
(txtNIS.Text.Contains('s')) || (txtNIS.Text.Contains('t')) || (txtNIS.Text.Contains('u')) || (txtNIS.Text.Contains('v')) || (txtNIS.Text.Contains('w')) || (txtNIS.Text.Contains('x')) ||
(txtNIS.Text.Contains('y')) || (txtNIS.Text.Contains('z')) || (txtNIS.Text.Contains('A')) || (txtNIS.Text.Contains('B')) || (txtNIS.Text.Contains('C')) || (txtNIS.Text.Contains('D'))
|| (txtNIS.Text.Contains('E')) || (txtNIS.Text.Contains('F')) || (txtNIS.Text.Contains('G')) || (txtNIS.Text.Contains('H')) || (txtNIS.Text.Contains('I')) || (txtNIS.Text.Contains('J'))
|| (txtNIS.Text.Contains('K')) || (txtNIS.Text.Contains('L')) || (txtNIS.Text.Contains('M')) || (txtNIS.Text.Contains('N')) || (txtNIS.Text.Contains('O')) || (txtNIS.Text.Contains('P'))
|| (txtNIS.Text.Contains('Q')) || (txtNIS.Text.Contains('R')) || (txtNIS.Text.Contains('S')) || (txtNIS.Text.Contains('T')) || (txtNIS.Text.Contains('U')) || (txtNIS.Text.Contains('V'))
|| (txtNIS.Text.Contains('W')) || (txtNIS.Text.Contains('X')) || (txtNIS.Text.Contains('Y')) || (txtNIS.Text.Contains('Z')))
{
MessageBox.Show("NIS harus berisi angka");
}
else
{
MessageBox.Show("\nNama\t : " + txtNama.Text + "\nNIS\t : " + txtNIS.Text + "\nKelas\t : " + txtKelas.Text + "\nSMP\t : " + txtSMP.Text);
}
}
}
}
12. Jalankan dengan klik Start atau tekan F5
Jika NIS tidak diisi angka, maka akan muncul MessageBox
Sekian penjelasan form dari saya
No comments:
Post a Comment