程序不会给出正确的数字 - 控制台应用程序

Question

我试图在VB中制作一个程序，因为学校里有一项任务。但它没有给出具体的结果。这没有意义。所以，如果有人能给我一个解释和答案那就太棒了。任务：给出电话号码：[phone]。制作一个删除括号的程序。（数字可以改变大小）我的尝试：

Sub Main()
      Dim input, output, ds, sd as string
      Dim s, f as integer
      Console.writeline(" enter number ")
      Input = Console.readline
      s = Instr(input, "(")
      f = InStr(input, ")")
      ds = input.Substring(s, f - 1)
      Sd = input.Substring( f - 1)
     Input = ds + sd
     Console.writline(output)
     Console.Readline()
End sub

输出：

01234)567890

P.s忽略任何拼写错误，因为这是上传到我的手机。只是说我对其他语言有所了解，这首先是VB。提前致谢！任何使帖子更好的编辑也欢迎！

Answer 1

希望这会对你有所帮助

Sub Main()
    Dim input, input1 As String
    Console.WriteLine(" enter number ")
    input = Console.ReadLine
    input1 = input.Replace("(", String.Empty).Replace(")", String.Empty)
    Console.WriteLine(input1)
    Console.ReadLine()
End Sub