求一个包括输入用户名和注册码在内的vb注册功能代码

来源：百度知道编辑：UC知道时间：2024/06/03 10:40:01

要有下面的功能：不输入正确的用户名和注册码，软件功能有限制。输入正确的用户名和注册码后，在帮助菜单上显示用户已经注册，并且开放软件所有功能。
这个软件只有一个窗体。输入正确的用户名和注册码之前软件功能有限制是指：不能复制这个软件上边一个文本框（text1）中的文字（事先通过enable=false或gotfocus限制了这个文本框内容的选择），同时，点击“复制”按钮不能复制文本框中的内容。输入正确的用户名和注册码后，可以选择文本框中内容，点击“复制”按钮可以正常复制文本框内容。

Give me a mial, i send the form to u.
Happyq6@163.com

Option Explicit

Public LoginSucceeded As Boolean

Private Sub cmdCancel_Click()
'ÉèÖÃÈ«¾Ö±äÁ¿Îª false
'²»ÌáÊ¾Ê§°ÜµÄµÇÂ¼
LoginSucceeded = False
Me.Hide
End Sub

Private Sub cmdOK_Click()
'¼ì²éÕýÈ·µÄÃÜÂë
If txtPassword = "password" Then
'½«´úÂë·ÅÔÚÕâÀï´«µÝ
'³É¹¦µ½ calling º¯Êý
'ÉèÖÃÈ«¾Ö±äÁ¿Ê±×îÈÝ