Gambar Di bawah ini adalah hasil dari pekerjaan menggunakan VB 2010
Dan ini Listen Programnya .
using
System;
using
System.Collections.Generic;
using
System.ComponentModel;
using
System.Data;
using
System.Drawing;
using
System.Linq;
using
System.Text;
using
System.Windows.Forms;
namespace
Data_Diri
{
public partial class frmDataDiri : Form
{
public
frmDataDiri()
{
InitializeComponent();
}
private
void frmDataDiri_Load(object
sender, EventArgs e)
{
cmbAgama.Items.Add("Islam");
cmbAgama.Items.Add("Kristen");
cmbAgama.Items.Add("Katholik");
cmbAgama.Items.Add("Hindu");
cmbAgama.Items.Add("Budha");
}
private
void cmdTampilkan_Click(object sender, EventArgs e)
{
string
a, b, c;
a = "Nama
: " + txtNama.Text;
if
(optLakiLaki.Checked == true)
{
a = "Nama"
+ "\t" + "\t"
+ ":" + " " + txtNama.Text + "\n" + "
Jenis
Kelamin" + "\t" + ":"
+ "
" + "Laki - Laki";
}
else
{
a = "Nama"
+ "\t" + "\t"
+ ":" + " " + txtNama.Text + "\n" + "
Jenis
Kelamin" + "\t" + ":"
+ "
" + "Perempuan";
}
b = a;
if
(cmbAgama.SelectedItem.ToString() == "Islam")
{
b = a + "\n Agama" + "\t"
+ "\t" + ":"
+ "
" + "Islam";
}
else
if (cmbAgama.SelectedItem.ToString() == "Kristen")
{
b = a + "\n Agama" + "\t"
+ "\t" + ":"
+ "
" + "Kristen";
}
else
if (cmbAgama.SelectedItem.ToString() == "Khatolik")
{
b = a + "\n Agama" + "\t"
+ "\t" + ":"
+ "
" + "Khatolik";
}
else
if (cmbAgama.SelectedItem.ToString() == "Hindu")
{
b = a + "\n Agama" + "\t"
+ "\t" + ":"
+ "
" + "Hindu";
}
else
{
b = a + "\n Agama" + "\t"
+ "\t" + ":"
+ "
" + "Budha";
}
c = b;
if
(chkHobi3.Checked == true)
{
c = b + "\n hoby" + "\t"
+ "\t" + ":"
+ "
" + "Menyanyi";
}
if
(chkHobi2.Checked == true)
{
c = b + "\n hoby" + "\t"
+ "\t" + ":"
+ "
" + "Membaca";
}
if
(chkHobi1.Checked == true)
{
c = b + "\n hoby" + "\t"
+ "\t" + ":"
+ "
" + "Olah Raga";
}
if
(chkHobi2.Checked && chkHobi3.Checked == true)
{
c = b + "\n hoby" + "\t"
+ "\t" + ":"
+ "
" + "Membaca" +
"\n" + "\t"
+ "\t" + " " + "Menyanyi";
}
if
(chkHobi2.Checked && chkHobi1.Checked == true)
{
c = b + "\n hoby" + "\t"
+ "\t" + ":"
+ "
" + "Membaca" +
"\n" + "\t"
+ "\t" + " " + "Olah
Raga";
}
if
(chkHobi3.Checked && chkHobi1.Checked == true)
{
c = b + "\n hoby" + "\t"
+ "\t" + ":"
+ "
" + "Menyanyi"
+ "\n" +
"\t" + "\t"
+ "
" + "Olah Raga";
}
if
(chkHobi3.Checked && chkHobi2.Checked && chkHobi1.Checked == true)
{
c = b + "\n hoby" + "\t"
+ "\t" + ":"
+ "
" + "Membaca" +
"\n" + "\t"
+ "\t" + " " + "Menyanyi"
+ "\n" + "\t"
+ "\t" + " " +
"Olahraga";
}
else
{
}
MessageBox.Show("Data Diri \n
\n " + c.ToString());
}
}
}
SELAMAT MENCOBA GUYS, , , , , ,
wah warnanya terlalu cerah dan sedikit membuat mata sakit dan ada beberapa kata-kata kurang terliahat karna warna yang telalu mencolok gan,sedikit masukan, semoaga saja bisa bermanfaat, agar semua kalangan bisa menikmati dan enak berkunjung ke blog nt gan
BalasHapus