填空题

下列程序执行时，要求输入一个密码，如果密码不正确，则显示出非法用户的对话框。请填空。 Const PassWord="12345678" Dim inpass As String inpass= 【5】 ("请输入你的密码"，"输入密码") If inpass=PassWord Then Exit Sub Else 【6】 "对不起!你是非法用户。"，vbOKOnly＋vbCritical，"拒绝" Unload Me End If