Exclusively for Visual Basic 6.0 Programmers Only!

[bobbyparkz]

pano po ung coding ng CONSONANT? halimbawa po yung output na lalabas ay
C is a consonant
A is not a consonant.
help po pleaseeee?

ung madaling code lang po.

anu b tlga need mo?..
http://www.symbianize.com/showthread.php?t=1061529

 

[lester garcia]

ganito ba need mo?
If msgBox("are you sure you want ot exit?", vbyesno, "confirm") = vbno then cancel = true: exit sub

lagay mo yan sa form_unload event...

salamat po sa tulong boss bobbyparkz!

 

[roxietot]

ung database pla po ang mali ko hehe..

anyway pahelp po ng code sa crsytal report
naka set na ung report, yung code nalang po sa

With CrystalReport1
.ReportFileName = App.Path + "\reports\" + "transaction.rpt"
.Action = 1
End With

ano po ba dapat ang code para makuha yung record sa listview na napili?

 

[bobbyparkz]

ung database pla po ang mali ko hehe..

anyway pahelp po ng code sa crsytal report
naka set na ung report, yung code nalang po sa



ano po ba dapat ang code para makuha yung record sa listview na napili?

gwa k ng temporary tble na identical dun orig table, un ang ibound mo s crystal report mo..
for eg. tblName ung table mo, gwa k ng rpttableName.. as in prehas na parehas yan ng laman dun sa orig mo.. tpos un ang gwin mo target sa crystal report mo,. punta ka lang sa menu ng crystal report>database>set location.. select mo yung bagong table.. then balik ka database menu, click mo verify database.. tapos ang gwin mo pag maggegenerate k n ng report, delete mo ung laman ng rpttableName, tpos insert mo yung dpt lng na makita sa report (w/c is ung sabi mo nga nsa listview lang).. then twagin mo n ung report mo.. un lng ang easiest way.. sna ngets mo.. hehe

anyway.. that's a long way pa..ginanyan ko lng pra maintndihan mo ung concept.. meron png ibng way w/c need further explanations.. hehe., ska ko n turo ung isang way.. w/c is more advanced.. pag ngets mo tong inexplain ko..

 

[pirates2007]

Mga expert pa tulong namn po ako sa code ko may mali kasi
kung alam nyo kung ano ung shortest job first algorithm,

itest nyo pong irun tapos ito po lagay nyo
P1=9
P2=3
P3=4
P4=5
P5=3
P6=1

TAPOS DAPAT PONG MANGYARE SA GANTT CHART NYA GANITO

P6,P2,P5,P3,P4,P1


Pero ang nangyayare ay iba eto po

P6,P5,P2,P3,P4,P1

pa fix namn po

please pa help namn po please

 

[bobbyparkz]

Mga expert pa tulong namn po ako sa code ko may mali kasi
kung alam nyo kung ano ung shortest job first algorithm,

itest nyo pong irun tapos ito po lagay nyo
P1=9
P2=3
P3=4
P4=5
P5=3
P6=1

TAPOS DAPAT PONG MANGYARE SA GANTT CHART NYA GANITO

P6,P2,P5,P3,P4,P1


Pero ang nangyayare ay iba eto po

P6,P5,P2,P3,P4,P1

pa fix namn po

actually, tama nmn ang algorithm mo eh,.. parehas kasing 3 ang value ng P2 and P5 mo, kaya ok lng na nauna nauna ung P5 ksa P2 (shortest job pa rin naman eh).. ang mali mo lang, or should i say kulang is parameters, hindi mo nconsider kung sino sa kanila ang tlgang nauna,. so dapat isama mo yun sa consideration mo.. mlmng s sorting logic mo.. yung mga value lng ang kinukuha mo.. well anyway.. with short job algo.. tma n yang result mo.. unless gusto mo pgsmhn ang short job at fcfs algo...

medyo nsa mood pa ako magcode, kaya sinubukan ko.. sana makatulong sauh to, kaw na lang ang magayos, gawin mo na lang dynamic, pero ung logic andito na.. nilagay ko na lang default values yung inputs mo.. and i also got the result na gusto mo..

