[REQ] Vb 2008 Font codes

[sinic907]

Hey Helpmijers

Ik zoek een code om een font te veranderen
Dan wil ik dat ik op button druk dan vernader de tekst
Of een andere mannier is mij ook wel best
Zolang ik de letter types kan veranderen
ik werk met VB 2008 Express edition, ja ben net begonnen een paar uur geleden

Greetz Sinic907

 

[Pizara]

Makkie :

Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Label1.Text = "Test"
    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim MijnFont As New Font("Times New Roman", 12, FontStyle.Regular, GraphicsUnit.Pixel)
        Label1.Font = MijnFont
    End Sub

End Class