' Button which allows the user to enter in there own password
Private Sub Button4_Click(sender As Object, e As EventArgs) Handles Button4.Click
Try
If TextBox3.Text & TextBox6.Text & TextBox7.Text & TextBox8.Text > 0 And TextBox4.Text <> "" Then
'input in these textboxes must be numerical
' It adds the passwords which is made by the user himself
ListBox1.Items.Add("Application : " & TextBox4.Text & " Password : " & TextBox3.Text & TextBox6.Text & TextBox7.Text & TextBox8.Text & " Time : " & TimeString & " Date : " & DateTime.Today)
End If
Catch ex As Exception
MessageBox.Show("Please provide correct input")
End Try
我目前正在visual basic上创建一个密码生成器,我已经在用户可以创建自己的密码的部分显示了代码,但是我希望有一些错误处理程序,目前我已经让它工作了所以错误如果在textbox3,6,7,8中输入非数字信息,则会显示该消息。这是有效的,但我想添加两件事 1.如果textboxes3,6,7,8为空,则显示错误消息 2.如果textbox4为空,则显示错误消息,列表框中未打印任何内容但未显示错误消息。
P.S vb的初学者
答案 0 :(得分:3)
您确实不需要异常处理来进行验证。您可以使用内置方法执行此操作。
例如,下面检查一个名为ExampleTextBox的texbox是否有输入且输入是否为有效整数。
If String.IsNullOrEmpty(ExampleTextBox.Text) Then
'no input
Else
'has input, check if number
Dim enteredNumber As Integer
If Integer.TryParse(ExampleTextBox.Text, enteredNumber) Then
'input is a valid integer
Else
'input is not a valid integer
End If
End If
答案 1 :(得分:1)
这没有意义:
If TextBox3.Text & TextBox6.Text & TextBox7.Text & TextBox8.Text > 0 And TextBox4.Text <> "" Then
大声说出你想要的东西,一次一件地建立起来。如果TextBox3
为空,您希望显示消息:
If TextBox3.Text = String.Empty Then
如果TextBox3
或TextBox6为空,您希望显示消息:
If TextBox3.Text = String.Empty OrElse TextBox6.Text = String.Empty Then
Etc等。