VB 6 fungsi if kok ga bisa pake else ataupun else if??

[blue_light]

saya penasaran dgn error di vb 6 ini

contohnya gini
if text2.text = "" then msgbox "bla bla bla"
command2.enabled = false

else command2.enabled = true
end if

maka bila saya tulis seperti itu akan muncul error warning "else without if

namun bila saya tulis contoh berikut seperti ini
if text2.text = "" then msgbox "bla bla bla"
text2.setfocus
elseif text3.text = "" then msgbox "bla bla bla"
text3.setfocus
end if
end if

akan muncul error warning "end if without block if

kenapa kok bisa kaya gitu ya?
padahal saya ada contoh program lain dan bentuk penulisannya bahkan saya copy paste ke program baru yang saya lagi tulis sekarang,tapi tetap aja seperti itu

[ruboW]

saya penasaran dgn error di vb 6 ini

contohnya gini


akan muncul error warning "end if without block if

kenapa kok bisa kaya gitu ya?
padahal saya ada contoh program lain dan bentuk penulisannya bahkan saya copy paste ke program baru yang saya lagi tulis sekarang,tapi tetap aja seperti itu
wa perbaikin
if text2.text = "" then
msgbox "bla bla bla"
command2.enabled = false
else
command2.enabled = true
end if


namun bila saya tulis contoh berikut seperti ini

if text2.text = "" then
msgbox "bla bla bla"
text2.setfocus
elseif text3.text = "" then
msgbox "bla bla bla"
text3.setfocus
end if


agak rese khan???
harusnya km bikin kayak gini

sub if1()
msgbox "bla bla bla"
command2.enabled = false
end sub

sub if2()
command2.enabled = true
end sub
if text2.text = "" then
if1()
else
if2
end if

if text2.text = "" then
if3()
elseif text3.text = "" then
if4()
else
if5()
end if


bagaimana kl begitu
disini di tunjuk.. setiap bawah tulisan (if) di kick ke sub/fungsi

[second_life]

yep, rubow dah benerin tuh
d vb, blok perintah hrs d tulis pada baris setelah then


if (kondisi) then
{blok statement/perintah}
elseif (kondisi) then
{blok statement/perintah}
else
{blok statement/perintah}
end if

[blue_light]

tapi mengapa di project vb lainnya masalah if else tersebut tidak bermasalah?
thx bantuannya

[second_life]

mungkin pada project lain lu ga menyertakan 1 blok perintah, alias berupa satu baris perintah saja.

cth:

if a = 2 then msgbox "dua nih"
else
msgbox "bukan 2"
end if

klo kyk gini, ga masalah, krn perintah setelah then cuma 1 baris, bukan serombongan
tp klo kyk gini:

if a = 2 then msgbox "dua nih"
text1.enabled = false
else
msgbox "bukan 2"
text1. enabled = true
end if

kagak bakal jln, krn perintah setelah then rombongan
untuk jalanin perintah rombongan, smuany hrs d taro d bawah then

if a = 2 then
msgbox "dua nih"
text1.enabled = false
else
msgbox "bukan 2"
text1. enabled = true
end if


semoga membantu

[ruboW]

itulah sebabnya gw lebih suka ke pascal atau delphi type.. tp apa mau dikata..
semua yg kupake base VB termasuk access yg lagi wa pake sekarang

[Denny Lim]

yup betul tuch ...
kalau u taruh statement code setelah Then
conditional syntax u jadi single line ...

kalo multiple condition yach harus di structure kaya gituw ...
lagi pula nilai pluz u ... code u readable khan?

hindari juga penulisan code-code kaya gado2 ...
nanti u bisa pusing lho ...

[ruboW]

gimana ya?? kita ini lagi buru2..
tau sendiri khan gimana berantakannya skrip

[second_life]

nasehat tmn g, "tiap coding, hrs sambil rapihin. klo ga lu pusing ndiri"
nasehat yg tepat, tp g jg males nurutinny ;D

[Denny Lim]

bukan masalah buru2 sech ...
pengalaman gue ... buru2 tidak akan pernah baik

suatu waktu ... code u harus diganti ... business rules berubah ...
u bisa dead ... malah makan waktu lebih lama ...
soalnya ... Code yang kaya mie itu lo ... ^^

tapi .. klo code rapih .. OOP banget ...
just a moment bro ...

[ruboW]

kaya' mie??
sapa bilang!!

kayak cacing bro!! itu lebih pusing.. berantakan dan pake acara bergerak lage..
belum tahu coding gw ampe 10Kbaris??

[second_life]

wekekek, biasa lah klo mang kerjaanny coding2an, pasti pernah d bikin puyeng sama coding

[Denny Lim]

Kaya Cacing??? bisa beranak-cucu tuw !!!

weleh baru 10k ... waktu gue bikin game ... bisa 50k
langsung pusing gue ... ^^

[ruboW]

10K?? itu aja dah rapi kok!!
hmmm.. good luck aja deh berpusing ria