program VB.net anda yang pertama.

program VB.net anda yang pertama.

Sesuatu hal yang baru di VB.net dibandingkan dengan Visual Basic 6.0, adalah pembuatan program console yang berjalan di lingkungan MS-DOS prompt. Anda dapat membuat program console dengan pilihan “Console application” pada jendela New Project.



Selanjutnya akan muncul suatu Code Windows, dimana anda dapat mengetikan program anda.

Module Module1
Sub Main()

End Sub
End Module

Berikut ini adalah contoh program menghitung Luas Persegi panjang :

Module Module1

Sub Main()
'Deklarasi variabel
Dim Panjang, Lebar As Integer
Dim Luas As Long
Console.WriteLine("Menghitung luas persegi panjang")
Console.Write("Panjang :")
Panjang = Console.ReadLine()
Console.Write("Lebar :")
Lebar = Console.ReadLine()
Luas = Panjang * Lebar
Console.WriteLine("Luas persegi panjang : " & Luas.ToString)
Console.ReadLine()
End Sub

End Module

Menjalankan program

Untuk menjalankan program dapat digunakan tombol fungsi F5, atau dari menu “Project” pilih “Run”, ataupun dengan menggunakan toolbar
Project

Buatlah program untuk menghitung akar persamaan kuadrat.

Imports System.Math

Module Module1

Sub Main()
Dim a, b, c As Integer
Dim D As Long
Dim x1, x2 As Double
Console.WriteLine("Menghitung persamaan kuadrat aX2 + bX + c")
Console.Write("Nilai a :")
a = Console.ReadLine()
Console.Write("Nilai b :")
b = Console.ReadLine()
Console.Write("Nilai c :")
c = Console.ReadLine()

'Menghitung diskriminan
D = b ^ 2 - 4 * a * c
If D > 0 Then
x1 = (-b + Sqrt(D)) / 2 * a
x2 = (-b - Sqrt(D)) / 2 * a
Console.WriteLine("x1 " & x1.ToString)
Console.WriteLine("x2 " & x2.ToString)
Else
Console.WriteLine("Akar imaginier !")
End If
End Sub

End Module