Sub ShortestJobFirst()
On Error GoTo err

Dim i As Integer
Dim j As Integer

'sorter
Dim sort(10) As Double
Dim sorttext(10) As String

'swapper
Dim swapNO As Double
Dim swapSTR As String

i = 0

'process array
sorttext(0) = "P1"
sorttext(1) = "P2"
sorttext(2) = "P3"
sorttext(3) = "P4"
sorttext(4) = "P5"
sorttext(5) = "P6"

'value array
sort(0) = 9
sort(1) = 3
sort(2) = 4
sort(3) = 5
sort(4) = 3
sort(5) = 1

'loop logic (shortest job first)
Do While i < 10
j = 0
Do While j < 5
If sort(j) > sort(j + 1) Then
swapNO = sort(j + 1)
swapSTR = sorttext(j + 1)
sort(j + 1) = sort(j)
sorttext(j + 1) = sorttext(j)
sort(j) = swapNO
sorttext(j) = swapSTR
Else
End If
j = j + 1
Loop
i = i + 1
Loop
i = 0

'show arranged order
Dim finalSTR As String
Do While i < 6
finalSTR = finalSTR & vbCrLf & (sorttext(i) & " : " & sort(i))
i = i + 1
Loop

MsgBox finalSTR
Exit Sub
err:
End Sub

 

[Jessiezdc]

Help po Mga Master.. Please
About

Sorting MSHFLEXGRID

yung magso-SORT sya sa Column na gusto ko..
Yung simple code lang sana kung pwede

ex: Mshflexgrid1.sort [Name]

yung gnyang code lang..

More info about problem
http://www.symbianize.com/showthread.php?p=18145563#post18145563

TIA

 

[marlonlaural]

puro zero lumalabas sa database
pa help po

boss,

cguro hindi mo pa nilalagay ng value yung itemdata ng combo box kya puro zero..

sample :

combo1.itemdata(newindex) = 100

 

[marlonlaural]

^example lang po siguro ng mga naka post sir. para mas madaling matutunan ng mga newbie na tulad namin

TAMA....


yung recordset nga hindi pa alam kaya module pa?

 

[teardrop28]

grabe may thread pala ng VB6? mga sir/madam bka po meron kau work dyan nid ko po work gusto ko mging i.t. ulit VB6 lang ang accessible na installer at maaus naituro sa skul nung pnahon ko, C# intro lang at di kme pinagprogram...please khit trainee po at mababa allowance tanggapin ko po basta po magkawork i.t. related gusto ko matupad pangarap ko maging programmer

 

[marlonlaural]

grabe may thread pala ng VB6? mga sir/madam bka po meron kau work dyan nid ko po work gusto ko mging i.t. ulit VB6 lang ang accessible na installer at maaus naituro sa skul nung pnahon ko, C# intro lang at di kme pinagprogram...please khit trainee po at mababa allowance tanggapin ko po basta po magkawork i.t. related gusto ko matupad pangarap ko maging programmer

pre walang mag hire sau na may bayad unless libre....

yung mga mag pagawa ng system cyempre don na sa experience para hindi masakit sa ulo...


kya aral muna :

http://www.vb6.us/guides/vb6-database-guide

 

[marlonlaural]

idols, may problema ako nag upgrade kasi ako ng operating system. nag windows 8 na ako. eh mag iinstall sana ako ng visual basic 6.0. nung iinstall ko na ang sabi "This program has compatibility issues" tinary ko din iconfigure ung.. setting.exe>properties>compatibility tab

panu kaya?

tska ano po kaya mererecommend nyo sa akin
database. gusto ko sana gumamit ng MySQL ung pwede ko mapagpractisan habang wala pa akong work, at the same time parehas ng database cycle sa office?


tska ano po kaya mererecommend nyo sa akin
visualbasic, dati ko kasi gamit is visual basic .net 2010 kung di ako nag kakamali.

enge na din ng dl link. if maroon po kayo?

ate,

bat mag vb6 k pa po kung alam mo na yung vb.net wag k na bumaba...

http://www.microsoft.com/visualstudio/eng/products/visual-studio-2010-express

 

