vb.net 教程 3-3 窗体编程 输入对话框 1

有时候需要根据用户输入的信息进行处理，类似于javascript中的 prompt()。

在vb.net中可以使用 Input()方法，以下是一个常见的使用方法：

Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
Dim inputInfo As String
inputInfo = InputBox("请输入你的年龄", "输入信息")

Try
Dim intAge As Integer
intAge = Integer.Parse(inputInfo)
Dim showInfo As String
Select Case intAge
Case 0 To 6
showInfo = "童年"
Case 7 To 17
showInfo = "少年"
Case 18 To 34
showInfo = "青年"
Case 35 To 59
showInfo = "中年"
Case 60 To 130
showInfo = "老年"
Case Else
showInfo = "不是有效的年龄"
End Select
MessageBox.Show("按照我国现有划分，你目前属于 " & showInfo)
Catch ex As Exception
MessageBox.Show("你输入的不是一个有效数字")
End Try

End Sub

当按下按钮时，提示输入



根据用户的输入选择不同的处理，例如输入12时：



注意，代码中使用了Try catch 来处理错误，防止输入的不是有效数字。

学习更多vb.net知识，请参看 vb.net 教程 目录