Exclusively for Visual Basic 6.0 Programmers Only!

[maryzark23]

mga tol patulong naman.
dalawa kasi ung folder na nakalagay dyan.. so kahit alin dyan pwede i edit dahl parehas naman ng code yan...

so tanong ko lang.or pagawa ko na din. pano po ung sa candidate registration pagka nilagay na ung name nung isang candidate tapos position, pagka save dapat magsasave sya,,then pagka magvote ulit dapat pagka click ng student number nya.. hindi na pwede dahl nagamit na ung name na yun..dapat hindi masave...

text me: 09053116605
Skype: KarlosCruz23
YM: [email protected]

thanks po papatulong sana ko



PS: pagka pala nirun yan hihingan kayo ng username at password eto po ung
Username: Pokwang
Password: Angel32

 

[marknamalata]

ayos tong thread nto,,patambay po dito..

 

[romzky123]

pa help po mga sir!

topic: passing of value from module to form

halimbawa po ang form1 ay may
dim temp as string
dim x as integer

den may procedure sya na
call processData(temp,x)

tapos sa module nya

public sub processData(str as string, y as integer)
form1.text1="blah blah blah"
' pano ko malalagyan ng value ung temp?
' kung halimbawa ang gusto kong mangyare ay
' temp=str & " at " & str
end sub

ang tanong ko po, pano ko mababalik sa form ang value na mapaprocess sa module?

 

[glaiza14344]

pwede po ba din akong mag post dito???may vb kasi akong subjejet ngayon...

 

[knives645]

pwede po ba din akong mag post dito???may vb kasi akong subjejet ngayon...

Pwede po yan ate..

 

[edwincuerdo]

mga bossing, pano kaya i-call sa VB if MySQL ang backend? ..thanks

 

[knives645]

mga bossing, pano kaya i-call sa VB if MySQL ang backend? ..thanks

Connection Strings ba kamo?
http://www.connectionstrings.com/mysql

 

[knowmeifyou]

mga bossing, pano kaya i-call sa VB if MySQL ang backend? ..thanks

check my signature

 

[soul213]

Gud P.M po, ask po sana about VB 6, ano po possible error kapag "TYPE MISMATCH" pag nag click ako sa MSFlexGrid?

 

[soul213]

EDIT: Double post, sorry T.T

 

[decentmoonlight]

baka meron kayong tutorial about modules. thanks po! dami ko pang gustong malaman dito.

 

[knives645]

Gud P.M po, ask po sana about VB 6, ano po possible error kapag "TYPE MISMATCH" pag nag click ako sa MSFlexGrid?

Baka blank or null yan.
Mas maganda siguro of Screen Shot ng code ang i-attach mo kapag
nag-click ka sa debug.

 

[migssy]

mga kua .may vb6 ebook po ba kayo . pa share naman po.
newbie lang ako

 

[daveee143]

mga tsong patulong nmn kasi d ko magitna yung mga to eh

naka auto resize na po yung window kaso yung mga txt box at button hinde T_t

 

[knowmeifyou]

Gud P.M po, ask po sana about VB 6, ano po possible error kapag "TYPE MISMATCH" pag nag click ako sa MSFlexGrid?

inayos kona yan ah, tsk tsk. wait at gagawan kita ng video paano ko inayos yan

paki tignan ung link http://www.youtube.com/watch?v=7LEtpO_1S84&feature=youtu.be

 

[knowmeifyou]

mga tsong patulong nmn kasi d ko magitna yung mga to eh

naka auto resize na po yung window kaso yung mga txt box at button hinde T_t

http://www.youtube.com/watch?v=y6vlN9pBeF4

 

[soul213]

Isang malaking salamat kay sir "knowmeifyou" hulog ka ng langit

 

[decentmoonlight]

help please. i have a problem. dun sa 4 na combo box may 4 na word each combo box pero the same lang. every combo box pag pinili mo yung let's say the word ONE for the first combo box hindi na dapat lalabas yung word na ONE sa pangalawang combo box. dapat TWO THREE FOUR na lang. tapos pag pinili mo yung word na TWO dun sa pangalawang combo box dapat hindi na sya mag appear sa 3rd and 4th combo box. pag pinili mo na sya, hindi mo na mapipili sa ibang combo box. makes sense? sorry kung medyo magulo yung paliwanag ko. eto nga po pala yung code ko. lahat ng combo box may 4 na word of the same.

dim objrs as recordset
dim strsql as stng

strsql = "select * from tblWord"
vbsopentable objrs, strsql

if objrs.recordcount > 0 then
objrs.movefirst
do while not objrs.eof
doevents
for x = 0 to 3
combobox(x).additem ojbjrs!strName & space(100) & objrs!strPosition
next
objrs.movenext
loop
end if
ojbrs.close

 

[macutz]

panu po mag disable/enable ng textbox sa runtime gamit ang text value sa combo box?
(noobish question)

 

[knives645]

help please. i have a problem. dun sa 4 na combo box may 4 na word each combo box pero the same lang. every combo box pag pinili mo yung let's say the word ONE for the first combo box hindi na dapat lalabas yung word na ONE sa pangalawang combo box. dapat TWO THREE FOUR na lang. tapos pag pinili mo yung word na TWO dun sa pangalawang combo box dapat hindi na sya mag appear sa 3rd and 4th combo box. pag pinili mo na sya, hindi mo na mapipili sa ibang combo box. makes sense? sorry kung medyo magulo yung paliwanag ko. eto nga po pala yung code ko. lahat ng combo box may 4 na word of the same.

dim objrs as recordset
dim strsql as stng

strsql = "select * from tblWord"
vbsopentable objrs, strsql

if objrs.recordcount > 0 then
objrs.movefirst
do while not objrs.eof
doevents
for x = 0 to 3
combobox(x).additem ojbjrs!strName & space(100) & objrs!strPosition
next
objrs.movenext
loop
end if
ojbrs.close

Filter ba ang gusto mong gawin? posible, pero matrabaho yan...
Heto ang ginawa ko, habang nag-iisip nang susunod kong gagawin dito sa project ko..
Isang Form, naglagay ako nang 4 combo box
then paste this code and run it...
Intindihin mo na lang muna, hehe, pag may tanong ka, sagutin ko na lang...
Basta, RemoveItem ang gagamitin mo para tanggalin ang data sa ComboBox.
Index ang reference mo every combos..

Option Explicit

Private Sub Combo1_Click()
Combo2.RemoveItem Combo1.ListIndex
Combo3.RemoveItem Combo1.ListIndex
Combo4.RemoveItem Combo1.ListIndex
Combo1.Locked = True
End Sub

Private Sub Combo2_Click()
Combo3.RemoveItem Combo2.ListIndex
Combo4.RemoveItem Combo2.ListIndex
Combo2.Locked = True

End Sub

Private Sub Combo3_Click()
Combo4.RemoveItem Combo3.ListIndex
Combo3.Locked = True
End Sub

Private Sub Form_Load()
Dim strName(3) As String
Dim cnt As Integer

strName(0) = "One"
strName(1) = "Two"
strName(2) = "Three"
strName(3) = "Four"

For cnt = 0 To 3
Combo1.AddItem strName(cnt), cnt
Combo2.AddItem strName(cnt), cnt
Combo3.AddItem strName(cnt), cnt
Combo4.AddItem strName(cnt), cnt
Next cnt


End Sub