2阶段二登录界面的设计与实现2

阶段二：登录界面的设计与实现3、数据的输入和输出（1）输入对话框InputBox函数InputBox函数的作用：打开一个对话框，等待用户输入内容，当用户单击“确定”按钮或按回车键后，函数返回输入的值，其值的类型为字符串。InputBox(提示[，标题][，缺省][，x坐标位置][，y坐标位置])其中：提示：提示信息；标题：对话框标题；缺省：输入区缺省值例要在屏幕上显示图示的对话框：相应的语句如下：DimstrNameAsString*40strName=InputBox(“请输入你的姓名”+vbCrLf+“然后单击确定”,“输入框”)（其中vbCrLf为显示多行）也可以使用如下语句：DimstrNameAsString*40，strS1AsString*40strS1=“请输入你的姓名”+Chr(13)+Chr(10)+“然后单击确定”（其中Chr(13)为（回车），Chr(10)为换行）strName=InputBox(strS1，输入框，，100，100)当键盘输入“王晓明”后，变量strName获得键盘输入的值。（2）消息对话框MsgBox函数和MsgBox过程MsgBox的作用是打开一个消息框，等待用户选择一个按钮。函数形式：变量[%]=MsgBox(提示[,按钮][，标题])过程形式：MsgBox提示[,按钮][,标题]按钮：整型表达式，决定消息框按钮的数目、含义及出现在消息框上的图标类型。例：i=MsgBox(密码错误,5+vbExclamation,警告)按钮值如下函数返回所选按钮整数值：三、基本控件和窗体1、控件常用属性（1）Name名称属性创建的对象名称，有默认的名。在程序中，控件名是作为对象的标识而引用，不会显示在窗体上。（2）Caption标题属性该属性决定了控件上显示的内容。（3）Height、width、top和left属性LeftTopHeightWidth（4）Enabled属性控件是否可操作。当设置为false时，呈暗淡色，禁止用户进行操作。（5）Visible属性控件是否可见。当设置为false时，用户看不到，但控件本身存在。（6）Font属性Fontname：字体；Fontsize：字体大小；Fontbold：是否是粗体；Fontitalic：是否斜体；Fontstrikethru：是否加一删除线。Fontunderline：是否带下划线。（7）Forecolor前景颜色属性设置控件的前景颜色（即正文颜色)。其值是一个十六进制常数，用户可以在调色板中直接选择所需颜色。（8）Backcolor背景颜色属性（以标签为例）（9）Backstyle背景风格属性0-transparent：透明显示，即控件背景颜色显示不出来。（10）BorderStyle边框风格属性0-None：控件周围没有边框。1-FixedSingle：控件带有单边框。（11）Alignment属性控件上正文水平对齐方式0：正文左对齐；1：右对齐；2：居中。（12）AutoSize属性控件是否根据正文自动调整大小，False（13）WordWarp属性AutoSizeTrue时，WordWarp才有效。按正文字体大小在垂直方向上改变显示区域的大小。（14）TabIndex属性决定了按Tab键时，焦点在各个控件移动的顺序。各个控件默认TabIndex值就是以控件建立时的顺序，第一个为0。（15）控件默认属性反映该控件最重要的属性，使用时可省略属性名。注意：Command的默认属性为Default,当该属性为True，当按Enter键，该控件起作用。当Command的Cancel属性为True，当按Esc键，该控件起作用。2、窗体（1）属性Caption标题MaxButton、MinButtonIcon、ControlBoxPicture、AutoRedrawBorderStyle（012345）WindowsState（0-正常、1-最小化、2-最大化）标题图标控制菜单框最小化按钮最大化按钮边框样式（2）事件Click：单击鼠标时激发。DblClick：双击鼠标时激发。Load：当装入窗体时激发，通常用于对属性和变量初始化。UnLoad：当销毁窗体时激发。（3）方法Print、Cls和Move等3、标签（Label）用于显示文本(输出)信息，不能作为输入信息的界面。4、文本框（TextBox）是一个文本编辑区域，可在该区域输入，编辑和显示正文内容。（1）其他属性Text：正文内容；Maxlength：设置正文的最多字符个数，0任意长度值；MultiLine：是否为多行，默认为一行，False；ScrollBars：MultiLine为True时，该属性才有效，表示滚动条的形式None、1-Horizontal、2-Vertical、3-Both；Locked：是否可被编辑属性，False，表示为可编辑；PassWord：口令字符；Text属性返回输入的数据，屏幕显示该字符；SelStart、SelLength、SelText：选中文本的起始、长度、内容。（2）常用事件Change：当改变文本框的Text属性时会引发该事件。KeyPress(KeyAsciiAsInteger)：同上，并可返回一个KeyAscii参数。KeyAscii为13，按回车键;为0，去除刚输入的字符。LostFocus：当控件失去焦点时发生。GotFocus：当控件获得焦点时发生。（3）常用方法[对象.]SetFocus：是把光标移到指定的文本框对象中。5、命令按钮（CommandButton）接受用户输入的命令。输入命令可以有三种方式：鼠标单击、Tab键焦点到该按钮、快捷键。（1）其他属性Caption：命令按钮显示的内容，可设置快捷键。Value：检查该按钮是否按下。该属性在设计时无效。Picture：按钮可显示图片文件(.bmp和.Ico)，当Style为1时有效。Style：确定显示的形式，0只能显示文字，1文字、图形均可。ToolTipText：设置工具提示，和Picture结合使用。（2）事件Click登陆界面设计与实现：数据库准考证号和身份证号2、数据库准考证号和身份证号功能描述：输入正确的准考证号和身份证号（来自数据库）进入主界面，否则提示请确认准考证号或身份证号是否正确！。界面设计：界面由两个标签控件、两个文本框控件、两个命令按钮控件和一个ADO控件组成，界面如下所示：属性设计：控件类型控件名称控件属性FormfrmLoginCaption=”用户登录”LabellblStudentCodeCaption=”准考证号：”LabellblIDCardCaption=”身份证号：”TextBoxtxtStudentCodeText=””TextBoxtxtIDCardText=””CommandButtonCmdOkCaption=”登录”CommandButtonCmdExitCaption=”退出”Cancel=TrueAdodcAdodc1ConnectionString=”Provider=SQLOLEDB.1;IntegratedSecurity=SSPI;PersistSecurityInfo=False;InitialCatalog=exam;DataSource=IBMR60EWXG”CommandType=”1-adCmdText”RecordSource=”select*fromstudent”运行情况：输入准考证号为“370501010001”,身份证号为“1”,运行界面如下所示：代码如下：PrivateSubcmdExit_Click()EndEndSubPrivateSubcmdOK_Click()Adodc1.RecordSource=select*fromstudentwherestudentcode='+txtStudentCode.Text+'andidcard='+txtIDCard.Text+'Adodc1.RefreshIfAdodc1.Recordset.RecordCount0ThenMe.HidefrmMain.ShowElseMsgBox请确认准考证号或身份证号是否正确！,vbInformation,系统提示EndIfEndSub