Coding Console Application Menghitung Luas data Single
Berikut adalah codingan console application menghitung luas dengan data single yang akan ditampilkan ke MessageBox sebagai hasil perhitungan.
Module Module1
Sub Main()
Dim sLuas As Single
Dim sPanjang As Single = 7.5689782
Dim sLebar As Single = 9.568972
‘ Hitung Luas Dengan Type Data Single
sLuas = sPanjang * sLebar
‘Tampilkan di Message Box’
MsgBox (“Hasil dengan Type Single ” + sLuas.ToString(), MsgBoxStyle.Information, “Tipe Data”)
End Sub
End Module
Setelah Codingan di input pada console application, maka setelah di run akan muncul hasil output seperti pada gambar dibawah ini.
