Symbianize Forum

Most of our features and services are available only to members, so we encourage you to login or register a new account. Registration is free, fast and simple. You only need to provide a valid email. Being a member you'll gain access to all member forums and features, post a message to ask question or provide answer, and share or find resources related to mobile phones, tablets, computers, game consoles, and multimedia.

All that and more, so what are you waiting for, click the register button and join us now! Ito ang website na ginawa ng pinoy para sa pinoy!

Exclusively for Visual Basic 6.0 Programmers Only!

Bagong account; dating tambay. Hehe.

Dami naman nang nagpapagawa ng programs, di na yung tipong nagpapatulong sa ginagawa nila. LoL.

Happy coding everyone! :salute:
 
mga ate at kuya patulong kung anu ang code sa pag gawa ng simple calculator . yung parang 3 text lang po at 5 command lang po ginawa ko +,-,*,/, at clear paanu po ang code nun ?

Meron pong sample niyan sa vb6.us. [LINK]

Study, then develop your own. :thumbsup:
Happy coding! :salute:

Mga sir patulong po

I really hate strings and characters pano po ba to:

An application that accepts a title and reformats it by replacing in capital letter only the FIRST character of EACH word.

You could look at String Functions on vb6.us.

Siguro possible algorithm niyan, split mo yung buong string into words by locating and then using whitespace (" ") as the separators. After separating them into words, get into each of the first characters of each word and transform them into UPPERCASE. Finally, put them all back together to resemble the initial input.

Happy coding! :salute:

meron pa po ba kayo alam na different type ng pag connect ng ADODB? diba codes po? pero meron po ba kayo mas maganda at marami pa alam, naintindihan ko yung logic pero di ako maka Flow sa program.. kasi dami ako nakikita ibat iba yung type ng pag coconect nila ng adodb.. di ko alam kung ano ang mas MAGANDA pa help naman po... ADODB CONNECTION po..

Maybe you could try looking at one of my old posts.
[Link to Post]

mga boss pede pahelp sa code ng enrolment system.....
thesis lng po.......pls help..:praise:

Ano po database na gagamitin niyo?
May mga pwedeng makatulong dito...madalas po tinutulungan yung mga gumagawa din talaga. :thumbsup:

Try coding for yourself. It's fun!
Happy coding! :salute:
 
me.picture1.picture=loadpicture(!picture path) - take note field ito ah

ok po..tnx sir bale qng CustomerPic ung name ng field q
me.picture1.picture=loadpicture(!CustomerPic)
tama po ba? or qng wala cya s with function bale:
me.picture1.picture=loadpicture(rstCustomers.Fields("CustomerPic"))

try q po maya maya pero boss in your opinion mas mganda b tlga s database tlga isave ung pic kesa ung path nlang isasave q s db kxe access databse q mbgal n ga bumukas ung vb dhil s dmi ng data tpos llgyan q p ng pic and mas mahaba p ung code meron png .stream tpos .read compared qng s path lng qqnin mas nddlian aq s code..ung record q lng nman cguro aabot ng mga 500-1000 customers with 1 picture each kya nb ng access un? or qng path ggmitin q papano q mafifilter n s specific folder lang magbubukas ung showopen dialog box?.puede ren b gmitin 2 dialog box pti image control pra magpapalit ng wallpaper ng form s run time? laking tulong tlga ng forum na2 thanks po tlga sainyu lhat..im confident n mttpos q 2ng thesis q.:help::clap:
 
ok po..tnx sir bale qng CustomerPic ung name ng field q
me.picture1.picture=loadpicture(!CustomerPic)
tama po ba? or qng wala cya s with function bale:
me.picture1.picture=loadpicture(rstCustomers.Fields("CustomerPic"))

try q po maya maya pero boss in your opinion mas mganda b tlga s database tlga isave ung pic kesa ung path nlang isasave q s db kxe access databse q mbgal n ga bumukas ung vb dhil s dmi ng data tpos llgyan q p ng pic and mas mahaba p ung code meron png .stream tpos .read compared qng s path lng qqnin mas nddlian aq s code..ung record q lng nman cguro aabot ng mga 500-1000 customers with 1 picture each kya nb ng access un? or qng path ggmitin q papano q mafifilter n s specific folder lang magbubukas ung showopen dialog box?.puede ren b gmitin 2 dialog box pti image control pra magpapalit ng wallpaper ng form s run time? laking tulong tlga ng forum na2 thanks po tlga sainyu lhat..im confident n mttpos q 2ng thesis q.:help::clap:

