Friday, March 29, 2013

Tag:

Cara membuat Aplikasi Persamaan kuadrat X1 dan X2 dengan Visual Studio 2012

Assalamualaikum agan/sista semuanya....
ngomong-ngomong kalau agan/sista hoby dengan pemograman, ane mau sharing nih cara membuat aplikasi Persamaan kuadrat dengan visual studio...

Langkah pertama ialah...
1. Buka Visual Studio 2012 maka akan timbul seperti ini :
    
2. Klik New project atau file - new - project (CTRL + N) maka akan timbul gambar seperti ini :
  
  Klik OK - maka akan timbul Form seperti ini :
 
3. Buat Form Seperti ini :
   
4. Ganti :
   

Form1                  ControlBox         = False
TextBox1             Name                    = TextBoxA
TextBox2             Name                    = TextBoxB
TextBox3             Name                    = TextBoxC
TextBox4             Name                    = TextBoxX1
TextBox5             Name                    = TextBoxX2
Button1                Name                    = ButtonHitung
                             Text                       = Hitung
Button2                Name                    = ButtonExit
                             Text                       = Exit
5. Klik 2X di ButtonHitung lalu masukkan(Copy - Paste) script ini :
Private Sub ButtonHitung_Click(sender As Object, e As EventArgs) Handles ButtonHitung.Click
        Dim bil1, bil2, bil3, bil4, bil5, bild As Single
        bil1 = TextBoxA.Text
        bil2 = TextBoxB.Text
        bil3 = TextBoxC.Text
        bild = bil2 ^ 2 - (4 * bil1 * bil3)
        If bild > 0 Then

            bil4 = (-bil2 + Math.Sqrt(bild)) / 2 * bil1
            bil5 = (-bil2 - Math.Sqrt(bild)) / 2 * bil1
            TextBoxX1.Text = bil4
            TextBoxX2.Text = bil5
        ElseIf bild = 0 Then
            bil4 = -bil2 / 2 * bil1
            bil5 = -bil2 / 2 * bil1
            TextBoxX1.Text = bil4
            TextBoxX2.Text = bil5
        Else
            TextBoxX1.Text = "Akar tidak real"
            TextBoxX2.Text = "Akar tidak real"
        End If
    End Sub

6. Pada Bagian ButtonExit Masukkan (Copy - Paste) Script ini :
     Private Sub ButtonExit_Click(sender As Object, e As EventArgs) Handles ButtonExit.Click
        End
    End Sub


Kalau agan/sista ingin melihat software nya atau malas buat software nya agan bisa download software aplikasi persamaan kuadratnya di sini..

Download :



 

About anonyme

Hi, My Name is Hafeez. I am a webdesigner, blogspot developer and UI designer. I am a certified Themeforest top contributor and popular at JavaScript engineers. We have a team of professinal programmers, developers work together and make unique blogger templates.

0 comments:

Post a Comment

 

Ads