大家好，小体来为大家解答以上的问题。zc，qq及com这个很多人还不知道,现在让我们一起来看看吧！
一、题文
【加试题】小白同学为了方便和同学们的联系，在QQ注册网（http://zc．qq．com）注册了一个QQ账号：2796290808．由于长时间未使用该QQ，小白忘记了登录密码，但他清楚地记得：（1）密码由8个字符组成；（2）密码最前面2位是“xb”；（3）密码后6位是纯数字：①前面两位数字是68；②最后两位数字相同；③能被19和39整除．编写VB程序，实现程序功能：单击“查找”按钮Command1后，在文本框Text1中显示小白的QQ密码．程序设计界面如图所示：程序代码如下，请在划线处填入合适的代码．Functionf（sAsLong）AsBoolean'自定义函数，用于判断密码后6位是否满足条件DimaAsInteger，bAsIntegera=sMod10b=（sMod100）\10If___Thenf=TrueElsef=FalseEndIfEndFunctionPrivateSubCommand1_Click（ ）DimiAsInteger，nAsLongi=0DoWhilei<10000___Iff（n）ThenText1．Text=“xb”+LTrim（Str（n））'LTrim函数的功能：删除字符串的起始空格EndIfi=i+1LoopEndSub．
二、解答
①从程序中可看出变量a用于表示s的个位数，变量b用于表示s的十位数，函数f（s）用于判断s是否满足密码条件：最后两位数字相同；能被19和39整除，故可得到：a=bandsmod19=0 andsmod39=0．②从f（n）这个表达式可看出，密码后六位用变量n表示，前面两位数字是68，变量i控制从0到9999，是密码的后4位数，综上可得出正确的答案，n=680000+i．故答案为：①a=bandsmod19=0andamod39=0；②n=680000+i．
三、分析
f函数用于判断后六位是否满足条件，此处用了if条件语句，在单击事件函数中，用DO While循环语句寻找符合条件的密码．if语句的一般格式为：If 条件表达式1 Then语句块1ElseIf 条件表达式2 Then语句块2endifFor语句的一般格式：For 循环变量=初值 To 终值 Step 步长 语句块Next 变量在For语句中要判断循环变量的值是否超出终值，如果未超出终值，则执行语句块．
本文到此结束，希望对大家有所帮助。
免责声明：本文由用户上传，如有侵权请联系删除！
