Claro, es a modo de ejemplo nada mas, no se pueden asignar dos valores a uno solo.
Tenes muchas formas de obtener el source code de una web para despues utilizarlo desde el disco.
Con WinSocks:
Private Sub Winsock1_Connect()
Winsock1.SendData "GET " & Text1.Text & " HTTP/1.1" & vbCrLf & _
"Host: " & b & "" & vbCrLf & _
"Accept: */*" & vbCrLf & _
"Accept-Language: en" & vbCrLf & _
"Connection: Keep-Alive" & vbCrLf & vbCrLf
End Sub
Con INET:
MsgBox = Replace(Inet1.OpenURL("http://www.google.com.ar), vbLf, vbCrLf)