2016-06-10 58 views
0

大家早上好。在checkedchanged事件的复选框中添加图片时出现问题

我试图把一个图像放在一个复选框,当它的状态改变(checkedchanged事件),然后,使这个复选框的截图改变状态,但是,当事件被触发,截图完成时,图片没有在下一个代码执行前出现。 我想知道是否有任何方式使它更新事件后的vb。 有谁知道我该怎么做? 谢谢!

我的代码:

Private Sub CheckBox_accept_terms_CheckedChanged(sender As Object, e As EventArgs) Handles CheckBox_accept_terms.CheckedChanged 

Try 
    If CheckBox_accept_terms.Checked Then 

     CheckBox_accept_terms.Image = My.Resources.cancelar 

     If moveTmpPic_finalPic() Then 
      If agreement_screenshot() Then 
       If generate_xml() Then 
        If generate_zip() Then 
         send_email_agreement = False 
         Common_functions.savedCapture = New Saved_capture_form 
         Common_functions.savedCapture.Show() 
         Me.Close() 
        End If 
       End If 
      End If 
     End If 
    End If 

Catch 

End Try 

End Sub 

我也试过:

Private Sub CheckBox_accept_terms_BackgroundImageChanged(sender As Object, e As EventArgs) Handles CheckBox_accept_terms.BackgroundImageChanged 

Try 
    If CheckBox_accept_terms.Checked Then 

     If moveTmpPic_finalPic() Then 
      If agreement_screenshot() Then 
       If generate_xml() Then 
        If generate_zip() Then 
         send_email_agreement = False 
         Common_functions.savedCapture = New Saved_capture_form 
         Common_functions.savedCapture.Show() 
         Me.Close() 
        End If 
       End If 
      End If 
     End If 
    End If 

Catch 

End Try 

End Sub 

Private Sub CheckBox_accept_terms_CheckedChanged(sender As Object, e As EventArgs) Handles CheckBox_accept_terms.CheckedChanged 

    CheckBox_accept_terms.BackgroundImage = My.Resources.cancelar 

End Sub 
+0

你确定你的代码到了那一点吗?设置一个断点并查看。使用Checkbox.BackgroundImage = My.Resources.XXXX适合我。 – Sastreen

回答

0

您可以添加Update()呼叫或Refresh()电话,看看是否有帮助。

尝试:

Private Sub CheckBox1_CheckedChanged(sender As System.Object, e As System.EventArgs) Handles CheckBox1.CheckedChanged 
    CheckBox1.BackgroundImage = My.Resources.garbage 

    CheckBox1.Update() 
    'or use refresh 
    CheckBox1.Refresh() 
End Sub 

更新使得控制 “更新”,并应强制显示图像。

如果您的问题是图像显示不正常,则可能是背景图像的布局。拉伸将使图像适合您的控件大小(而不是保持全尺寸)。

 CheckBox1.BackgroundImageLayout = ImageLayout.Stretch 
+0

这就是我一直在寻找的东西。 Tahks很多! – victoradv

相关问题