Hi,

You can change the caption from the properties of the control or if u want to do it by code then do it only once..
For example:

Datagrid1.Columns(0).Caption = "Surname"...

My suggestion is to use DAO 3.6 Library..it's easier to use than ADO..
Your solution would be like:
------------------------------------------------------
Private Sub CmdSearch_Click()
Dim ws as...

Is it working?

Try the attachment file...
I just write it and it works fine...

You can also try the isnumeric() function at the keypress event...
For example...

Private Sub Text1_KeyPress(KeyAscii As Integer)
If Not IsNumeric(Chr(KeyAscii)) And Not KeyAscii = 8 Then...

There isn't any function in vb6..
You have to learn about the FreeImage Project.
Follow the link below for more info...
http://freeimage.sourceforge.net/index.html

You can print the report directly for example...

private sub cmdshow_click()
DataReport1.PrintReport False, rptRangeAllPages
DataReport1.Hide
end sub...

Check the attachement file..
I hope that it will help you...

Unfortunately in 2D arrays redim is not working..
I recommend you to use two (one-dimensional) arrays one for usernames and the other for passwords.The arrays will be parraller.

You can use the...

You can open your text file using another way instead of data control(which is impossible).

If you want to open the ".txt" file here is an example:...