Program Nama VB 2010
Public Class Form2
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Label1.Text = textnama.text
End Sub
Private Function textnama() As Object
Throw New NotImplementedException
End Function
End Class 
