VB教程9- Passwords Splash-----外文资料翻译.doc

淮 海 工 学 院 毕业设计(论文)外文资料翻译 系 （院）： 计算机科学系 专 业： 计算机科学与技术 姓 名： 龚 曦 东 学 号： 3202000135 外文出处：/ 附 件： 1.外文资料翻译译文；2.外文原文。 指导教师评语： 签名： （亲笔签名） 年 月 日 注：请将该封面与附件装订成册。 附件1：外文资料翻译译文 VB教程9- Passwords Splash 在我们上一个教程中我们在数据库练习中学习了如何使用组件和文本框。在这个教程里面，我们回到使用文本框为我们的应用程序设置口令和splash屏幕。在这个练习里面，我们从setup.ini文件中读取加密口令。然后当使用者输入正确的口令时，我们启动一个splash屏幕。使用splash屏幕的两个有利条件是不仅允许你展现你的程序和将其加亮；同样你有时间取初始化一个球形变量的程序。涉及到表格和数据库连接。现在这可能是非常重要的--但是相信我一个有着数个数据库连接和长列表框的VB程序的初始化需要10-25秒钟。splash屏幕比仅仅使用口令会话要好的多。 这里是一个诀窍。在口令程序Form_Load初始化的三分之一的时候，在那时如果口令被认可；做口令程序Form_Load初始化的下一个三分之一。然后做最后的初始化以启动你的最后主窗口。但是，首先让我们看看如何编写口令窗口。 Figure 1-口令会话 口令 添加两个文本框到新的工程窗口，称之为“PASSBY”。两个文本框的标签在Figure 1中有显示。 第一个文本框不需要什么特别的设置，单口令文本框需要。它的PasswordChar属性需要设置成文“*”。这似的文本框中的每个字符都被星号取代。程序看见的passwd.Text的值旧是是用户输入了的口令。 第二个诀窍是我们有习惯确认无论何时焦点都在口令文本框上面。用以下的代码框中的文本会自动的被选择： REM This code highlights/selects the text when you enter Screen.ActiveControl.SelStart = 0 ii = Len(Screen.ActiveControl.Text) Screen.ActiveControl.SelLength = ii VB教程七的读者会发现这些代码的一部分十分的熟悉。Screen.ActiveControl引用了普遍的焦点和活跃的控制。这当然是文本框“passwd”。由设置活动的控制的SelStart属性为0且它的SelLength属性等于文本框中文本的长度--这个选择或加亮在立即输入口令中的文本。这意味着用户不必要在输入口令的时候去擦除口令文本框中的内容--这样旧更为方便了。 下一个诀窍是我们认可如果用户输入口令时键入ENTER键表示输入完毕。VB并不会自己认可这一点--你必须使用下列代码来检查，以达到效果： Private Sub passwd_KeyPress(KeyAscii As Integer) detect when user presses Enter key and if so validate password If KeyAscii = 13 Then this is the call on the routine that does the password checking Call passwd_Validate(False) End If End Sub 这个子程序每次在当口令文本框中每个字母被键入时被调用。它是在期待一个Ascii码，13。这个值是确认键的Ascii码。当它被按下的时候，控制器立即将输入的文本传送到口令确认程序中去。当然我们也可以在退出口令文本输入框时单击Okay按钮后传送口令确认。 口令确认程序时公平简单的。从设置文件的Form_Load中我们已经得到了一个口令译文。所以现在我们所需要做的是输入的口令是否与口令译文相匹配。如果不匹配，旧发出一个警告信息要求用户重新输入口令。我们可以控制重试的次数，如果超过，就自动完全的推出口令输入程序。 然而，如果口令试有效的我们就调用splash屏幕程序。 passplash是splash屏幕窗口的名字。这里在我们的程序中有最后两个诀窍。首先我们需要对