以PPT2010为例,现将该软件的开发者工具开启。然后分别添加数字显示界面和命令按钮。在命令按钮输入对应的代码,然后点击幻灯片放映就可以看到随机生成的数字了。具体的设置方法如下:
1、在电脑上打开一个PPT文件,点击左上角的文件,然后点击选项按钮。
2、在d出的选项对话框中点击自定义功能区,勾选开发者工具点击确定。
3、在PPT界面中点击开发工具以后再点击英文字母A,在PPT编辑区域添加一个标签。
4、鼠标右键点击该标签,选择属性按钮进入。
5、在d出的属性对话框中分别将名称以及caption后面的表格中输入label。
6、再点击开发工具下面的按钮标志,在PPT编辑界面中添加一个命令按钮。
7、点击该命令按钮后,在出现的对话框中将名称设定为Command,CAPTION后面修改为抽取。
8、双击该抽取按钮,在初选的代码界面输入LabelCaption = 1 + Int(55 Rnd()),表示的意思为在LABEL界面随机生成1-55。输入完成以后点击关闭。
9、点击该PPT的幻灯片放映按钮。
10、进入到幻灯片放映界面以后点击抽取按钮就可以看到标签中随机生成的数字了。
设取值区间为[a,b],则要在此区间选取一个随机数,程序为:
a=rand()(b-a)+a
若要求随机数是整数,则程序为:
a=ceil(rand()(b-a))+a
这样即可!
'例如下面随机生成100个1-100的整数,不包括98、99两个数
randomize(timer)
for i=1 to 100
1 x=int(rnd(1)100+1)
if x=98 or x=99 then goto 1
x
next
public class RandomTest{
public static void main(String[] args){
int i=Mathrandom();//random()会自动产生一个00-10的双精度随机数
Systemoutprintln(i);//输出
i=Mathrandom()1000;//产生0-1000的双精度随机数
Systemoutprintln(i);
int b=(int)(Mathrandom()1000);//产生0-1000的整数随机数
Systemoutprintln(b);
}
}import javautilrandom
public class RandomTest{
public static void main(String[] args){
Random random=new Random();//创建random对象
int intNumber=randomnextInt();//获取一个整型数
float floatNumber=randomnextFloat();//获取一个浮点数(0-1)
double doubleNumber=randomnextDouble();//获取双精度数(0-1)
boolean booleanNumber=randomnextBoolean();//获取boolean数
Systemoutprintln("intNumber:"+intNumber);
Systemoutprintln("floatNumber:"+floatNumber);
Systemoutprintln("doubleNumber:"+doubleNumber);
Systemoutprintln("booleanNumber:"+booleanNumber);
}
}
Dim bStop As Boolean
Dim n(1 To 100), i, j, q
Private Sub Command1_Click()
Command1Visible = False
Randomize Timer
While j < 10
q = Int(Rnd(1) 100 + 1)
Label1Caption = q: DoEvents
If n(q) = 0 And bStop = True Then
Print q
n(q) = 1
j = j + 1
bStop = False
End If
Wend
End Sub
Private Sub Command2_Click()
bStop = True
End Sub
Private Sub Form_Load()
For i = 1 To 100
n(i) = 0
Next
j = 0
bStop = False
End Sub
以上就是关于如何在ppt中插入命令按钮,并具有随机抽取数字1-55的功能全部的内容,包括:如何在ppt中插入命令按钮,并具有随机抽取数字1-55的功能、matlab 中抽取随机数的函数、如何用VB设计一个随机抽数程序,又能屏蔽掉某些数字。比如:从1-100抽,屏蔽掉98,98。。。等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)