Modul

Berikut ini contoh program pembuatan modul, semoga bermanfaat untuk teman – teman ,……

Public Class Form

    Public nama As String, hasil, a, b As Integer

    Sub tampilnama()

        nama = "Teknik Informatika"

    End Sub

    Sub hitung()

        hasil = Val(a) * Val(b)

    End Sub

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

        Call tampilnama()

        a = TextBox1.Text

        b = TextBox2.Text

        Call hitung()

        TextBox3.Text = hasil

    End Sub

End Class