找回密码
 立即注册
搜索

如何改变PPT中“切换按钮”前后状态的背景颜色?

9
回复
667
查看
[复制链接]

13

主题

208

帖子

33

幻币

一流武者

Rank: 3Rank: 3

积分
262
QQ
2010-1-20 22:48:00 显示全部楼层 |阅读模式
请教各位:如何设置PPT中“切换按钮”这个控件在点击前后状态的背景颜色
要求连续点击按钮时前后两种颜色会交替切换,而不是只变换一次。我想当然地写了以下代码但会报错也没解决交替变换的问题:
Private Sub Button1_Click()
Set Button1.BackColor.Value = "&H0000FF00&"
End Sub
希望知道的指点一下,多谢!
PPT学习论坛
回复

使用道具 举报

16

主题

214

帖子

54

幻币

一流武者

Rank: 3Rank: 3

积分
287
QQ
2010-1-20 23:49:54 显示全部楼层
切换按钮的默认名称为ToggleButton
BackColor属性后直接写色值,且无须引号
PPT学习论坛
回复 支持 反对

使用道具 举报

10

主题

221

帖子

35

幻币

一流武者

Rank: 3Rank: 3

积分
271
QQ
2010-1-20 23:54:38 显示全部楼层
是这样吗——
Private Sub ToggleButton1_Click()
Set ToggleButton1.BackColor = &HFF00&
End Sub
运行时提示“错误的参数号或无效的属性赋值”
PPT学习论坛
回复 支持 反对

使用道具 举报

12

主题

231

帖子

29

幻币

一流武者

Rank: 3Rank: 3

积分
265
QQ
2010-1-21 00:11:15 显示全部楼层
呵呵,也来学习一下。

PPT学习论坛
回复 支持 反对

使用道具 举报

13

主题

209

帖子

28

幻币

一流武者

Rank: 3Rank: 3

积分
231
QQ
2010-1-21 00:56:24 显示全部楼层
set用于给变量赋值,而BackColor是属性,当然不能用set了。。。。
PPT学习论坛
回复 支持 反对

使用道具 举报

11

主题

219

帖子

36

幻币

一流武者

Rank: 3Rank: 3

积分
261
QQ
2010-1-21 00:58:02 显示全部楼层
那应该如何写代码?
PPT学习论坛
回复 支持 反对

使用道具 举报

10

主题

216

帖子

27

幻币

一流武者

Rank: 3Rank: 3

积分
253
QQ
2010-1-21 01:03:57 显示全部楼层
Private Sub ToggleButton1_Click()
ToggleButton1.BackColor = &HFF00&
End Sub
PPT学习论坛
回复 支持 反对

使用道具 举报

12

主题

208

帖子

39

幻币

一流武者

Rank: 3Rank: 3

积分
258
QQ
2010-1-21 01:22:19 显示全部楼层
多谢!还有就是“交替变换的问题”了,想了下这么实现了
Public x As Integer
Private Sub ToggleButton1_Click()
If x <> 1 Then
ToggleButton1.BackColor = &HEE00&
x = 1
Else
ToggleButton1.BackColor = &HC0C0&
x = 2
End If
End Sub
PPT学习论坛
回复 支持 反对

使用道具 举报

18

主题

212

帖子

51

幻币

一流武者

Rank: 3Rank: 3

积分
272
QQ
2010-1-21 01:42:39 显示全部楼层
请先描述什么是交替变换,然后再想解决方案,我不明白什么是交替变换。
如果我理解正确,你应该用语句判断当前按钮是什么颜色,如果是你想要的颜色,则退出程序,如果不是你想要的颜色,则变换为你想要的颜色,由此实现你说的交替。。。。。。
PPT学习论坛
回复 支持 反对

使用道具 举报

14

主题

233

帖子

33

幻币

一流武者

Rank: 3Rank: 3

积分
277
QQ
2010-1-21 02:13:08 显示全部楼层
恩,我指的就是这个意思,你的方法更简便些,多谢!
PPT学习论坛
回复 支持 反对

使用道具 举报

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