所属成套资源：粤教b版八年级下册信息技术课件PPT

成套系列资料，整套一键下载

浏览整套资料 (共11份)

初中信息技术粤教版 (B版)八年级下册第三节模拟抽奖箱课文课件ppt

展开

这是一份初中信息技术粤教版 (B版)八年级下册第三节模拟抽奖箱课文课件ppt，共24页。PPT课件主要包含了用VB如何实现，抽奖原理分析，取整函数，编程及调试，CONTENTS，PART01，PART02，控件数组名，索引号下标，PART03等内容，欢迎下载使用。

Textbx控件、控件数组
将人名写在小卡片纸上，将小卡片纸放进箱子里
将手伸入箱子里，拿出一张卡片
将人名通过键盘输入到计算机中
计算机输出随机抽取到的名字
本课任务：模拟从三个人中随机抽取一人获奖
提供用户输入文本或显示文本。
TextBx 控件的输入、输出功能主要通过Text属性来实现。
控件数组：存储一批同类的数据。
控件数组由一组相同类型的控件组成，这些控件共用一个控件名。
通过复制、粘贴控件的方式建立控件数组
TextName(0) TextName(1)
可以利用索引号将数字与控件关联起来，同时关联了它的Text属性，间接实现数字与文本的关联。
TextName(0).Text
TextName(1).Text
TextName(2).Text
随机得到一个0~1之间的小数（0=测试：Private Sub Cmmand1_Click()Text1.Text = RndEnd Sub
Private Sub Cmmand1_Click()RandmizeText1.Text = RndEnd Sub
初始化随机函数Randmize
1、随机得到一个0~1之间的小数（0=0 3
1 4
1 11
Int(number)
得到一个不大于number的最大整数。
1,2,3,4,5,6,7,8,9,10
TextBx,显示中奖人的姓名
Textbx控件数组，输入参与抽奖人的姓名
按钮控件，启动抽奖按钮
Label，提示要做的操作
e7d195523061f1c08d347f6bf0421bdacd46f3c1815d51b81E1CE79090F8942429A56C6AE2B3163BABA1A3FCE285BEC4FF43A5085572A94AD2C0A17AE448F24FA68DD62479D8C0666FEB6710638384D2ED817A4F5797E34890956C5B1D69F5CD3D398C3A28C31ECA1D0050C0B33167563663DFCDA8B3865BA526090167762FE425F54A04D127EB0EF1191779C8ACA4BB
随机选择控件数组元素的文本内容
Textbx控件数组名称
1、下列选项中，能清除文本框Text1内容的语句是（ B）A. Text=”” B. Text1.Text=”” C. Text1.clear D. Text1.Cls
2、下列控件属性赋值语句错误的是（D）A.label1=”欢迎””欢迎”C.Text1=”欢迎”D.Text=”欢迎”
3、Int( Rnd * 100 ) 表示的是（C）范围内的整数。 A、[0，100] B、[1，99] C、[0，99] D、[1，100]