PPT求助，急！

nanade1117

想写一个PPT来产生随机数字，就是1到120，但是网上查了这个语句不能执行，请帮忙修改，并能美化下，在PPT最下面产生一随机数，
新建 Microsoft Office PowerPoint 演示文稿.rar (27.14 KB, 下载次数: 270)

2016-4-12 13:33 上传

点击文件名下载附件 谢谢。。
Private Sub CommandButton1_Click()
Label1.Caption = 1 + lnt(120 * Rnd())
End Sub
网上的语句。。。。

mrlam

Label1.Caption = 1 + Val(Int(120 * Rnd()))或者Label1.Caption =Val(Int(120 * Rnd()))