[HKEY_LOCAL_MACHINE\SOFTWARE\CurrentVersion\COMMUNICATION\TCPIP\COMM]
"LocalIP"="168.18.12.193"

VB对象窗口中添加一个COMMAND按钮和一个TEXT框，运行时在TEXT框中输入IP地址，按COMMAND后实现修改。不知如何实现，小弟新手，请各位帮忙。

Private Sub Command1_Click()
……………………

End Sub

最好能将代码写出，感激不尽。

RegCreateKey HKEY_LOCAL_MACHINE, "SOFTWARE\CurrentVersion\COMMUNICATION\TCPIP\COMM", hKey
RegSetValueEx hKey, "LocalIP", 0, REG_SZ, ByVal "168.18.12.193", 50
RegCloseKey hKey