Yheap, tama yan bro... Sa aking opinyon kung mas maganda pag'isasave na lang yung pic sa db kesa yung path. Sa akin, same lang sila bro, pero nakadepende sa paggagamitan ko.
Siguro mas ok sa akin, yung path lang images kung ipapass lang yan sa skul like thesis or assignment, para hindi masyadong mabigat nga sa databse....

Pero kung ibebenta ko yan, mas ok yan sa akin yung mismong pic na ang isasave sa db. Why?, kasi kelangan user friendly yan. Yung hindi tipong pagnamove na yung mga pic sa ibang folder ay kelangan iupdate ulit sa db.. Yan kasi ay parang bug na din yan, pagnamove yung mga pic ay kelangan mo din iupdate sa db. Dapat sa paggawa mo, nakabaling ka din sa aspetong ganyan kung path ang gagamitin mong isasave....

Sana nagets mo bro.
Thanks,
 
mga ka sb,. pa help po ako bagohan lang po sa vb6,. ito po quiz namin hindi ko po kasi maitama codes ko i simple lang po,.
attach ko po picture,. bali pagka click sana ng DISPLAY button lalabas sa mga label:
label7 yung sa unang light blue yung sa Text1 at Text2
Label8 yung pangalawang light blue yung sa Text3
Label9 yung sa pangatlo na light blue yung Text4,Text5,Text6

hindi ko po kasi mapagana ie,. TIA po sa tutulong

20120714155314.png
 

Attachments

  • 2012-07-14_155314.png
    2012-07-14_155314.png
    7.3 KB · Views: 1
Last edited:
Yheap, tama yan bro... Sa aking opinyon kung mas maganda pag'isasave na lang yung pic sa db kesa yung path. Sa akin, same lang sila bro, pero nakadepende sa paggagamitan ko.
Siguro mas ok sa akin, yung path lang images kung ipapass lang yan sa skul like thesis or assignment, para hindi masyadong mabigat nga sa databse....

Pero kung ibebenta ko yan, mas ok yan sa akin yung mismong pic na ang isasave sa db. Why?, kasi kelangan user friendly yan. Yung hindi tipong pagnamove na yung mga pic sa ibang folder ay kelangan iupdate ulit sa db.. Yan kasi ay parang bug na din yan, pagnamove yung mga pic ay kelangan mo din iupdate sa db. Dapat sa paggawa mo, nakabaling ka din sa aspetong ganyan kung path ang gagamitin mong isasave....

Sana nagets mo bro.
Thanks,

ayos..oo nga,nagets q tol..s thesis q ipapasa pero tingin q khit theisis kelangan nmen ipakita ung marketability nung system bka nga itanong s defense ung tungkol s pictures qng papano magiging portable ung system...bka nga s db q nlang isave..plan q sana ung path lng isave ngawa qna kxo nhirapan aq ayusin ung Initdir property ng open dialogbox pra irestrict ung folder n pagkukuhanan ng picture s folder lng qng nsan den ung access database q..mas mganda nga pag s db nasave wala naq problem khet saang directory kumuha ng file ok lng pag nilipat ung db nandun pren un mga pic..
thanks s advice. pero bat svi nung iba hindi nbbwasan ung size ng database khit may dinelete k pic?palaki lng ng palaki?pano ung sinasvi n blob kpag s db k ngsave ng pic?may code daw pra hindi lumaki ng lumaki ung file khit ngdelete kna ng pic?mdb format ng db q hindi accdb...malaki daw difference ng mdb s accdb qng papano iniistore ung ole objects..pano ung code pra mging compact ung db?
 
mga ka sb,. pa help po ako bagohan lang po sa vb6,. ito po quiz namin hindi ko po kasi maitama codes ko i simple lang po,.
attach ko po picture,. bali pagka click sana ng DISPLAY button lalabas sa mga label:
label7 yung sa unang light blue yung sa Text1 at Text2
Label8 yung pangalawang light blue yung sa Text3
Label9 yung sa pangatlo na light blue yung Text4,Text5,Text6

