VB password system, how to make VB passwords

You're quite right

cyjpath + "\"If it exists, if it doesn't exist, create it and initialize it.

Verbose **:p rivate sub form load()dim password

dim aa = "12345678"

password_filename = cyjpath + "\"

if dir(password_filename) = "" then

open password_filename for output as #1 len = 8

print #1, a

close #

end if

end sub

It's not that the project is locked. It's the need to log in to the password after the program runs.,It should be in the database.,You see if there's anything in the database with the project.,Put the name of the user's password in the table should be easy to find.。。。

Required Controls text1 command1 control array (put a button first, then copy and paste, you will be prompted to create an array of controls, select "Yes".) Then copy. A total of nine are copied.

plus the principle of a total of ten buttons). The names are command1(0)--command1(9). This corresponds exactly to the number 0---9.

Copy the following**.

private sub command1_click(index as integer)

str(index)

end sub

private sub form_load()= ""

for i = 0 to 9

command1(i).caption = inext i

end sub

The easiest way to do this is to create nine keys and a textbox by adding the following ** to the key "1", and the other keys are similar.

private sub command1_click()&"1"

end sub

To create an array of button widgets, add a button, select the button, copy it, and paste it until you have 9 buttons. The following ** can meet your requirements::

dim str as string'Create a global variable to store the numbers to be displayed in the text box, because if you put it in a button click event, each STR click will be reinitialized, and only one number will be stored.

private sub command1_click(index as integer)

str = str + cstr(index + 1)'The index number of the button clicked is converted into a string format after adding 1, and combined with the string generated by the previous click, the reason for adding 1 is that the index of the button starts from 0.

str'Display the string in a text box.

end sub

'Add 2 text boxes to the startup window and a button on Private Sub Command1 click()if="Username" then

if = "Password" then

msgbox"Login successful",,"Tips"

elsemsgbox"Wrong password",,"!"

end if

elsemsgbox"The username is incorrect",,"!"

end if

Let's do a simple one, build text1, text2, command1 and add form2 forms. In command1, enter if"Username" and "Password" then

elsemsgbox"You can't use this software! "

end if

It should be a form too, right??

However, in the project, set it to run first, and then decide whether to create and run other forms according to the results obtained?

Can you tell me your email address, **too many to write here.

I don't know how to get this, the BIOS provides this function, you can use the BIOS, that is limited, after booting, you must enter the password to let Windows start, otherwise you can't enter Windows.

Similar to the hang-up lock, and then change to boot it up It's relatively simple

For details, please refer to the built-in login password setter.

In the textbox attribute passwordchar, set the value to *

pword = 0

msgbox "The password is correct, continue! "

Change to pword=""

After being correct once pword=0

The correct password for the second time becomes 0lading

That's why the password is wrong.

pword = 0 =>pword = ""

msgbox "The password is correct, continue! "

counter = 0

Let's see if you can.

Landlord, I want to say the following. First, if you want to get the system password of Windows, it is not realistic, maybe you have to crack Microsoft's encryption method. Maybe you can run the program and make a keylogger before the user logs in to the system, as you did with Kill Soft.

Second, maybe the landlord can bypass the password, remember my friend Dengdeng wrote, you can refer to his program. Three, as for the winsock control for the communication program, your program should not be used. Over, good luck to the landlord!