第1帧完成,我们已经实现了让用户确定是否接受协议的第一步。下面我们来设计第2帧。这第2帧的场景中放置了许多组件,以及两个输入文本。如图4所示。这些元件所完成的任务是让用户填入个人信息以及意见,并检验是否又漏填或是添写不正确。 4.选中第2帧场景中左边的输入文本,起实例名为“text1”,如图5所示。该输入文本是用来纪录用户姓名的。在该文本的右侧添加一个静态文本,并输入两个红色的星,以表示该项是必须填写的。场景右侧的输入文本,起实例名为“intext”,该文本是用来纪录用户的意见。 5.从“组件”面板中拖拽出一些复选框、列表框、普通按钮、单选按钮组件以及“文本滚动条”到场景中。并如图4所示放置。接着是更换标签,如把“单选按钮”组件的标签改为“男”、“女”。 6.分别给第2帧中的所有组件起实例名。性别一栏的两个“单选按钮”组件的实例名分别为“male”、“female”。如图6所示。把生日静态文本右侧两个列表框组件实例命名为“mymonth”和“myday”。把兴趣静态文本右侧的四个“复选框”组件的实例名分别为“product”、“hard”、“soft”、“game”。 7.把第2帧中两个“普通按钮”组件的标签改为“提交”和“重写”。其执行函数分别为“bn_func()”和“bn_func2()”。 8.点选第2帧,打开的“动作”面板,键入如下代码。 stop(); // 执行函数bn_func()的功能是纪录用户信息并显示 // 字符串变量str2用来纪录用户的生日信息,str3纪录用户的喜欢的栏目 // 变量“outtext”是第3帧中输出文本的变量名 // 执行函数bn_func2()的功能是清空用户输入的信息 // 方法setstate()可以设置“单选按钮”组件的选中状态 // 设置列表框组件的菜单选项为第1项 // 重置四个复选框组件回初始状态
图 4
图 5
图 6
function bn_func() {
// 用户必须输入姓名和意见才能提交信息
if (text1.text != "" && intext.text != "") {
// 变量str0至str4用来接受用户输入的信息
str0 = "您的姓名是:"+text1.text;
// getstate()方法可以判断单选按钮组件是否被选中
// getlabel()方法可以将单选按钮的标签以字符串形式返回
if (male.getstate() == true) {
str1 = "您的性别是:" + male.getlabel();
} else {
str1 = "您的性别是:" + female.getlabel();
}
n1 = "\n" + " ";
n2 = "\n " + "\n";
tr2 = "您的生日是:"+mymonth.getvalue()+myday.getvalue();
if (product.getvalue() == true) {
ch1 = n1 + product.getlabel();
}
if (hard.getvalue() == true) {
ch2 = n1 + hard.getlabel();
}
if (soft.getvalue() == true) {
ch3 = n1 + soft.getlabel();
}
if (game.getvalue() == true) {
ch4 = n1 + game.getlabel();
}
str3 = "您喜欢的栏目有:" + ch1 + ch2 + ch3 + ch4;
str4 = "您的建议是:" + intext.text;
outtext = str0 + n2 + str1 + n2 + str2 + n2 + str3 + n2 + str4;
gotoandstop(3);
}
}
function bn_func2() {
// 清空输入文本“text1”和“intext”中的内容
text1.text = "";
intext.text = "";
male.setstate(true);
female.setstate(false);
// 方法setselectedindex()的作用是选择指定索引处的项目,并更新列表框
mymonth.setselectedindex(0);
myday.setselectedindex(0);
product.setvalue(false);
hard.setvalue(false);
soft.setvalue(false);
game.setvalue(false);
}
Java Asp PHP .Net XML C/C++ CGI VB Jsp J2ee J2se J2me EJB Servlet Tomcat Resin Struts Weblogic Eclipse ANT GUI JMS Web servise IDEA Webphere Hibernate Spring Jboss Applet Swing Socket Javamail Perl Ajax P2P 安全 模式 框架 测试 开源 游戏
Windows XP Windows 2000 Windows 2003 Windows Me Windows 9.x Linux UNIX 注册表 操作系统 服务器 应用服务器