提交作业方式为:将源代码粘贴到答题的文本编辑框中。 注意: 1.无需提交项目文件 2.如果未将源代码
A、***
B、计算机
C、******
D、错误设置,无法输入
提交作业方式为:将源代码粘贴到答题的文本编辑框中。 注意: 1.无需提交项目文件 2.如果未将源代码粘贴到文本框中,则本题不给分。 随机生成由四个字符构成的验证码。字符可为大写字母、小写字母或者数字字符。 要求: (1)单击Button1,则随机生成四位字符构成的验证码。 (2)生成的验证码显示在文本框txtResult中。显示的内容是:“打死也不告诉其他人,验证码为????”,其中的????显示生成的验证码。例如,生成的验证码为M8tY,则显示内容为“打死也不告诉其他人,验证码为M8tY” 提示: (1)大写字母A-Z,对应的ASCII码为ASC(“A”) –ASC(“Z”),见本题附带的ASCII表可知,即为整数范围[65,90]。 因此,要随机生成大写字母,就转换为要随机生成[65,90]范围内的整数,使用随机函数rnd()可以生成该范围内的整数。具体推导过程为: [65,90]范围内的整数 => [65,91)范围内的整数 => [65-65,91-65)+65范围内的整数 =>[0,26)+65范围内的整数 =>26*[0,1)+65范围内的整数 =>故随机生成的整数为int(26*rnd()+65),即int(26*rnd()+ASC(“A”) 假设生成的该整数为intA,然后使用整数转换为字符的函数Chr()函数进行转换,即Chr(intA),转换后即为随机生成的大写字母。 (2)小写字母a-z,对应的ASCII码为ASC(“a”) -ASC(“z”),也是一个连续的整数区间,可用类似上面的方法推导出随机生成的整数的表达式,然后再用Chr()函数将该整数转换为小写字母。 (3)数字字符0-9, 对应的ASCII码为ASC(“0”) -ASC(“9”),也是一个连续的整数区间,可用类似上面的方法推导出随机生成的整数的表达式,然后再用Chr()函数将该整数转换为数字字符。 (4)随机生成的字符,可为大写字母、小写字母或者数字字符,可以把这个步骤转换为掷一个三面骰子的过程。假设该三面骰子的三面分别是数字1,2,3。如果掷到数字1,则随机生成大写字母;如果掷到数字2,则随机生成小写字母;如果掷到数字3,则随机生成数字字符。 通过这种转换方法之后,当前生成的字符是大写字母、小写字母、数字字符中的哪一种,就转换成为随机生成[1,3]范围内的整数,并根据整数的值来判断需要生成哪种字符类型。 说明:假设方法有多种,这里举出一个例子,也可以用其他假设实现,例如随机生成[0,2]之间的三个整数。 (5)随机生成一个字符的过程(即代码)重复四次,最后将这四个字符使用字符串连接运算&进行连接,即可生成四位的验证码。
提交作业方式为:将源代码粘贴到答题的文本编辑框中。 注意: 1.无需提交项目文件 2.如果未将源代码粘贴到文本框中,则本题不给分。 10只猴子摘了500个桃子,它们约定按照下述规则吃桃子: (1)规则1:每天吃当前桃子数量的一半,并再奖励一只猴子多吃一个桃子。 例如:第一天吃的桃子数为500/2 + 1=251个桃子。 说明:如果桃子数量的一半不为整数,例如49个桃子的一半是24.5个桃子,这时取整数个桃子,即为24个桃子,除此之外,还需要再奖励一只猴子多吃一个桃子。 (2)规则2:除了最后一天之外,每天每只猴子至少能分得1个桃子。如果使用规则1时不能保证每只猴子都分得1个桃子,则当天给每只猴子派发1个桃子,即当天需要派发10个桃子。 (3)如果某一天所有桃子数量不够每只猴子一个时,则当天吃完所有桃子,这即是吃这些桃子的最后一天。 (4)问最后一天还有多少个桃子可以吃,以及每天猴子们都分得多少个桃子吃,每天吃完桃子后还剩多少个桃子? 要求如下: (1)界面有一个多行文本框Textbox1和一个按钮Button1。 (2)单击Button1,执行程序。 (3)在多行文本框中显示如下内容: 总共有500个桃子,10只猴子分享。 第1天吃掉???个桃子,还剩??个桃子。 第2天吃掉???个桃子,还剩??个桃子。 。。。 第?天吃掉???个桃子,还剩??个桃子。 第?天,也就是最后一天还剩???个桃子可以吃。 要求上述显示内容每行换行。 提示: (1)每天吃当前桃子数量的一半再加1,直至当天可以吃的桃子数量的一半加1比10少,则不再按照该规则执行。 (2)文本框中的内容的换行可以使用下面的方法: 例如: textbox1中初始内容为空。需要在第一行中显示内容:你好。代码可为: Textbox1.text= Textbox1.text & “你好” & vbCrLf 注:vbCrLf是Visual Basic(VB,一种编程语言)中的一个字符串常数,即“Chr(13) & Chr(10)”(回车符与换行符连接在一起),是换行的意思 需要在第二行中进一步显示:这是一个VB程序。则完整代码为: Textbox1.text= Textbox1.text & “你好” & vbCrLf Textbox1.text = Textbox1.text & “这是一个VB程序” & vbCrlf 如果每次生成的字符串都存储在变量A中,代码可改为: Dim A$ A=”你好” Textbox1.text= Textbox1.text & A & vbCrlf A=“这是一个VB程序” Textbox1.text= Textbox1.text & A & vbCrlf
A、* *** *****
B、* *** *****
C、***** *** *
D、***** *** *
A、10
B、11
C、12
D、20
为了保护您的账号安全,请在“简答题”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!