2c00-0917-2三角形面積
配合課本p.69
Public Class Form1
Dim a, b, c As Single
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
a = Val(TextBox1.Text)
b = Val(TextBox2.Text)
c = (a * b) / 2
Label5.Text = c
End Sub
End Class