Trebam pomoc

moze li mi neko objasniti ili poslati neki malo jednostavniji zadatak u Visual Basicu 6,nesto zanimljivo a da je jednostavno da bi znao objaniti.Treba mi do petka,ako neko moze da mi pomogne,Hvala unapred

stigla

???
PA POMAGAJTE
KAKO DA ZAPOCNEM,skoro nista neznam u tom basicu

pa sedi pa uci pa ce da znas

ja sada radim u visual basicu pa mgu kao malo da ti pomognem...
ali, da te pitam jednu malu stvarcicu...da li znas odoka da koristis VB?
Ako znas, ja cu samo da ti govorim sta treba da radis u kodu, a ako ne bice veselo..
vazi?
p.s. daj mi tvoj e-mail da ti posaljem neki program sto sam napravila

anica92:

ja sada radim u visual basicu pa mgu kao malo da ti pomognem...
ali, da te pitam jednu malu stvarcicu...da li znas odoka da koristis VB?
Ako znas, ja cu samo da ti govorim sta treba da radis u kodu, a ako ne bice veselo..
vazi?
p.s. daj mi tvoj e-mail da ti posaljem neki program sto sam napravila

Kliknite za proširenje...

Pa daj i nama link do programa

Mislim postuj ih ovde...

Znam radio sam nestoo ali neznam sam napisati,tj izmisliti kod

Ovo ti je program s kojim sam ja pobedila na regionalnom iz informatike(to ti je malo slozeniji razgranati kod):

Dim A As Integer, B As Integer, C As Integer, M As Byte, N As Byte, B As String, P As Single, S As Single
A = txtPrva.Text
B = txtDruga.Text
C = txtTreca.Text
M = " MOZE "
N = " NE MOZE "
If A < B + C Then
If A > Abs(B - C) Then
If B < A + C Then
If B > Abs(A - C) Then
If C < A + B Then
If C > Abs(A - B) Then
txtKomentar.Text = M
S = A + B + C / 2
P = Sqr(S * (S - A) * (S - B) * (S - C))
B = P * 4
txtBroj.Text = B
Else
txtKomentar.Text = N
End If
Else
txtKOmentar.Text = N
End If
Else
txtKomentar.Text = N
End If
Else
txtKomentar.Text = N
End If
Else
txtKomentar.Text = N
End If
Else
txtKomentar.Text = N
End If

ovo ti je najprostiji linijski kod:

Dim D1 As Single, D2 as single, D As Single
D1 = txtSpoljasnji.Text
D2 = txtUnutrasnji.Text
D = (D1 - D2) /2
txtDebljina.Text = D

ovo ti je postiji ciklicni:
Dim I As Byte, S As Integer
S = 0
For I = 1 To 100
Next I
txtZbir.Text = S

Ono sto treba da znas za unosne jedinice mogu biti:
Byte - one su brojevi od 0 do 225
Integer - to su ti celobrojni
Single - to su ti realni (pozitivni i negativni)
String - to ti je kad imas komentar(ono, da; ne; mozda; ne moze; moze...)

dalje...kada unosiskada imas razgranati itp onda koristi IF; THEN; i ELSE. Znaci ides ovako:

npr.: If A<B<C Then
txtnesto.text = M
Else
txtnesto.text = N
End If
Pod uslovom da su M i N komentari. znaci posle svakog if mora da ide then i na kraju ono else posto mora da postoji slucaj u suprotnom.I kada postavis svako if moras da imas i end if.neto kao ovorene i zatvorene zagrade.
npr: moze da bude ovako (((1-2-3(2*4))))
ali ne moze da bude ovako (((1-2-3(2*4))
kapiras??

a kada imas ciklicni onda koristis FOR i NEXT

a jeli imas taj program uradjen???

grafitman:

moze li mi neko objasniti ili poslati neki malo jednostavniji zadatak u Visual Basicu 6,nesto zanimljivo a da je jednostavno da bi znao objaniti.Treba mi do petka,ako neko moze da mi pomogne,Hvala unapred

Kliknite za proširenje...

Nisi objasnio sta tacno zelis.
Evo jedan programcic koji svakim klikom na dugme vrti 3 slike u krug.
Pogledaj na www.elitesecurity.org, VB i ASP, tamo ima mnogo o VB 6.

Private Sub Command1_Click()
Static brojac
brojac = brojac + 1
If brojac = 1 Then
Image1.Picture = LoadPicture("c:\1.bmp")
End If
If brojac = 2 Then
Image1.Picture = LoadPicture("c:\2.bmp")
End If
If brojac = 3 Then
Image1.Picture = LoadPicture("c:\3.bmp")
End If
If brojac = 3 Then brojac = 0
End Sub

Rajko

VB ti je programski jezik cije osnove mozes najbrze da skapiras. Sve ti je u menjanju svojstava. Ako jos znas da upotrebis engleske reci koje se koriste tipa IF, ELSE, THEN sto ume i dete od 5 godina nemas problem.

Kupi neku dobru knjigu sa primerima i objašnjenjima.Na primer Visual Basic 2005 od James Foxall-a izdaje ju kompljuter biblioteka a dobiješ i cd uz nju.Ovo je sajt od kompljuter biblioteke gde možeš i da naručiš knjigu www.kombib.co.yu

Imas dosta kvalitetne i besplatne literature. Samo se potrudi da nadjes.

zeken:

VB ti je programski jezik cije osnove mozes najbrze da skapiras. Sve ti je u menjanju svojstava. Ako jos znas da upotrebis engleske reci koje se koriste tipa IF, ELSE, THEN sto ume i dete od 5 godina nemas problem.

Kliknite za proširenje...

Pa nije bas tako. Za IF..THEN...ELSE se ne upotrebljavaju engleske reci vec logika koja za velike programe zna biti veoma komplikovana. Posebno ako pisete program od nekoliko stotina hiljada komandi.