[teardrop28]

pre walang mag hire sau na may bayad unless libre....

yung mga mag pagawa ng system cyempre don na sa experience para hindi masakit sa ulo...


kya aral muna :

http://www.vb6.us/guides/vb6-database-guide

sir nkagawa na po kme dti sa thesis ng hospital system at ako po lead sa inventory system..wala lang po ako professional experience dhil nging data gatherer ako 6 months tpos iba iba ng work pinasukan ko dhil hrap mag apply

 

[marlonlaural]

sir nkagawa na po kme dti sa thesis ng hospital system at ako po lead sa inventory system..wala lang po ako professional experience dhil nging data gatherer ako 6 months tpos iba iba ng work pinasukan ko dhil hrap mag apply

ahh okay kaw ang lead, wala ka sa coding?

so aral ulit.....

tandaan mo....

Everytime you take a break theres someone is practicing to be better.....

 

[teardrop28]

ahh okay kaw ang lead, wala ka sa coding?

so aral ulit.....

tandaan mo....

Everytime you take a break theres someone is practicing to be better.....

lead po ako nung thesis sa pagprog ng inventory system namin sir, kaya ko po ireview at makuha ulit dti kong alam sir, pero sir ang problema ko even before pa di ako makahanap work with VB6 kaya sa ibang work nako napunta sana sir matulungan nyo ako

 

[teardrop28]

pre walang mag hire sau na may bayad unless libre....

yung mga mag pagawa ng system cyempre don na sa experience para hindi masakit sa ulo...


kya aral muna :

http://www.vb6.us/guides/vb6-database-guide

sir nkagawa na po kme dti sa thesis ng hospital system at ako po lead sa inventory system..wala lang po ako professional experience dhil nging data gatherer ako 6 months tpos iba iba ng work pinasukan ko dhil hrap mag apply

 

[a4tech501]

gamit ko po ay mysql

pero hindi q sya magamit pag yung IP address yung nilalagay q..

gusto q kasi iLAN na..so 192.168.0.205 yung nilalagay q imbes na Localhost.. pero eto po yung sinasabi
http://img2.uploadhouse.com/fileuploads/18500/185007690040a44a7549ff010f60d52b0ed74167.jpg

Dapat po edit nyo muna ung privileges ng users. Parang ganito:

Tapos kahit hindi IP address ang gamitin u. Kahit ung computer name na mismo ang gamitin u para wala kang problema kahit naka-DHCP ung computer.

 

[silversaint07]

boss na try mo na ba mag add ng reference para sa excel sa vb? yon ang kulang nyan..

Sir yun nga po yung hinala ko eh... kasi alam ko kelangan ko mg add ng refference na "microsoft excel 11.0 Library" pero nang hinanap ko na yung refference na Microsoft excel 11.0 Library hindi ko makita.. sinubukan kong gamitin yung "Microsoft excel 12.0 Library" Pero same error pa din , tingin ko may kulang sa set-up na ginagamit ko..

tingin nyo Sir. yun kaya yung cause ?


pano ko kaya masusulusyonan toh ?

 

[knives645]

Sir yun nga po yung hinala ko eh... kasi alam ko kelangan ko mg add ng refference na "microsoft excel 11.0 Library" pero nang hinanap ko na yung refference na Microsoft excel 11.0 Library hindi ko makita.. sinubukan kong gamitin yung "Microsoft excel 12.0 Library" Pero same error pa din , tingin ko may kulang sa set-up na ginagamit ko..

tingin nyo Sir. yun kaya yung cause ?


pano ko kaya masusulusyonan toh ?

Use Late Binding....
Search Google...

 

[JajaDina]

easiest way para magawa ko ito? thanks sir.

table 1:
column1 column2 column3
a1 2 piatos
a1 3 cheepee
a1 5 pinoy
a2 10 tattoos
a2 16 jack en jill
a2 5 express way

->What I want is to produce a query like this. How ? thx

column1 column2 column3
a1 2 piatos
3 cheepee
5 pinoy
a2 10 tattoos
16 jack en jill
5 express way