    <WebMethod()> _
    Public Function GetPerson() As Person
        Dim person As Person = New Person
        person.Name = "山田太郎"
        person.Age = 17
        person.SetTemporaryID(DateTime.Now.ToString())
        Return person
    End Function