Help On VB 6.0 DAO language purchase order willing to pay

[melwired`]

---

select case index
'this is for cash
case 0
If text1(0).text <> "cash" then
text1(0).text = "cash"
end if
'this is for cashes
case 1
If text(1).text <> "cashes" then
text(1).text = "cashes"
end if
end select

kini kang computetech murag do.ol 2x nalang ni siya...pero case lang ni di ko mo gamit og case akong gamiton is keypress jud siya...sakto bani feel nako murag sakto man siya....hmmpp

naa moy idea guys himo.on og keypress

[melwired`]

@g0dcode : kahibaw ka mo himo og purchase order......phimo ko beh bayd lang hehe.

[melwired`]

im willing to pay gamay nalang akong kuwang sa p.o and willing ko mo pay....kung tinsa kahibaw ninyo diha..

[melwired`]

just contact me 09173210184 ang purchase order og katong udpate by prepard by and date needed naa nay puros basihanan...pero kailangan lang jud gamay og tweek....sayon nalang kaayo kay naa nay basihanan

[godCode]

just contact me 09173210184 ang purchase order og katong udpate by prepard by and date needed naa nay puros basihanan...pero kailangan lang jud gamay og tweek....sayon nalang kaayo kay naa nay basihanan

patanawa kuno ko sa imong code. basin maka tabang ko.. kay wala ko lingaw...

[nax_developer]

bay..basin matabangan tka ana...very simple ra kaau...

dim sInput as string

[ComputerTech]

kini kang computetech murag do.ol 2x nalang ni siya...pero case lang ni di ko mo gamit og case akong gamiton is keypress jud siya...sakto bani feel nako murag sakto man siya....hmmpp

naa moy idea guys himo.on og keypress

hahaha ka alegre ani oi...hmmm let me fixed this one :
bro kanang <> na sign is of course not equal to hehe

and also bro pls don't compare a keypress to a case kay kanang case as little as i know is and enhance of a if else then statement while keypress is an event referring to a what you have type for example in a textbox simply it is one of a many class property

bro just try my code above unya have the texbox an index like textbox1(0) and textbox1(1) and fire the code on the textbox lost_focus event

i hope this helps naa pay daghan workaround
me also is from UC b4 long time ago kaya medjo rusty na akong vb hehe

[melwired`]

@godcode : pm you already

[melwired`]

tinsa diri maayo jud og vb 6.0 kay i have a problem wth my coding.....hinay man gud ang internet gdz...patabang ta ko....niya asian smmit pajudz...sush...

[melwired`]

dim x as string

x="cash"

private sub txtterms_keypre(keyascii as integer)

if keypress = 13 then
if trim(txtterms.text) = x
MsgBox "cash ni siya",vbinformation
exit sub
end if

ingani siya bah...correctioni beh mga peps ganahan ko kung i input og cash mo dawat siya...puwede bana "if trim(txtterms.txt) = x"

murag di man tingali na puwede

unsaon??thanx mga peps