hindi ko po kasi mapagana ie,. TIA po sa tutulong

20120714155314.png

Try mo yang code bro, Payo ko lang sayo, Try hard lang bro, Mas magandang kung ikaw mismo ang nakasolve sa problema mo. Sigurong pagtatawanan mo ang sarili mo pag'matapos mo yan, hehe..HAPPY CODING BRO!!!

Code:
Private Sub Command1_Click()
Label7.Caption = Text1.Text + Text2.Text
Label8.Caption = Text3.Text
label9.Caption = text4.text + text5.text + text6.text
End Sub
 
ayos..oo nga,nagets q tol..s thesis q ipapasa pero tingin q khit theisis kelangan nmen ipakita ung marketability nung system bka nga itanong s defense ung tungkol s pictures qng papano magiging portable ung system...bka nga s db q nlang isave..plan q sana ung path lng isave ngawa qna kxo nhirapan aq ayusin ung Initdir property ng open dialogbox pra irestrict ung folder n pagkukuhanan ng picture s folder lng qng nsan den ung access database q..mas mganda nga pag s db nasave wala naq problem khet saang directory kumuha ng file ok lng pag nilipat ung db nandun pren un mga pic..
thanks s advice. pero bat svi nung iba hindi nbbwasan ung size ng database khit may dinelete k pic?palaki lng ng palaki?pano ung sinasvi n blob kpag s db k ngsave ng pic?may code daw pra hindi lumaki ng lumaki ung file khit ngdelete kna ng pic?mdb format ng db q hindi accdb...malaki daw difference ng mdb s accdb qng papano iniistore ung ole objects..pano ung code pra mging compact ung db?

Yun nga pala bro, ang ihahabol ko sa post ko kanina, Hindi talaga advisable ang path ang isasave, kasi pagmagdefense kayo. I'm sure na, tatanungin yan na situation na yan..Kayo din ang mahihirapan. hehe, Sensya!!!>

ahmf, yun din ang gusto kung matutunan bro, hindi ko din kasi makuhang mabawasan yung size ng db kahit nagdelete na ako. Tanung2x kana lang sa mga master natin dito..Makakatulong din yun sa akin.
 
Try mo yang code bro, Payo ko lang sayo, Try hard lang bro, Mas magandang kung ikaw mismo ang nakasolve sa problema mo. Sigurong pagtatawanan mo ang sarili mo pag'matapos mo yan, hehe..HAPPY CODING BRO!!!

Code:
Private Sub Command1_Click()
Label7.Caption = Text1.Text + Text2.Text
Label8.Caption = Text3.Text
label9.Caption = text4.text + text5.text + text6.text
End Sub

tnx po sa pag reply sir pero hindi din po kasi to nagana ginawa ko na to kanina ito nalabas na error

20120714162720.png


pinagtataka ko po kasi ito nalabas pagka double click ko ng DISPLAY


Private Sub Command1_Click(Index As Integer) ----> nagtataka po ako dito bakit ganito sya kaya pagka run ko may error nalabas

End Sub
 
Last edited:
@leomendoza24, Tingnan mo yung error bro, hindi daw nagmatch yung event, kasi naka'array yung command button mo.. Ulitin mo bro, Delete the 3 command Button. at wag mong iaarray. Post ka dito ulit kung may problema..

Kasi kung array. Ito ang event nya..
Code:
Private Sub Command1_Click(Index As Integer)
Thanks, Happy Coding bro!!!. makukuha mo din yan
 
Last edited:
@leomendoza24, Tingnan mo yung error bro, hindi daw nagmatch yung event, kasi naka'array yung command button mo.. Ulitin mo bro, Delete the 3 command Button. at wag mong iaarray. Post ka dito ulit kung may problema..

Kasi kung array. Ito ang event nya..
Code:
Private Sub Command1_Click(Index As Integer)
Thanks, Happy Coding bro!!!. makukuha mo din yan

tnx po sir ng madami kaya pala,. hehe tanx po talaga ulitin ko po post ko ulit dito kung napagana ko na
 
