Pasar programa de C a VB.NET 2005

[tecnicosht]

Hola.

Necesito pasar este programilla

codeproject.com/dotnet/dotnetwinpcap.asp?df=100&forumid=15610&select=2086 475#xx2086475xx

a VB.NET 2005

No tengo mucha idea de C, me atasco realmente aquí.


if (rcvPack==null)
{
rcvPack=new dotnetWinpCap.ReceivePacket(this.ReceivePacket);
wpcap.OnReceivePacket+=rcvPack;
}

y esto no vale da error

If rcvPack Is Nothing Then
rcvPack = New dotnetWinpCap.ReceivePacket(AddressOf rcvPack)
wpcap.OnReceivePacket = wpcap.OnReceivePacket + rcvPack
End If

también me atasco en la función RecievePacket:

private void ReceivePacket(object sender, PacketHeader p, byte[] s)
{
this.pack_count++;
rtb.Focus();
rtb.Text = rtb.Text + "Content of p : \n";
rtb.Text = rtb.Text + " Caplength: " & p.Caplength & "\n";
rtb.AppendText(" Length : "+p.Length+"\n");
rtb.AppendText(" Timestamp: "+ (p.TimeStamp)+"\n");
labPacketCnt.Text=Convert.ToString(this.pack_count );
}


Alguien puede echarme un cable.

Mil gracias.

[Anpiro]

Hay varias webs que convierten codigo:

Aqui tienes una, nos e si te servira, pero pon en el google Converter c vb y te saldran muchas.

http://www.developerfusion.co.uk/Uti...btocsharp.aspx

Saludos

[tecnicosht]

Iniciado por Anpiro

Hay varias webs que convierten codigo:

Aqui tienes una, nos e si te servira, pero pon en el google Converter c vb y te saldran muchas.

Saludos

Gracias pero ya había probado algo similar y no me funciona.

De:

if (rcvPack==null)
{
rcvPack=new dotnetWinpCap.ReceivePacket(this.ReceivePacket);
wpcap.OnReceivePacket+=rcvPack;
}

Me hace esto:

If rcvPack Is Nothing Then
rcvPack = New dotnetWinpCap.ReceivePacket(Me.ReceivePacket)
wpcap.OnReceivePacket() += rcvPack
End If

Pero me da error.
Me pone esto:

Error 1 'dotnetWinpCap.ReceivePacket' is a delegate type and requires a single 'addressof' expression as the only argument to the constructor. Form1.vb 50 55 P_NET


Salu2.

[moNTeZIon]

Agrégale el addressof antes del Me.ReceivePacket, dentro del paréntesis.

Código:

rcvPack = New dotnetWinpCap.ReceivePacket(AddressOf Me.ReceivePacket)