I am writing this program for my school project. I am access a database
using the data control. I want the user to type in a word and the program
will display the located word on a label. However I was not able to do
that.Below is a sample of the code I have used. Please Correct the code
if any error is found thank you!!

dim store as string
store = inputbox("enter the word to be searched","Cip Porject")
data1.recordset.findfirst "keyword = 'store'"
label1.caption = data1.recordset.fields("keyword").value

The above code kept displaying a error message
So please help me.
Its urgent!!
Thank you!!!
Please E-mail if possible!!

 on Tue, 3 Sep 1996 08:39:12 +0800,
 Tan Tze Yong <Tan> writes:

Welcome to the world of programmers... this is nothing compared with the
errors you will find when you get more experience.

Fernando.

Okej, I'll give it a try!!

Your code:
        dim store as string
        store = inputbox("enter the word to be searched","Cip Porject")
        data1.recordset.findfirst "keyword = 'store'"
        label1.caption = data1.recordset.fields("keyword").value

my code:
        dim store as string
        store = inputbox("enter the word to be searched","Cip Porject")
        data1.recordset.findfirst "keyword = '" & store & "'"
        if not data1.recordset.nomatch then
                'do this if found
                label1.caption = "" & data1.recordset!keyword
        else
                label1.caption = "Not Found"
        end if

Hope this will help!!! It would be fun to know....

Roger

<snip>

-------------------------------------
Damon

I am glad people were willing to help, but does this teach him/her anything
other than, "Hey, if I run into a problem, I'll just ask people to create
code for me on the Internet!"  This is not intended to flame and I am
unaware of Tan's intention, but I think his/her teacher would not be happy
to know that their students are not trying but just asking for help on the
Internet.  Are we establishing a bad precedent?