Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim a As Font = New Font("rage Italic", 10) Dim b As Font = New Font("rage Italic", 25) Dim c As Font c = b b = a a = c Label1.Font = a Label1.Text = "hoho" End Sub
Disclaimer: The views and opinions expressed on unofficial pages of California State University, Dominguez Hills faculty, staff or students are strictly those of the page authors. The content of these pages has not been reviewed or approved by California State University, Dominguez Hills.