VB开启远程终端连接的端口3389
首先判断是不是IP地址，如果取出IP的长度是小于7位，那么将退出，以最低的IP:1.1.1.1，刚好7位。利用Split函数来判断IP正确，Split的用法：传回数组= Split(原始字串,要找的字串,拆成几个数组) 。例如：Private Sub Command1_Click()，输出结果："12345"、"123456712345" ，这里将IP地址分为利用.为查找字符来分成4段数字进行判断是否正确。IsNumeric函数的描述：返回Boolean值指明表达式的值是否为数字，这里依次判断四段是不是数字。如果不是的话，则执行下面的msgbox语句。代码是利用WMI组件实现远程连接，修改注册表，重新启动操作，具体来说是利用connectserver与远程主机进行连接。来源:源码中心(www.lelecode.com)
文件大小：5.53KB
评论区