NICHOLAS2005 发表于 2007-4-29 01:34:49

VB登陆框

设计两个TEXT文本,2个标签,其标签为用户名和密码
一个确定按钮
用户名和密码都为123
如果当输入正确的时候则显示登陆成功,否则你有3次机会重新输入
每次提示递减信息
最后一次则退出整个程序

如何编写,
请指教

VB初学者,请能人帮助编写下,谢谢

飘云 发表于 2007-4-29 01:49:23

Private Sub Command1_Click()
Static k As Integer

If Text1 = "123" And Text2 = "123" Then
    MsgBox "登录成功!"
Else
    k = k + 1
    If k <> 3 Then
      MsgBox "你还有" & 3 - k & "次机会"
    Else
      End
    End If
End If
   
   
End Sub

NICHOLAS2005 发表于 2007-4-29 02:23:46

Static k As Integer
是什么来的
不是dim k as integer
??????

k = k + 1
    If k <> 3 Then



能简单说说编程的思路么,例如这道题目
我知道很简单的,可是要从什么思路进行思考和编写呢?谢谢
请指教一下

[ 本帖最后由 NICHOLAS2005 于 2007-4-29 05:30 编辑 ]

老顽童 发表于 2007-4-29 12:33:46

'下面代码表示按扭1被单击就执行下面
Private Sub Command1_Click()
'下面声明变量K(整数型)
Static k As Integer
'下面是如果编辑框1的内容=123和编辑框2的内容=123
If Text1 = "123" And Text2 = "123" Then
'下面是弹出提示框,提示内容为登陆成功
    MsgBox "登录成功!"
'别的(如果上面不等于123)就执行下面
Else
'整数变量=整数变量+1   
k = k + 1
'如果K(变量)小于3
    If k < 3 Then
'弹出提示“你还有”加上3-变量(K)加上“次机会”
      MsgBox "你还有" & 3 - k & "次机会"
'别的
    Else
'退出程序
      End
'退出如果
    End If
'退出如果
End If
   
'退出按扭被单击程序集   
End Sub

’你可以把密码和用户名保存到一个文本文件或数据库或注册表等任意位置,然后检测用户名密码是否正确。

'建议你先多看看教程,资料。

'祝你学习愉快,我基本不用VB了,他做的组件控件对其他程序不通用,还是VC好/:12

老顽童 发表于 2007-4-29 12:39:47

这个坛子的速度太慢呀/:L

[ 本帖最后由 老顽童 于 2007-4-29 13:17 编辑 ]
页: [1]
查看完整版本: VB登陆框