用VB可不可以做到QQ的登录框

简单,把数据保存到文件,数据库,注册表都可以.
保存到文件(文本文件)
Private Sub Command1_Click()
'确定按钮
For i = 0 To Combo1.ListCount - 1
If Combo1.Text = Combo1.List(i) Then Exit Sub
Next
Open App.Path & "\suju.dat" For Append As #1
Print #1, Combo1.Text '保存数据
Close #1

End Sub

Private Sub Form_Load()
'读出数据
Open App.Path & "\suju.dat" For Input As #1
Do While Not EOF(1)
Line Input #1, aa
Combo1.AddItem aa
Loop
Combo1.Text = Combo1.List(0)
Close #1
End Sub

别的功能可以自己添加

keyi

当然可以~

这是要和数据库连接起来才可以的
VB只能做到界面