vb.net 多线程获取网页内容

public static string getXmlFile(String url, String paramList,string referer)

创新互联从2013年成立，是专业互联网技术服务公司，拥有项目成都做网站、网站制作、成都外贸网站建设网站策划，项目实施与项目整合能力。我们以让每一个梦想脱颖而出为使命，1280元瓦房店做网站,已为上家服务,为瓦房店各地企业和个人服务,联系电话:18980820575

{

HttpWebResponse res = null;

string strResult = " ";

try

{

HttpWebRequest req = (HttpWebRequest)WebRequest.Create(url);

req.Method = "GET ";

req.KeepAlive = true;

req.Referer=referer;

//CookieContainer cookieCon = new CookieContainer();

//req.CookieContainer = cookieCon;

//req.CookieContainer.SetCookies(new Uri(url),cookieheader);

StringBuilder UrlEncoded = new StringBuilder();

res = (HttpWebResponse)req.GetResponse();

Stream ReceiveStream = res.GetResponseStream();

Encoding encode = System.Text.Encoding.GetEncoding( "gb2312 ");

StreamReader sr = new StreamReader( ReceiveStream, encode );

Char[] read = new Char[256];

int count = sr.Read( read, 0, 256 );

while (count 0)

{

String str = new String(read, 0, count);

strResult += str;

count = sr.Read(read, 0, 256);

}

}

catch(Exception e)

{

strResult = e.ToString();

}

finally

{

if ( res != null )

{

res.Close();

}

}

return strResult;

}

多线程里调用就行了 费了好长时间才弄出来 我调试过了 能行 如果对你有用就给分吧

vb.net多线程如何返回参数，举个例子，谢谢

Public Class Form1

Public Class SquareClass '把多线程调用的函数封装到类中，通过类事件返回

Public Value As Double

Public Square As Double

Public Event ThreadComplete(ByVal Square As Double)

Public Sub CalcSquare()

Square = Value * Value

RaiseEvent ThreadComplete(Square)

End Sub

End Class

Dim WithEvents oSquare As SquareClass

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click '多线程返回值测试，当线程运行完成激发事件

oSquare = New SquareClass()

Dim t As New Threading.Thread(AddressOf oSquare.CalcSquare)

oSquare.Value = 30

t.Start()

End Sub

Sub SquareEventHandler(ByVal Square As Double) Handles oSquare.ThreadComplete '响应事件函数

MsgBox("The square is "  Square)

End Sub

End Class

VB.net 中创建线程时，线程所要执行的 任务函数 怎么实现后期定义(就像回调函数一样的)？

这个线程对象一定有个完成时或者进行中的动作，你可以用AddHandler语句来将过程委托给ProcessChanged或者ProcessConpleted动作。

主线程读入字符串,子线程返回字符串长度

主线程并发执行，主线程是一种返回字符串长度的简单方法：

EndInvoke做三件事。首先，它会等待异步委托vb.net教程完成执行（如果尚未执行）。其次，它接收返回值（以及任何ref或out参数）。第三，它将所有未处理的工作程序异常抛出回调用线程。

如果您使用异步委托调用的方法没有返回值，则仍然（在技术上）有义务调用EndInvoke。实际上，这是有争议的。没有EndInvoke警察对违规者进行处罚！但是，如果您选择不调用EndInvoke，则需要考虑worker方法上的异常处理，以避免无提示的失败。

您还可以在调用BeginInvoke时指定一个回调委托-一种接受IAsyncResult对象的方法，该方法在完成后会自动调用。这允许煽动线程“忘记”异步委托，但是在回调端需要一些额外的工作：

ginInvoke的最后一个参数是填充IAsyncResult的AsyncState属性的用户状态对象。它可以包含您喜欢的任何内容；在这种情况下，我们使用它将方法委托传递给完成回调，因此我们可以在其上调用EndInvoke。

VB.NET 在线程如何返回Function的值？

Thread不会返回值的。你应该创建委托的，使用委托的异步方法

Dim funcInt32 As Func(Of String, Integer) = AddressOf GetList

Dim s As IAsyncResult = funcInt32.BeginInvoke("(参数)", Nothing, Nothing)

’在要获得结果的地方调用EndInvoke方法结束异步调用并获得结果。

Dim result As Int32 = funcInt32.EndInvoke(s)

vb.net里如何设置多线程?

首先，你把你那些要运行很久的过程。尽量放在一个过程中。

因为线程只能是过程，不能使函数，没有返回值的。

然后，在某个事件下这样写：

**这里我假设你的那个很就的过程叫做 sub aaa()

调用如下：

Dim mythread As New System.Threading.Thread(AddressOf aaa)

mythread.Start()

***********

这样就是定义一个线程，名字叫 mythread，这个线程会运行aaa这个过程。

start 就是让线程运行。

网站名称：vb.net线程返回值 VB函数返回值
网页地址：http://lswzjz.com/article/hgcgcc.html