Tutorial Membuat Kalkulator Sederhana Visual Basic WPF Menggunakan Visual Studio 2015

0
150

Hi kali ini FEBRIANSYAH.ID memberikan sebuah tutorial yang berjudul “Tutorial Membuat Kalkulator Sederhana Visual Basic Menggunakan Visual Studio 2015” sebenarnya saya ingin memberi tutorial menggunakan Visual Studio 2017 berhubung download nya belum selesai jadinya sementara pakai visual studio 2015 aja dulu ya šŸ˜€

Tutorial Membuat Kalkulator Sederhana Visual Basic WPF

pertama buat project baru

pilih yang WPF Application ya!

kenapa kok pakai WPF Application kok tidak pakai yang Windows Form Application? alasan nya ya karena WPF (Windows Presentation Foundation) merupakan framework terbaru dari microsoft yang lebih kaya fitur dan lebih ringan dari Windows Form Application

saya pernah membandingkan kecepatan aplikasi yang dibuat dengan framework WPF muncul dalam waktu hanya 1 detik, Windows Form Application 3-4 detik!

gak percaya? silahkan anda bandingkan sendiri

mungkin kecepatan bukan hal yang krusial bagi anda, tapi tidak ada ruginya anda mencoba WPF karena sangat mudah dalam mendesain tampilan seperti anda ngoding HTML karena tampilan nya menggunakan bahasa XAML

langsung saja ini dia script nya:

untuk source code bisa anda unduh di GitHub

MainWindow.xaml

<Window x:Class="MainWindow"
xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
xmlns:d="http://schemas.microsoft.com/expression/blend/2008"
xmlns:mc="http://schemas.openxmlformats.org/markup-compatibility/2006"
xmlns:local="clr-namespace:FEBRIANSYAHKalkulator"
mc:Ignorable="d"
Title="FEBRIANSYAH.ID Kalkulator VB" Height="250" Width="310" ResizeMode="NoResize" WindowStartupLocation="CenterScreen">
<Grid>
<TextBox x:Name="textBox1" HorizontalAlignment="Left" Height="23" Margin="10,10,0,0" TextWrapping="Wrap" Text="" VerticalAlignment="Top" Width="274" FontSize="15"/>
<TextBox x:Name="textBox2" HorizontalAlignment="Left" Height="22" Margin="10,73,0,0" TextWrapping="Wrap" Text="" VerticalAlignment="Top" Width="274" FontSize="15"/>
<Label x:Name="labelOperasi" Content="" HorizontalAlignment="Left" Margin="10,38,0,0" VerticalAlignment="Top" FontSize="15" FontWeight="Bold"/>
<TextBox x:Name="textBoxHasil" HorizontalAlignment="Left" Height="24" Margin="10,130,0,0" TextWrapping="Wrap" Text="" VerticalAlignment="Top" Width="274" FontSize="15"/>
<Button x:Name="buttonTambah" Content="+" HorizontalAlignment="Left" Margin="169,38,0,0" VerticalAlignment="Top" Width="25" Height="25" FontSize="15" FontWeight="Bold"/>
<Button x:Name="buttonKurang" Content="-" HorizontalAlignment="Left" Margin="199,38,0,0" VerticalAlignment="Top" Width="25" Height="25" FontSize="15" FontWeight="Bold"/>
<Button x:Name="buttonKali" Content="*" HorizontalAlignment="Left" Margin="229,38,0,0" VerticalAlignment="Top" Width="25" Height="25" FontSize="15" FontWeight="Bold"/>
<Button x:Name="buttonBagi" Content="/" HorizontalAlignment="Left" Margin="259,38,0,0" VerticalAlignment="Top" Width="25" Height="25" FontSize="15" FontWeight="Bold"/>
<Button x:Name="buttonSD" Content="=" HorizontalAlignment="Left" Margin="184,100,0,0" VerticalAlignment="Top" Width="100" Height="25" FontSize="15" FontWeight="Bold"/>
<Label x:Name="labelE" Content="Catatan: E=10. Contoh: 3E+8 = 3x10^8" HorizontalAlignment="Left" Margin="10,181,0,0" VerticalAlignment="Top" FontSize="15"/>
</Grid>
</Window>

MainWindow.xaml.vb

Class MainWindow

Dim AngkaPertama As Double
Dim AngkaKedua As Double
Dim Kalkulasi As String
Dim Hasil As Double

Private Sub buttonTambah_Click(sender As Object, e As RoutedEventArgs) Handles buttonTambah.Click
Kalkulasi = "+"
labelOperasi.Content = "+"
End Sub

Private Sub buttonKurang_Click(sender As Object, e As RoutedEventArgs) Handles buttonKurang.Click
Kalkulasi = "-"
labelOperasi.Content = "-"
End Sub

Private Sub buttonKali_Click(sender As Object, e As RoutedEventArgs) Handles buttonKali.Click
Kalkulasi = "*"
labelOperasi.Content = "*"
End Sub

Private Sub buttonBagi_Click(sender As Object, e As RoutedEventArgs) Handles buttonBagi.Click
Kalkulasi = "/"
labelOperasi.Content = "/"
End Sub

Private Sub buttonSD_Click(sender As Object, e As RoutedEventArgs) Handles buttonSD.Click
AngkaPertama = textBox1.Text
AngkaKedua = textBox2.Text

If Kalkulasi = "+" Then
Hasil = AngkaPertama + AngkaKedua
ElseIf Kalkulasi = "-" Then
Hasil = AngkaPertama - AngkaKedua
ElseIf Kalkulasi = "*" Then
Hasil = AngkaPertama * AngkaKedua
ElseIf Kalkulasi = "/" Then
Hasil = AngkaPertama / AngkaKedua
End If

textBoxHasil.Text = Hasil
End Sub
End Class

Penjelasan

untuk variabel AngkaPertama, AngkaKedua, Hasil menggunakan tipe data Double karena jika menggunakan tipe data dari keluarga integer (int, long, ulong) apabila kalkulasi melebihi limit tipe data tsb maka akan menyebabkan error An unhandled exception of type ‘System.OverflowException’

kelemahan lain dari tipe data keluarga integer ialah tidak support koma contoh seharusnya 2,18 hasil yang ditampilkan adalah 2

karena alasan tersebut keluarga integer tidak cocok untuk kalkulator

oh ya FYI hasil E pada kalkulator buka error loh! tetapi merupakan 10 pangkat. contoh : 3E+8 = 3*10^8

Kalkulasi menggunakan String karena untuk menyimpan data simbol (+-*/)

Hasil

Source Code

https://github.com/febriansyah4299/Kalkulator-Visual-Basic-WPF

Sekian postingan dari kami, bila ada pertanyaan bisa anda tulis di komentar atau bisa juga ke Halaman Tentang & Kontak FEBRIANSYAH.ID dan bila ada kesalahan atau isi posting yang menyinggung perasaan pembaca kami mohon maaf, dan bisa anda laporkan di Halaman Tentang & Kontak FEBRIANSYAH.ID
kami terima kasih telah berkunjung di FEBRIANSYAH.ID šŸ™‚

LEAVE A REPLY

Please enter your comment!
Please enter your name here

This site uses Akismet to reduce spam. Learn how your comment data is processed.