找回密码
 立即注册
搜索

求VBA写总分的程序,10选择题,40个选项。

10
回复
1412
查看
[复制链接]

17

主题

220

帖子

42

幻币

一流武者

Rank: 3Rank: 3

积分
260
QQ
2008-9-21 19:34:00 显示全部楼层 |阅读模式
共两张PPT,每张PPT5道选择题,20个选项,想在第3张PPT算总分,求VBA程序。
完形填空(算分).rar (55.06 KB, 下载次数: 209)
PPT学习论坛
回复

使用道具 举报

14

主题

195

帖子

36

幻币

一流武者

Rank: 3Rank: 3

积分
244
QQ
2008-9-21 20:35:55 显示全部楼层
等待高手接招,学习
PPT学习论坛
回复 支持 反对

使用道具 举报

15

主题

208

帖子

43

幻币

一流武者

Rank: 3Rank: 3

积分
251
QQ
2008-9-21 20:41:20 显示全部楼层
不算难,有空教你!
你的文件中用复选按钮,这样不合适。。。
演示文稿1.rar (17.21 KB, 下载次数: 247)
PPT学习论坛
回复 支持 反对

使用道具 举报

10

主题

204

帖子

27

幻币

一流武者

Rank: 3Rank: 3

积分
235
QQ
2008-9-21 21:03:46 显示全部楼层
还可以这样玩,版主真是强人!
PPT学习论坛
回复 支持 反对

使用道具 举报

7

主题

201

帖子

25

幻币

一流武者

Rank: 3Rank: 3

积分
243
QQ
2008-9-21 21:22:23 显示全部楼层
首先多谢奉献。但我要的是在第三张幻灯片把前面两张的幻灯片的40个选项的得分相加,因为完形填空共有10道题,每道有4个选项,要两张PPT才能放得下,拜托。
PPT学习论坛
回复 支持 反对

使用道具 举报

16

主题

229

帖子

40

幻币

一流武者

Rank: 3Rank: 3

积分
272
QQ
2008-9-21 21:30:09 显示全部楼层
怎样进行跨幻灯片的记分?我不会写程序。
PPT学习论坛
回复 支持 反对

使用道具 举报

14

主题

215

帖子

37

幻币

一流武者

Rank: 3Rank: 3

积分
267
QQ
2008-9-21 22:08:29 显示全部楼层
今天得空,给你做了个样儿,两页,第三页显示成绩!OK

演示文稿1.rar (16.77 KB, 下载次数: 265)
PPT学习论坛
回复 支持 反对

使用道具 举报

17

主题

193

帖子

39

幻币

一流武者

Rank: 3Rank: 3

积分
247
QQ
2008-9-21 22:32:48 显示全部楼层
代码大体如下
Private Sub CommandButton1_Click()
zf = 0
If Slide1.Op1.Value = True Then
zf = zf + 5
End If
If Slide2.Op2.Value = True Then
zf = zf + 5
End If
T1.Text = zf
End Sub
PPT学习论坛
回复 支持 反对

使用道具 举报

11

主题

228

帖子

30

幻币

一流武者

Rank: 3Rank: 3

积分
269
QQ
2008-9-21 23:23:05 显示全部楼层
斑竹强人啊 VBA是个好东西
PPT学习论坛
回复 支持 反对

使用道具 举报

13

主题

212

帖子

26

幻币

一流武者

Rank: 3Rank: 3

积分
254
QQ
2008-9-21 23:55:03 显示全部楼层
唉,什么世道?问题有没有解决也不回个帖
PPT学习论坛
回复 支持 反对

使用道具 举报

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