VB.NET mode
x
11
1
Class rocket
2
Private quality as Double
3
Public Sub launch() as String
4
if quality > 0.8
5
launch = "Successful"
6
Else
7
launch = "Failed"
8
End If
9
End sub
10
End class
11
Tests OK Tests OK Tests OK
MIME type defined: text/x-vb
.