[es] - Vb prekid programa da,ne

Alenko V6
Hr

Član broj: 63048
Poruke: 58
*.adsl.net.t-com.hr.

Profil

^{22.03.2008. u 10:18 - pre 196 meseci}

dakle jednostavno pitanje, ne kuzim onu komandu Goto,
tj. kako se vraca program na pocetak odnosno izlazi i programa, npr;

Code:

Dim izlaz As Integer

izlaz = MsgBox("stop", vbQuestion + vbYesNo, "Program")
If izlaz = vbNo Then
           'ne
End If
If izlaz = vbYes Then

            'da
            End If

dakle ako ne, kamo onda, tj. ja bi na pocetak programa ?

recimo pocetak je ovakav;

Code:

Private Sub Form_Load()
Dim q

InputBox("Ime:")

_{[Ovu poruku je menjao Aleksandar Ružičić dana 22.03.2008. u 17:35 GMT+1]}

Odgovor na temu

Aleksandar Vasic
Web Administrator, Uspon d.o.o
Čačak

Član broj: 91692
Poruke: 1226
*.eunet.yu.

Sajt: www.vasictech.net

+1 Profil

Re: Vb prekid programa da,ne

^{22.03.2008. u 11:02 - pre 196 meseci}

GoTo nije fensi ;)

Code:

Private Sub Command1_Click()
Dim izlaz As Integer
izlaz = MsgBox("zaustavi", vbQuestion & vbYesNo, "Program")
If izlaz = vbNo Then
'kod za ne
Call Form_Load
End If
If izlaz = vbYes Then
'kod za da
End If
End Sub

Private Sub Form_Load()
Dim q
InputBox ("Ime:")
End Sub

Odgovor na temu

Alenko V6
Hr

Član broj: 63048
Poruke: 58
193.19.223.*

Profil

Re: Vb prekid programa da,ne

^{22.03.2008. u 14:55 - pre 196 meseci}

hvala aco

Odgovor na temu

Alenko V6
Hr

Član broj: 63048
Poruke: 58
*.adsl.net.t-com.hr.

Profil

Re: Vb prekid programa da,ne

^{25.03.2008. u 12:10 - pre 195 meseci}

sada je ovdje zapelo

Private Sub Form_start()
Dim broj As Long
broj = 1

MsgBox "brojac"
Call Form_Load

End Sub

Private Sub Form_Load()

Dim poruka, title, podatak As String
poruka = "Redni broj"

podatak = InputBox(poruka, title)
broj = broj + 1
MsgBox broj
Call Form_Load
End Sub

zasto je broj uvijek 1 a ne +1 ??

Odgovor na temu

Aleksandar Vasic
Web Administrator, Uspon d.o.o
Čačak

Član broj: 91692
Poruke: 1226
*.eunet.yu.

Sajt: www.vasictech.net

+1 Profil

Re: Vb prekid programa da,ne

^{25.03.2008. u 12:31 - pre 195 meseci}

najbolje bi bilo kad bi objasnio sta ti zelis da napravish,ovako ti ne mogu pomoci...

Odgovor na temu

Alenko V6
Hr

Član broj: 63048
Poruke: 58
*.adsl.net.t-com.hr.

Profil

Re: Vb prekid programa da,ne

^{25.03.2008. u 12:38 - pre 195 meseci}

pa, htio bi da zbraja, tj. da broj bude onoliki koliko sam puta upisivao nešto
znaci prvi puta, 1
drugi puta da u msgbox-u napise 2
itd...

Odgovor na temu

Aleksandar Vasic
Web Administrator, Uspon d.o.o
Čačak

Član broj: 91692
Poruke: 1226
*.eunet.yu.

Sajt: www.vasictech.net

+1 Profil

Re: Vb prekid programa da,ne

^{25.03.2008. u 12:43 - pre 195 meseci}

Code:
Public broj as String
Private Sub Form_Load()
MsgBox "brojac"
Call Komanda
End Sub

Public Sub Komanda()
Dim poruka as String,podatak as String,title as String
poruka = "Redni broj"
podatak = InputBox(poruka, title)
broj = broj + 1
MsgBox broj
Call Form_Load
End Sub

probaj ovako,ako sam dobro shvatio

Odgovor na temu

Alenko V6
Hr

Član broj: 63048
Poruke: 58
*.adsl.net.t-com.hr.

Profil

Re: Vb prekid programa da,ne

^{25.03.2008. u 12:48 - pre 195 meseci}

run-time error 13

type mismatch

Odgovor na temu

Aleksandar Vasic
Web Administrator, Uspon d.o.o
Čačak

Član broj: 91692
Poruke: 1226
*.eunet.yu.

Sajt: www.vasictech.net

+1 Profil

Re: Vb prekid programa da,ne

^{25.03.2008. u 12:52 - pre 195 meseci}

na vrhu izmeni ovo u Public broj as Integer

Odgovor na temu

Alenko V6
Hr

Član broj: 63048
Poruke: 58
*.adsl.net.t-com.hr.

Profil

Re: Vb prekid programa da,ne

^{25.03.2008. u 13:11 - pre 195 meseci}

da, hvala

kako taj broj dodati pokraj ispisa poruka

znaci da ispise; 'broj' puta

Odgovor na temu

