Tutorial Belajar Dasar Visual Basic / VB.net

pengenalan VB.net

visual basic adalah media untuk membuat sebuah program dekstop atau website berdasarkan logika dan kemauan anda .

yang harus kita pelajarin apabila pemula adalah fungsi dari masing" toolbar .

1. membuat Messagebox

Public Class Form1

    Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click

        

MessageBox.Show("Visual Basic Menyenangkan", "fariz", MessageBoxButtons.OK , MessageBoxIcon.Information)

        If MsgBoxResult.Ok Then

            Me.Close()

        End If

    End Sub

End Class

2. membuat variable 

suatu tempat yang digunakan untuk menyimpan suatu nilai yang dapat diubah-ubah sesuai data typenya .

Public Class Form1

    Dim msg As String = "variable asik loh :)"

    Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click

       

 MessageBox.Show(msg, "fariz", MessageBoxButtons.OK, MessageBoxIcon.Information)

      

  If MsgBoxResult.Ok Then

            Me.Close()

        End If

    End Sub

End Class

3. Contoh if

Public Class Form1

    Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
   
   If TextBox1.Text = "hy" Then
            Label1.Text = "WeLcoME =)"

        End If
    End Sub
End Class

4. rumus matematika

1 buah button

2 buah textbox

1 buah label

Public Class Form1

    Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click

       

 Label1.Text = Val(TextBox1.Text) + Val(TextBox2.Text)

    End Sub

End Class

atau

    Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click

       

 Label1.Text = Val(TextBox1.Text) * Val(TextBox2.Text)

    End Sub

End Class

atau

    Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click

       

 Label1.Text = Val(TextBox1.Text) / Val(TextBox2.Text)

    End Sub

End Class

atau

    Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click

       

 Label1.Text = Val(TextBox1.Text) - Val(TextBox2.Text)

    End Sub

End Class