Wat sort of problem u r facing???

try this...
If Not IsNumeric(TextBox1.Text) Then
MessageBox.Show("Please enter Number")
End If

Hi,

I got the solution...
Since username and password are taken as string they cannot be stored in binary format in DAT file...
So i used Input and Output instead of Binary for file to open..

Writing into the file part is
dname = App.Path & "\ADMIN.DAT"
fnum = FreeFile
Open dname For Output Access Write As #fnum
Print #fnum, uname
Print #fnum, pwd
Close #fnum

Reading from the file part is
dname = App.Path & "\ADMIN.DAT"
fnum = FreeFile

Open dname For Input Access Read As #fnum    
        Input #fnum, uname
        Input #fnum,pwd

close #fnum

Hi
Try this..
Goto properties of the form->Icon-Browse and select your icon file location...

Hi selva
using above said procedure we can only view the icons of different forms....
But How to change the icon???

Hi, Iam trying to put username and password in some dat file(ADMIN.DAT)from changeLogin page and getting/retreiving username and password from another page from ADMIN.DAT file....
My problem is username and password details are getting stored in dat file in readable text format NOT IN BINARY..

Writing into file part is
dname = My.DataFile("ADMIN.DAT")
fnum = FreeFile
Open dname For Binary Access Write As #fnum
Put #fnum, , uname
Put #fnum, , pwd

Close #fnum

Reading from file part is
dname = My.DataFile("ADMIN.DAT")
fnum = FreeFile
Open dname For Binary Access Read As #fnum

            Get #fnum, , uname
            Get #fnum, , pwd

Close #fnum

Any suggestions plz...