change on the form but ... way ?

[vwnet]

public Language As String
private Sub x ()
Dim frm As New Form1()
Language = "numaric"


frm.L1.Text = IIf((Language = "English"), "First", "1")
frm.L2.Text = IIf((Language = "English"), "Second", "2")
frm.L3.Text = IIf((Language = "English"), "Thard", "3")
frm.L4.Text = IIf((Language = "English"), "Fourth", "4")
frm.L5.Text = IIf((Language = "English"), "Fivth", "5")
End Sub
'''''''''''''''''''''''''''''
L1 to L5 (Labels) on the form

i want to change some values on the Active form by using
Dim frm As New Form1()

when i call this sub nothing is change ! way ?