应使用SelectedIndexChanged
例:
Private Sub ComboBox1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ComboBox1.SelectedIndexChanged
Dim nCombo As ComboBox = sender
PictureBox1.Image = New Bitmap(nCombo.SelectedItem.ToString) '假设nCombo的SelectedItem="aa.bmp"
End Sub