找回密码
 立即注册
搜索
12
返回列表 发新帖
楼主: user_ehlue

PPT中如何让按钮点击过就变色或消失

13
回复
416
查看
[复制链接]

8

主题

226

帖子

35

幻币

一流武者

Rank: 3Rank: 3

积分
269
QQ
2016-4-12 17:39:15 显示全部楼层
谢谢,搞定!
PPT学习论坛
回复 支持 反对

使用道具 举报

11

主题

197

帖子

28

幻币

一流武者

Rank: 3Rank: 3

积分
241
QQ
2016-4-12 17:40:25 显示全部楼层
根本没有autoshape,是不需要下载插件?
PPT学习论坛
回复 支持 反对

使用道具 举报

18

主题

224

帖子

50

幻币

一流武者

Rank: 3Rank: 3

积分
281
QQ
2016-4-12 17:45:29 显示全部楼层
学习学习!
PPT学习论坛
回复 支持 反对

使用道具 举报

20

主题

217

帖子

44

幻币

一流武者

Rank: 3Rank: 3

积分
277
QQ
2016-4-12 17:46:53 显示全部楼层

  • Private Sub CommandButton1_Click()
  • arr = Array(vbBlack, vbRed, vbGreen, vbYellow, vbBlue, vbMagenta, vbCyan, vbWhite)
  • Randomize
  • CommandButton1.BackColor = arr(Int(Rnd() * (UBound(arr) + 1)))End Sub

复制代码
PPT学习论坛
回复 支持 反对

使用道具 举报

12
您需要登录后才可以回帖 登录 | 立即注册