请高手把下面易语言代码转换一下VB代码

版本 2
.支持库 internet

验证信息 ＝ 到文本 (HTTP读文件 (“http://127.0.0.1/check.asp?f_user=” ＋ _启动窗口.编辑框1.内容 ＋ “&f_code=” ＋ _启动窗口.编辑框3.内容))
验证网络 ＝ 到文本 (HTTP读文件 (“http://127.0.0.1/internet.asp”))
.如果 (寻找文本 (验证网络, “网络连接失败”, , 假) ≠ -1)
  .判断开始 (验证信息 ＝ “未授权用户”)
  信息框 (“未授权用户，请与客户服务中心联系！”, #信息图标, )
  挂断拨号 ()
  运行 (“rasphone -r ” ＋ “VPN”, 假, #隐藏窗口)

  结束 ()
  .默认

好凶残的代码啊, 连加号都是全角的

lz先用VB写网络拨号程序，抓耳挠腮半天，不会。

于是在网上找啊找，找到一个易语言的程序。这程序够容易，但是会被山寨杀毒软件被当作病毒。

于是再找人修改成VB。说实话，这么简单的程序用VB做何须你这些易语言的代码？

lz太累了，其实除了粘贴别的都不会的人应该花钱买个程序来。免费找苦力就不厚道了。