Vb prekid programa da,ne

Vb prekid programa da,ne 22.03.2008. u 11:18 · pre 226 meseci #1

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:")

Re: Vb prekid programa da,ne 22.03.2008. u 12:02 · pre 226 meseci #2

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

Re: Vb prekid programa da,ne 22.03.2008. u 15:55 · pre 226 meseci #3

hvala aco

Re: Vb prekid programa da,ne 25.03.2008. u 13:10 · pre 226 meseci #4

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 ??

Re: Vb prekid programa da,ne 25.03.2008. u 13:31 · pre 226 meseci #5

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

Re: Vb prekid programa da,ne 25.03.2008. u 13:38 · pre 226 meseci #6

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...

Re: Vb prekid programa da,ne 25.03.2008. u 13:43 · pre 226 meseci #7

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

Re: Vb prekid programa da,ne 25.03.2008. u 13:48 · pre 226 meseci #8

run-time error 13

type mismatch

Re: Vb prekid programa da,ne 25.03.2008. u 13:52 · pre 226 meseci #9

na vrhu izmeni ovo u Public broj as Integer

Re: Vb prekid programa da,ne 25.03.2008. u 14:11 · pre 226 meseci #10

da, hvala

kako taj broj dodati pokraj ispisa poruka

znaci da ispise; 'broj' puta

Re: Vb prekid programa da,ne 25.03.2008. u 14:18 · pre 226 meseci #11

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

Re: Vb prekid programa da,ne 25.03.2008. u 14:27 · pre 226 meseci #12

zahvaljujem!

Re: Vb prekid programa da,ne 25.03.2008. u 14:46 · pre 226 meseci #13

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

Potpis

rafforum.rs - Forum Računarskog Fakulteta

Re: Vb prekid programa da,ne 25.03.2008. u 15:01 · pre 226 meseci #14

ok, no opet problem u zadnjem codu

compile error
expected: end of statement

i plavom označena dvojka;

..poruka 2 As String

Re: Vb prekid programa da,ne 25.03.2008. u 15:04 · pre 226 meseci #15

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

Re: Vb prekid programa da,ne 25.03.2008. u 15:25 · pre 226 meseci #16

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

Potpis

Nebojsa Milanovic:
-Trumpa smatram vrhunskim predsednikom i voleo bih da živim u državi na čijem je on čelu
-Rusija ne laže, ne vodi osvajačke ratove
-Trump je svetla tačka u USA blatu
-Elon Musk, možda najpametniji i najtrezveniji Amerikanac

Re: Vb prekid programa da,ne 25.03.2008. u 15:27 · pre 226 meseci #17

ne kontam na sta mislis :)

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

Potpis

rafforum.rs - Forum Računarskog Fakulteta

Re: Vb prekid programa da,ne 26.03.2008. u 08:42 · pre 226 meseci #18

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 ?

Re: Vb prekid programa da,ne 26.03.2008. u 18:16 · pre 226 meseci #19

heh jesam glup krenuo sam da sabiram integer i string

ovo je reshenje

Code:
poruka2 = broj & " puta"

Re: Vb prekid programa da,ne 27.03.2008. u 08:45 · pre 226 meseci #20

da to me zanimalo.

Forum kao aplikacija na telefonu

Srodne teme