PC Ekspert Forum

PC Ekspert Forum (https://forum.pcekspert.com/index.php)
-   Svaštara (https://forum.pcekspert.com/forumdisplay.php?f=29)
-   -   Zna tko visual basic? Umm felow in need of help (https://forum.pcekspert.com/showthread.php?t=40854)

Trek 08.06.2006. 19:48

Zna tko visual basic? Umm felow in need of help
 
znaci trebam nekog tko bi bio tako divan dobar i drazestan zaradio si pivu hladnu ako ne i dvije tko bi mi mogao napisati sljedeci programcic u visual basicu,

učitati rečenicu
program treba izbaciti...
rečenicu ispisati obrnutim redosljedom
prebrojati slova N i O

^SuperUnknown^ 08.06.2006. 20:30

Imas podforum programiranje, pa probaj tam...
http://forum.pcekspert.com/forumdisplay.php?f=39

choby 10.06.2006. 00:52

stavi na formu text box (text1), labelu (label1) i gumb (command1)

Option Explicit

Private Sub Command1_Click()
Dim i As Integer
Dim str As String
Dim br_a As Integer
Dim br_b As Integer
Dim tmp As String

Label1.Caption = ""

str = Text1.Text

For i = 1 To Len(str)
tmp = Right(str, 1)
Label1.Caption = Label1.Caption & tmp
str = Left(str, Len(str) - 1)
Select Case tmp
Case "O"
br_a = br_a + 1
Case "N"
br_b = br_b + 1
End Select

Next i

End Sub


u br_a su ti prebrojani 'O'-ovi, a u br_b 'N'-ovi (stvar je CASE sensitive, dakle ne broji 'o' i 'n') pa s njima moš šta oš


možda postoji i neki pametniji način, ali je kasno, ko bi sad išao to prčkati


Sva vremena su GMT +2. Sada je 13:08.

Powered by vBulletin®
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
© 1999-2024 PC Ekspert - Sva prava pridržana ISSN 1334-2940
Ad Management by RedTyger