Aleksandar Vasic
Web Administrator, Uspon d.o.o
Čačak

Član broj: 91692
Poruke: 1226
*.eunet.yu.

Sajt: www.vasictech.net

+1 Profil

Re: Vb prekid programa da,ne

^{25.03.2008. u 13:18 - pre 195 meseci}

Code:
Public broj as Integer
Private Sub Form_Load()
MsgBox "brojac"
Call Komanda
End Sub

Public Sub Komanda()
Dim poruka as String,podatak as String,title as String,poruka 2 as String
poruka = "Redni broj"
podatak = InputBox(poruka, title)
broj = broj + 1
poruka2 = broj + " puta"
MsgBox poruka2
Call Form_Load
End Sub

Odgovor na temu

Alenko V6
Hr

Član broj: 63048
Poruke: 58
*.adsl.net.t-com.hr.

Profil

Re: Vb prekid programa da,ne

^{25.03.2008. u 13:27 - pre 195 meseci}

zahvaljujem!

Odgovor na temu

Aleksandar Ružičić
Software Architect, Appricot d.o.o.
Beograd

Član broj: 26939
Poruke: 2881

Jabber: krckoorascic@gmail.com
Sajt: krcko.net

+44 Profil

Re: Vb prekid programa da,ne

^{25.03.2008. u 13:46 - pre 195 meseci}

@Alenko V6: kada postujes kod koristi [code] tagove

_{[Ovu poruku je menjao Aleksandar Ružičić dana 25.03.2008. u 15:33 GMT+1]}

rafforum.rs - Forum Računarskog Fakulteta

Odgovor na temu

Alenko V6
Hr

Član broj: 63048
Poruke: 58
*.adsl.net.t-com.hr.

Profil

Re: Vb prekid programa da,ne

^{25.03.2008. u 14:01 - pre 195 meseci}

ok, no opet problem u zadnjem codu

compile error
expected: end of statement

i plavom označena dvojka;

..poruka 2 As String

Odgovor na temu

Aleksandar Vasic
Web Administrator, Uspon d.o.o
Čačak

Član broj: 91692
Poruke: 1226
*.eunet.yu.

Sajt: www.vasictech.net

+1 Profil

Re: Vb prekid programa da,ne

^{25.03.2008. u 14:04 - pre 195 meseci}

jbg pogledaj malo,greshka je ocigledna

Code:
Public broj as Integer
Private Sub Form_Load()
MsgBox "brojac"
Call Komanda
End Sub

Public Sub Komanda()
Dim poruka as String,podatak as String,title as String,poruka2 as String
poruka = "Redni broj"
podatak = InputBox(poruka, title)
broj = broj + 1
poruka2 = broj + " puta"
MsgBox poruka2
Call Form_Load
End Sub

Odgovor na temu

Shadowed
Vojvodina

Član broj: 649
Poruke: 12851

+4784 Profil

Re: Vb prekid programa da,ne

^{25.03.2008. u 14:25 - pre 195 meseci}

@Aleksandar Ruzicic, kad objasnjavas kroiscenje [code] tagova, nemoj ubijati formatiranje strane

Nebojsa Milanovic: Što se tiče Trumpa, smatram ga vrhunskim predsednikom i voleo bih da živim u državi na čijem je on čelu.
Nebojsa Milanovic: Rusija ne laže, ne vodi osvajačke ratove
Nebojsa Milanovic: Trump je svetla tačka u USA blatu.

Odgovor na temu

Aleksandar Ružičić
Software Architect, Appricot d.o.o.
Beograd

Član broj: 26939
Poruke: 2881

Jabber: krckoorascic@gmail.com
Sajt: krcko.net

+44 Profil

Re: Vb prekid programa da,ne

^{25.03.2008. u 14:27 - pre 195 meseci}

ne kontam na sta mislis :)

edit: sad sam sredio, samo ostajem pri tome da je es-ov bbcode parser krajnje jadno uradjen :)

rafforum.rs - Forum Računarskog Fakulteta

Odgovor na temu

Alenko V6
Hr

Član broj: 63048
Poruke: 58
*.adsl.net.t-com.hr.

Profil

Re: Vb prekid programa da,ne

^{26.03.2008. u 07:42 - pre 195 meseci}

da vidim gore problem da je space visak, ali
ne prihvaca ono msgbx poruka + " puta"

run time error 13
type mismatch

stavio sam jos jedan string puta
i napravio ovako
msgbox poruka + puta

iako mi nije jasno zašto u prvom slucaju ne radi ?

Odgovor na temu

Aleksandar Vasic
Web Administrator, Uspon d.o.o
Čačak

Član broj: 91692
Poruke: 1226
*.eunet.yu.

Sajt: www.vasictech.net

+1 Profil

Re: Vb prekid programa da,ne

^{26.03.2008. u 17:16 - pre 195 meseci}

heh jesam glup krenuo sam da sabiram integer i string

ovo je reshenje

Code:
poruka2 = broj & " puta"

Odgovor na temu

Alenko V6
Hr

Član broj: 63048
Poruke: 58
*.adsl.net.t-com.hr.

Profil

Re: Vb prekid programa da,ne

^{27.03.2008. u 07:45 - pre 195 meseci}

da to me zanimalo.

Odgovor na temu