Duvida sobre vb

Bom dia
Senhores, pesquisei na internet inteira mas acho que não soube me expressar por isso venho lhes perguntar…
tenho um comando VB para alterar o ip do win7 mas gostaria que o comando perguntasse qual ip eu gostaria de colocar segue comando…

’ > ##Script para alterer ip da Placa de Rede ##
>
>
>
> Set objWMIService = GetObject(“winmgmts:\.\root\cimv2”)
>
> Set colNetAdapters = objWMIService.ExecQuery(“Select * from Win32_NetworkAdapterConfiguration where IPEnabled=TRUE”)
>
>
>
>
>
> strIPAddress = Array(“10.10.0.7”) 'Coloque o IP fixo
>
> strSubnetMask = Array(“255.255.255.0”) 'Coloque a Mascara de SubNet
>
> strGateway = Array(“10.1.1.1”) 'Coloque o Gateway
>
> strGatewayMetric = Array(1)
>
> strDNS = Array(“200.204.0.10”,“200.204.0.138”) 'Coloque o IP DNS
>
>
>
> For Each objNetAdapter in colNetAdapters
>
> errEnable = objNetAdapter.EnableStatic(strIPAddress, strSubnetMask)
>
> errGateways = objNetAdapter.SetGateways(strGateway, strGatewaymetric)
>
>
>
> objNetAdapter.SetDNSServerSearchOrder strDNS
>
> Next

na parte

strIPAddress = Array(“10.10.0.7”) 'Coloque o IP fixo

gostaria que abrisse uma caixa de texto pra o usuario alterar o final ou se nao for possivel o ip inteiro

exemplo

10.10.0.___