2016-06-10 57 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

相關問題