VB.NET URL POST 요청 및 GET 요청

Public Shared Function GetData(ByVal url As String, ByVal data As String) As String
 
        Dim request As HttpWebRequest = WebRequest.Create(url + "?" + data)
        request.Method = "GET"
        Dim sr As StreamReader = New StreamReader(request.GetResponse().GetResponseStream)
        Return sr.ReadToEnd
    End Function
 
    Public Shared Function PostData(ByVal url As String, ByVal data As String) As String
 
        ServicePointManager.Expect100Continue = False
        Dim request As HttpWebRequest = WebRequest.Create(url)
        '//Post 
        request.Method = "POST"
 
        ' 
        request.ContentType = "application/x-www-form-urlencoded"
        ' URL 
        Dim encoding As New UTF8Encoding()
        Dim bys As Byte() = encoding.GetBytes(data)
        '  ContentLength 
        request.ContentLength = bys.Length
        '   
        Dim newStream As Stream = request.GetRequestStream()
        newStream.Write(bys, 0, bys.Length)
        newStream.Close()
        ' 
        Dim sr As StreamReader = New StreamReader(request.GetResponse().GetResponseStream)
        Return sr.ReadToEnd
    End Function