Como cambiar direccion IP desde Visual Basic (URGE)

Espero este par de codigos te ayuden a conocer mas del tema:
1.*******************************************
// This program shows how to use the IPAddress class to obtain a server

// IP addressess and related information.

using System;

using System.Windows.Forms;

using System.Net;

using System.Net.Sockets;

using System.Text.RegularExpressions;

namespace Mssc.Services.ConnectionManagement

{

class TestIPAddress

{

/**

* The IPAddresses method obtains the selected server IP address information.

* It then displays the type of address family supported by the server and
its

* IP address in standard and byte format.

**/

private static void IPAddresses(string server)

{

try

{

System.Text.ASCIIEncoding ASCII = new System.Text.ASCIIEncoding();


// Get server related information.

IPHostEntry heserver = Dns.Resolve(server);

// Loop on the AddressList

foreach (IPAddress curAdd in heserver.AddressList)

{



// Display the type of address family supported by the server. If the

// server is IPv6-enabled this value is: InternNetworkV6. If the server

// is also IPv4-enabled there will be an additional value of InterNetwork.

Console.WriteLine("AddressFamily: " + curAdd.AddressFamily.ToString());


// Display the ScopeId property in case of IPV6 addresses.

if(curAdd.AddressFamily.ToString() ==
ProtocolFamily.InterNetworkV6.ToString())

Console.WriteLine("Scope Id: " + curAdd.ScopeId.ToString());



// Display the server IP address in the standard format. In

// IPv4 the format will be dotted-quad notation, in IPv6 it will be

// in in colon-hexadecimal notation.

Console.WriteLine("Address: " + curAdd.ToString());


// Display the server IP address in byte format.

Console.Write("AddressBytes: ");





Byte[] bytes = curAdd.GetAddressBytes();

for (int i = 0; i < bytes.Length; i++)

{

Console.Write(bytes[i]);

}

Console.WriteLine("");

}

}

catch (Exception e)

{

Console.WriteLine("[DoResolve] Exception: " + e.ToString());

}

}

// This IPAddressAdditionalInfo displays additional server address
information.

private static void IPAddressAdditionalInfo()

{

try

{

// Display the flags that show if the server supports IPv4 or IPv6

// address schemas.

Console.WriteLine("SupportsIPv4: " + Socket.SupportsIPv4);

Console.WriteLine("SupportsIPv6: " + Socket.SupportsIPv6);

if (Socket.SupportsIPv6)

{

// Display the server Any address. This IP address indicates that the server

// should listen for client activity on all network interfaces.

Console.WriteLine("IPv6Any: " + IPAddress.IPv6Any.ToString());

// Display the server loopback address.

Console.WriteLine("IPv6Loopback: " + IPAddress.IPv6Loopback.ToString());


// Used during autoconfiguration first phase.

Console.WriteLine("IPv6None: " + IPAddress.IPv6None.ToString());


Console.WriteLine("IsLoopback(IPv6Loopback): " +
IPAddress.IsLoopback(IPAddress.IPv6Loopback));

}

Console.WriteLine("IsLoopback(Loopback): " +
IPAddress.IsLoopback(IPAddress.Loopback));

}

catch (Exception e)

{

Console.WriteLine("[IPAddresses] Exception: " + e.ToString());

}

}



public static void Main(string[] args)

{

string server1 = null;

//

// // Define a regular expression to parse user's input.

// // This is a security check. It allows only

// // alphanumeric input string between 2 to 40 character long.

Regex rex = new Regex(@"^[a-zA-Z]\w{1,39}$");

//

if (args.Length < 1)

{

// If no server name is passed as an argument to this program, use the
current

// server name as default.

server1 = Dns.GetHostName();

Console.WriteLine("Using current host: " + server1);

}

else

{

server1 = args[0];

if (!(rex.Match(server1)).Success)

{

Console.WriteLine("Input string format not allowed.");

return;

}

}

// // Get the list of the addresses associated with the requested server.

// IPAddresses(server);

//

// // Get additonal address information.

// IPAddressAdditionalInfo();

GetIpAddressList1();

}

public static void GetIpAddressList1()

{

try

{

// Get 'IPHostEntry' object containing information like host name, IP
addresses, aliases for a host.

string server=Dns.GetHostName();

string ip=" ";

IPHostEntry hostInfo = Dns.GetHostByName(server);

Console.WriteLine("Host name : " + hostInfo.HostName);

Console.WriteLine("IP address List : ");

for(int index=0; index < hostInfo.AddressList.Length; index++)

{

//MConsole.WriteLine(hostInfo.AddressList[index].ToString());

ip= ip + hostInfo.AddressList[index].ToString();


}

MessageBox.Show(ip);

}

catch(SocketException e)

{

Console.WriteLine("SocketException caught!!!");

Console.WriteLine("Source : " + e.Source);

Console.WriteLine("Message : " + e.Message);

}

catch(ArgumentNullException e)

{

Console.WriteLine("ArgumentNullException caught!!!");

Console.WriteLine("Source : " + e.Source);

Console.WriteLine("Message : " + e.Message);

}

catch(Exception e)

{

Console.WriteLine("Exception caught!!!");

Console.WriteLine("Source : " + e.Source);

Console.WriteLine("Message : " + e.Message);

}

}

}

}**************************************

2.- ***************************************

// // Permite obtner la direccion IP del equipo

// public string Get_IpAddress()

// {

// // intError;

//

//

// try

// {

// intError=0;

// string server=Dns.GetHostName();

// string ip=" ";

//

// IPHostEntry hostInfo = Dns.GetHostByName(server);

// for(int index=0; index < hostInfo.AddressList.Length; index++)

// {

// ip= ip + hostInfo.AddressList[index].ToString();

// }

// return ip;

// }

// catch

// {

// intError=7;

// return " ";

// }

// }


"Roberto Ortega Gonzalez" <Roberto Ortega
wrote in message
news:

Estoy desarrollando una aplicación en visual basic, pero necesito estar
cambiando entre direcciones IP a mi equipo, como puedo hacer para que por
medio de codigo pueda hacerlo?