Hai guys, selamat datang di blog saya, ketemu
lagi nih, kali ini kita akan membuat sebuah program lagi yang pastinnya
menggunakan Visual Studio 2010. Sebelum kita membuat programnnya liat dulu yuk
apa itu visual studio dan kegunaan lainnya mari kita lihat,
Microsoft Visual Studio merupakan sebuah perangkat lunak lengkap (suite) yang dapat digunakan
untuk melakukan pengembangan aplikasi, baik itu aplikasi bisnis, aplikasi
personal, ataupun komponen aplikasinya, dalam bentuk aplikasi console, aplikasi
Windows, ataupun aplikasi Web. Visual Studio mencakup kompiler,
SDK, Integrated
Development Environment (IDE), dan
dokumentasi (umumnya berupa MSDN Library). Kompiler yang dimasukkan ke dalam paket
Visual Studio antara lain Visual C++,
Visual C#, Visual Basic, Visual Basic .NET, Visual
InterDev, Visual J++, Visual J#, Visual FoxPro, dan Visual
SourceSafe.
Microsoft Visual Studio dapat digunakan untuk
mengembangkan aplikasi dalam native code (dalam bentuk bahasa mesin yang
berjalan di atas Windows) ataupun managed code (dalam bentuk Microsoft
Intermediate Language di atas
.NET Framework). Selain itu, Visual Studio juga dapat digunakan untuk
mengembangkan aplikasi Silverlight, aplikasi Windows Mobile (yang berjalan di
atas .NET Compact Framework).
Nah setelah
kita mengetahui tentang Visual Studio 2010 mari kita masuk pada sesi pembuatan
program
Pada
kesempatan ini kita akan membuat program Biodata mengunakan Aplikasi microsoft
Visual Studio 2010
Untuk
mengetahui bagaimana cara membuatnya, mari ikuti langkah langkahnya sebagai
berikut :
Langkah
Pertama Klik menu Start>pilih ALL Program>Lalu Pilih Visual Studio 2010
Dan hasilnya
seperti dibawah ini
Kemudian
akan Muncul menu seperti dibawah ini
Pilih New
Project maka anda akan dibawa pada menu selanjutnya, tampilannya seperti
dibawah ini
Tekan Ok dan
buatlah dokumen baru New>Project, atau tekan Ctrl + N
Maka akan
muncul Tampilan Awal Form 1 di Visual Studio 2010
Sekarang kita akan membuat programnya,untuk membuat program di
Form 1 kita harus mengunakan Toolbox, panggil Toolbox dengan memilih
View>Toolbox lalu Enter
Maka Tampilannya Akan seperti di atas
Selanjutnnya kita akan memulai membuat program menguakan vb 2010,
program yang akan kita buat pertama adalah program Login, kita akan memberikan
login pada program menghitung volume balok tadi dengan mengunakan form 1,
Pada Toolbox masukan groupbox,label,button, dan textbox susunlah
dan design seperti gambar dibawah ini
Setelah itu kita akan membuat coding pada program di form 1 agar
bisa berjalan , caranya klik2x pada form1 maka akan muncul menu form1 Events
tempat kita menaruh codingnnya
Public Class Form1
Private Sub Form1_Load(ByVal
sender As System.Object,
ByVal e As
System.EventArgs) Handles
MyBase.Load
Me.Text
= "LOGIN"
GroupBox1.Text = ""
Me.BackColor
= Color.DodgerBlue
GroupBox1.BackColor = Color.Blue
Label1.ForeColor = Color.Transparent
Label2.ForeColor = Color.Transparent
Label3.ForeColor = Color.Transparent
Label1.Text = "Silahkan Login"
Label2.Text = "Username"
Label3.Text = "Password"
Button1.Text = "Masuk"
Button2.Text = "Cancel"
Label1.BorderStyle = BorderStyle.Fixed3D
Label1.Font = New Font(Label1.Font, FontStyle.Bold)
Label2.Font = New Font(Label2.Font, FontStyle.Bold)
Label3.Font = New Font(Label3.Font, FontStyle.Bold)
Button1.Cursor = Cursors.Hand
Button2.Cursor = Cursors.Hand
TextBox1.BorderStyle = BorderStyle.FixedSingle
TextBox2.BorderStyle = BorderStyle.FixedSingle
TextBox1.BackColor = Color.AntiqueWhite
TextBox2.BackColor = Color.AntiqueWhite
TextBox1.CharacterCasing = CharacterCasing.Upper
TextBox2.CharacterCasing = CharacterCasing.Lower
TextBox2.PasswordChar = "*"
End Sub
Private Sub Button1_Click(ByVal
sender As System.Object,
ByVal e As
System.EventArgs) Handles
Button1.Click
If
(TextBox1.Text = "IMAM AFANDI") And (TextBox2.Text = "manithom")
Then
Form2.Show()
Me.Hide()
Else
MessageBox.Show("Warning User dan Password anda Salah",
"Informasi", MessageBoxButtons.OK, MessageBoxIcon.Error)
End If
End Sub
Private Sub TextBox1_KeyPress(ByVal
sender As System.Object,
ByVal e As
System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress
If
e.KeyChar = Chr(13) Then TextBox2.Focus()
End Sub
Private Sub TextBox2_KeyPress(ByVal
sender As System.Object,
ByVal e As
System.Windows.Forms.KeyPressEventArgs) Handles TextBox2.KeyPress
If
e.KeyChar = Chr(13) Then Button1.Focus()
End Sub
Private Sub Button1_KeyPress(ByVal
sender As System.Object,
ByVal e As
System.Windows.Forms.KeyPressEventArgs) Handles Button1.KeyPress
If
e.KeyChar = Chr(13) Then Button2.Focus()
End Sub
Private Sub Button2_Click(ByVal
sender As System.Object,
ByVal e As
System.EventArgs) Handles
Button2.Click
Close()
End Sub
End Class
|
Setelah kita memasukan codingnnya selanjutnya kita akan membuat
program utama kita yaitu membuat Program menghitung volume balok, karena pada
form1 tadi kita telah mengunakannya sebagai menu login maka kita akan
mengunakan form selanjutnnya yaitu form2 sebagai wadah kita membuat program
ini, cara untuk memunculkan form2 adalah pertama pilih add new item> Lalu
pilih windows form> klik add maka form 2 akan muncul, setelah form2 telah
dibuat kita buat designnya seperti gambar dibawah ini
Agar program
dapat berjalan kita harus memasukan kodingnnya terlebih dahulu, maka masukan
kodingnya seperti ini :
Public Class Form2
Private Sub Form2_Load(ByVal
sender As System.Object,
ByVal e As
System.EventArgs) Handles
MyBase.Load
Me.Text
= "Program Menghitung Volume Balok"
Label1.Text = "MASUKAN NILAI"
Label2.Text = "PANJANG"
Label3.Text = "LEBAR"
Label4.Text = "TINGGI"
Label5.Text = "LUAS VOLUME BALOK"
Label6.Text = ""
Label1.Font = New Font(Label1.Font, FontStyle.Bold)
Label2.Font = New Font(Label2.Font, FontStyle.Bold)
Label3.Font = New Font(Label3.Font, FontStyle.Bold)
Label4.Font = New Font(Label4.Font, FontStyle.Bold)
Label5.Font = New Font(Label5.Font, FontStyle.Bold)
Label6.Font = New Font(Label6.Font, FontStyle.Underline)
CheckBox1.Text = "Tampilkan Rumus Volume Balok"
GroupBox1.Text = ""
GroupBox2.Text = ""
Button1.Text = "Hasil"
Button2.Text = "Hapus"
Button3.Text = "Keluar"
Button1.Cursor = Cursors.Hand
Button2.Cursor = Cursors.Hand
Label1.BorderStyle = BorderStyle.FixedSingle
TextBox1.BorderStyle = BorderStyle.FixedSingle
TextBox2.BorderStyle = BorderStyle.FixedSingle
TextBox3.BorderStyle = BorderStyle.FixedSingle
TextBox4.BorderStyle = BorderStyle.FixedSingle
End Sub
Private Sub Button1_Click(ByVal
sender As System.Object,
ByVal e As
System.EventArgs) Handles
Button1.Click
TextBox4.Text = Val(TextBox1.Text) *
Val(TextBox2.Text) * Val(TextBox3.Text)
End Sub
Private Sub CheckBox1_CheckedChanged(ByVal sender As
System.Object, ByVal
e As System.EventArgs)
Handles CheckBox1.CheckedChanged
If
CheckBox1.Checked = True Then
Label6.Text = "Panjang * Lebar * Tinggi"
Else
Label6.Text = ""
End If
End Sub
Private Sub TextBox1_KeyPress(ByVal
sender As System.Object,
ByVal e As
System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress
If
e.KeyChar = Chr(13) Then TextBox2.Focus()
End Sub
Private Sub TextBox2_KeyPress(ByVal
sender As System.Object,
ByVal e As
System.Windows.Forms.KeyPressEventArgs) Handles TextBox2.KeyPress
If
e.KeyChar = Chr(13) Then TextBox3.Focus()
End Sub
Private Sub TextBox3_KeyPress(ByVal
sender As System.Object,
ByVal e As
System.Windows.Forms.KeyPressEventArgs) Handles TextBox3.KeyPress
If
e.KeyChar = Chr(13) Then Button1.Focus()
End Sub
Private Sub Button3_Click(ByVal
sender As System.Object,
ByVal e As
System.EventArgs) Handles
Button3.Click
Close()
End Sub
Private Sub Button2_Click(ByVal
sender As System.Object,
ByVal e As
System.EventArgs) Handles
Button2.Click
TextBox1.Text = ""
TextBox2.Text = ""
TextBox3.Text = ""
TextBox4.Text = ""
End Sub
End Class
|
Setelah kodingnnya sudah di masukan langkah selanjutnya kita akan
memperindah tampilan program yang kita buat sebelumnnya tadi agar kelihatan
lebih menarik, maka kita buat tampilannya agar sedikit lebih menarik, masukan
gambar pada form1 carannya pada panel properties cari “Backgroundimage” lalu
klik, kemudian import dan cari gambar sesuai keinginan anda, setelah itu klik
ok, disini saya memasukan gambar pada form1, groupbox1, kemudian di
form2,groupbox1 dan 2 , lalu pada sisi form saya gunakan 4 buah panel dan saya
masukan gambar.
Nah pasti kalian sudah ngak sabar pengen liat hasilnya seperti
apa, oleh karena itu mari kita coba lihat hasil program yang telah kita buat td
seperti apa.
Coba RUN program td dengan menekan tombol F5 atau pilih
debug>Run maka kita akan dibawa ke form 1 seperti tampilan dibawah ini :
Pada form1 kita
akan di minta memasukkan username dan password
Maka masukkan
password dan user name yang sudah kita
buat tadi Username saya “IMAM AFANDI” Password “manithom”
Jika
Username dan Password yang anda masukan salah maka, akan muncul pesan dialog
erorr seperti ini
Oleh karena
itu masukan Username dan pasword dengan benar, jika berhasil Login maka kita
akan dibawa masuk ke form2 yaitu program Menghitung Luas Volume Kubus
gambarnnya seperti dibawah ini
Coba Masukan
Nilainya Misalnnya Kita Masukan Panjang=4 Lebar=4 dan tinggi=4
Lalu tekan tombol
hasil berwarna merah pojok bawah sbelah kiri, maka hasillnya akan ditampilkan
seperti ini
Bagaimana
mudah bukan, ternyata membuat program menguakan VB 2010 itu tidak terlalu
susah, hannya saja butuh ketelitian dalam membuat dan memecahkan codingnya saja disamping itu program ini juga dapat
membantu kita dalam pelajaran matematika dan pelajaran lainnya,.
Demikian
semoga dengan adannya artikel ini dapat menambah wawasan kita dalam mengenal
program vb dan bisa mengoperasikannya sehingga dapat bermanfaat dalam kehidupan
sehari-hari tidak lupa juga penulis meminta kritik dan sarannya agar artikel
ini dapat sempurna dan lebih baik lagi
Terima kasih
Was.........war........Wab
0 komentar:
Posting Komentar
Trimakasih Sudah Mengunjungi Blog saya