如何实现按钮验证PictureBox已加载图片的功能？

你的核心问题是验证逻辑未与跳转逻辑关联，且缺少必填项的完整校验，导致无论PictureBox是否有图片，都会执行页面跳转。以下是具体解决方案：

一、修复按钮点击事件的验证逻辑 #

将所有校验逻辑整合，只有当所有必填项填写完成且PictureBox加载图片后，才执行页面跳转，否则提示错误并终止后续代码：

Private Sub btnCompleteRegister_Click(sender As Object, e As EventArgs) Handles btnCompleteRegister.Click
    ' 1. 校验姓名、企业名称等必填文本框（替换为你的实际控件名）
    If String.IsNullOrWhiteSpace(txtName.Text) Then
        MessageBox.Show("请填写姓名", "提示", MessageBoxButtons.OK, MessageBoxIcon.Warning)
        txtName.Focus()
        Return ' 终止后续代码，不执行跳转
    End If

    If String.IsNullOrWhiteSpace(txtCompanyName.Text) Then
        MessageBox.Show("请填写企业名称", "提示", MessageBoxButtons.OK, MessageBoxIcon.Warning)
        txtCompanyName.Focus()
        Return
    End If

    ' 2. 校验PictureBox是否已加载图片
    If PictureBox1.Image Is Nothing Then
        MessageBox.Show("请上传企业Logo", "提示", MessageBoxButtons.OK, MessageBoxIcon.Warning)
        Return
    End If

    ' 所有校验通过，执行页面跳转
    Try
        Form2.Show()
        Me.Hide()
    Catch ex As Exception
        MessageBox.Show($"跳转失败：{ex.Message}", "错误", MessageBoxButtons.OK, MessageBoxIcon.Error)
    End Try
End Sub

二、原代码的问题分析 #

1. 校验逻辑与跳转逻辑脱节：你原代码中判断PictureBox图片的代码仅弹出提示，但未用Return终止后续的Form2.Show()，导致无论校验结果如何都会跳转。
2. 空Try块无意义：原代码的Try块没有包裹核心逻辑，无法捕获跳转过程中的异常，反而容易掩盖问题。
3. 缺少必填文本框校验：仅校验了图片，未对姓名、企业名称等必填项做判断。

三、进阶优化：实时启用/禁用按钮 #

为了提升用户体验，可以在输入过程中实时检查所有条件，自动启用/禁用按钮，避免用户点击后才发现错误：

' 封装校验逻辑的通用方法
Private Sub CheckFormValidity()
    ' 替换为你的实际必填项校验条件
    Dim isNameValid = Not String.IsNullOrWhiteSpace(txtName.Text)
    Dim isCompanyValid = Not String.IsNullOrWhiteSpace(txtCompanyName.Text)
    Dim isLogoValid = PictureBox1.Image IsNot Nothing

    ' 所有条件满足时启用按钮，否则禁用
    btnCompleteRegister.Enabled = isNameValid AndAlso isCompanyValid AndAlso isLogoValid
End Sub

' 绑定文本框内容变化事件
Private Sub txtName_TextChanged(sender As Object, e As EventArgs) Handles txtName.TextChanged
    CheckFormValidity()
End Sub

Private Sub txtCompanyName_TextChanged(sender As Object, e As EventArgs) Handles txtCompanyName.TextChanged
    CheckFormValidity()
End Sub

' 绑定PictureBox图片加载后的事件（图片加载后Size会变化）
Private Sub PictureBox1_SizeChanged(sender As Object, e As EventArgs) Handles PictureBox1.SizeChanged
    CheckFormValidity()
End Sub

内容的提问来源于stack exchange，提问作者Aomine