txtpwd 放在模块中定义为 Public 变量,不然,form2中是无法修改密码的。不过就算你密码修改成功,下次启动时密码还是为初始状态。所以第一次启动时判断是否有密码文件,如果存在就读入到txtpwd 这个变量中,如果没有就把初始密码保存到文件。当程序运行状态下修改密码成功后保存到文件,同时置新密码到txtpwd 变量中。密码保存到文件时可以作一下加密变化,读的时候当然要逆变换一下。
用asc()函数和chr()函数就可以了啊,比如if asc(i)<=87 then a=val(asc(i)+4)'A-V
if asc(i)>87 and asc(i)<=91 then a=val(asc(i)-22)'W-Z
if asc(i)>96 and asc(i)<=118 then a=val(asc(i)+4) 'a-v
if asc(i)>118 and asc(i)<=122 then a=val(asc(i)-22)'w-z
比如还有一个Form2
那你在Form2里面来修改Form1里的东西时,前面加上Form1 就行了啊
比如要修改Form1里的一个按钮上的文字 那就这么写
Form1CommandButton1Caption = "aaaaaa"
你的问题应该是采用随机数Rnd函数。
如果密码位数随机,可采用fix(rnd()11)+6 {我举例限定6-16位数字},如果位数固定则不用。
然后用Rnd生成密码 fix(rnd()10^XX) {XX为上式生成的位数}
以上就是关于VB设置密码修改全部的内容,包括:VB设置密码修改、急 VB语言译密码、VB中如何修改密码等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)