Web Client

Hi

There i am getting error on sytax when i try to get login on form  

can i do this to use on forms the user name and login  

any help its welcome  

Dim Username As String = TextBox_Username.Txt 
Dim Password As String = TextBox_Password.Txt 
Dim Status As Boolean Private 

Sub Connect() 
    Dim myCredentials As NetworkCredential = New NetworkCredential(Username, Password) 
    Dim myWebRequest As WebRequest = WebRequest.Create(url) 
    myCredentials.Domain = "https://mail.google.com"
    myWebRequest.Credentials = myCredentials 
    Dim myWebResponse As WebResponse = myWebRequest.GetResponse() 
    myWebResponse.Close() 
    If Status = True then 
        Form2.Show 
    Else 
        Label_Error.Text = "Somenthing Went Wrong Try Again" 
    End If 
End Sub