tnx po sir ng madami kaya pala,. hehe tanx po talaga ulitin ko po post ko ulit dito kung napagana ko na

Ok bro, post ka lang dito or pm me kung may mga tanong ka, basta wag kang gumamit ng array, wag mong icopy paste yun mga button. May tamang paggagamitan ang array,
 
mga boss pano po iset ung paper size s data report? posible b un ang sinusunod lng yta nya ung paper size n nkset s printer..or much better qng crystal report ggmitin? ncucustomized b ung paper size ng ipprint s code mismo?
and ano po ung best app to deploy o gawing setup file ung vb project nten? kxi may mga vb projects esp pag may database n kpag gnwa mo lng .exe kapag nirun mo cya s pc n wlang vb6 mageeror maghhnap ng dll's and ocx's. bigay nman po kau link qng san puede idownload ung best deployment app for vb6...thanks in advance :)
 
mga boss pano po iset ung paper size s data report? posible b un ang sinusunod lng yta nya ung paper size n nkset s printer..or much better qng crystal report ggmitin? ncucustomized b ung paper size ng ipprint s code mismo?
and ano po ung best app to deploy o gawing setup file ung vb project nten? kxi may mga vb projects esp pag may database n kpag gnwa mo lng .exe kapag nirun mo cya s pc n wlang vb6 mageeror maghhnap ng dll's and ocx's. bigay nman po kau link qng san puede idownload ung best deployment app for vb6...thanks in advance :)

gamit ka nalang ng crystal reports dre mas maganda pa
 
patambay po ako..
2nd yr. College po ako at vb6 po ang gamit namin dito..
 
mga sir salamat po napagana ko na,. problem ko na lang po panu ko po malagyan ng space,. anu po ba code para magka space?
 
mga boss patulong po paano po yung VALIDATION ng Letters only from a-z upper and lowercase
with enable space, back space enter and period??? for textbox
 
ok po..tnx sir bale qng CustomerPic ung name ng field q
me.picture1.picture=loadpicture(!CustomerPic)
tama po ba? or qng wala cya s with function bale:
me.picture1.picture=loadpicture(rstCustomers.Fields("CustomerPic"))

try q po maya maya pero boss in your opinion mas mganda b tlga s database tlga isave ung pic kesa ung path nlang isasave q s db kxe access databse q mbgal n ga bumukas ung vb dhil s dmi ng data tpos llgyan q p ng pic and mas mahaba p ung code meron png .stream tpos .read compared qng s path lng qqnin mas nddlian aq s code..ung record q lng nman cguro aabot ng mga 500-1000 customers with 1 picture each kya nb ng access un? or qng path ggmitin q papano q mafifilter n s specific folder lang magbubukas ung showopen dialog box?.puede ren b gmitin 2 dialog box pti image control pra magpapalit ng wallpaper ng form s run time? laking tulong tlga ng forum na2 thanks po tlga sainyu lhat..im confident n mttpos q 2ng thesis q.:help::clap:


http://www.youtube.com/watch?v=dbOAHYljS9M baka makatulong
 
mga boss patulong po paano po yung VALIDATION ng Letters only from a-z upper and lowercase
with enable space, back space enter and period??? for textbox

parang ganyan

Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii >= Asc("0") And KeyAscii <= Asc("9") Then
MsgBox "letters lang"
KeyAscii = 0

End If
End Sub



Private Sub Text2_KeyPress(KeyAscii As Integer)
If KeyAscii >= Asc("a") And KeyAscii <= Asc("z") Then
MsgBox "numbers lang"
KeyAscii = 0

End If
End Sub
 
mga tol possible bang gumawa ng maraming checkboxes s vb pero ung data s access databse n masasave nya s isang field lng? or tlgang kelangan qng lagyan ng bawat field ung table q pra s bawat checkboxes?..let's say for example gagawa aq ng form s vb n tungkol s allergies ng isang tao..istecheck lng ung mga allergies nya(e.g food allergy,drug allergy,etc) tpos masasave un s database..nahihirapan aq pag nilagyan q isa isa ng field ung bawat checkbox sobrang dami ng field/colums q s table..pano b mganda approach d2?tnx
 
Back
Top Bottom