Private Sub CommandButton1_Click ()
If Round (Range (" K5 "). The Value, 2)=10.00 Then
Image1. Visible=True Or Image2. Visible=True
End the if
End sub
CodePudding user response:
Private Sub CommandButton1_Click ()
If Round (Range (" K5 "). The Value, 2)=10.00 Then
Dim as integer I
I=int (RND * 10)
Image1. Visible=(i>
=5)Image2. Visible=not image1. Visible
End the if
End sub