在excel里面,想點擊按鈕,然后判斷某個單元格k5=10.00,則隨機彈出圖片,但是只能彈出一張,不會彈出第二張,應該怎么修改,麻煩大俠了
Private Sub CommandButton1_Click()
If Round(Range("K5").Value, 2) = 10.00 Then
Image1.Visible = True Or Image2.Visible = True
end if
end sub
uj5u.com熱心網友回復:
Private Sub CommandButton1_Click()
If Round(Range("K5").Value, 2) = 10.00 Then
dim i as integer
i=int(rnd*10)
Image1.Visible = (i>=5)
Image2.Visible = not image1.visible
end if
end sub
轉載請註明出處,本文鏈接:https://www.uj5u.com/gongcheng/67003.html
標籤:VBA
上一篇:求助做個小程式
下一篇:VB 程式運行出現 Run-time error 340, control array element “3”doesn't exist 求大神解答
