主题：[求助]判断电话号码的运营商

用帮助的知识解决：
http://www.foxtable.com/webhelp/scr/0328.htm

http://www.foxtable.com/webhelp/scr/0760.htm
http://www.foxtable.com/webhelp/scr/0331.htm

http://www.foxtable.com/webhelp/scr/0344.htm

http://www.foxtable.com/webhelp/scr/1338.htm

 

 

选择文件的代码,自己写

e.Form.Controls("TextBox1").Value = Filesys.ReadAllText(选择的文件,.....)

With e.Form.Controls("TextBox1")

    For i As Integer = 0 To .Lines.Length - 1
        if .Lines(i).length > 3 Then

           Select case .Lines(i).SubString(0,3)

               case "136","137","138","139"

                   移动的哦

               case "130","132"

                  联通的哦

           End Select

        End if
    Next
End With