Potrebna knjiga o Vsual Basic-u!!!

[joca pa]

Drustvo jsel moze neko da mi preporuci neku knjigu za ucenje Visual Basic-a (za pocetnike) i da mi kaze gde se moze kupiti?

 

[joca pa]

Ljudi pa gde ste vi ucili Visual Basic ako knjiga nigde nema?

 

[awax22]

Najbolje ti je ovde

http://msdn.microsoft.com/en-us/library/2x7h1hfk(v=vs.100).aspx

http://www.homeandlearn.co.uk/net/vbNet.html

sve je objašnjeno i imaš za svaku komadu ili funkciju primer!

pozz!

 

[Filip Lav]

Koji ce ti djavo knjiga za visual basic kada je tu sve samo razmisljanje ?

 

[joca pa]

Ma ok. kapiram ja da je tu logika 90% posla.Ali evo na primer koji problem sad imam.U TextBox1 trebam da unesem bilo koji tekst i program treba da prebroji samoglasnike i da upise u TextBox2 koliko ih ima.E negde moram da naucim kako se to raadi.

 

[awax22]

da bi rešio taj problem prvo trebaš odrediti dužinu stringa zatim toliko puta vrtiti for next petlju a u njoj očitavati znak po znak stringa i preko if uslova povećati brojač za jedan kada naiđe samoglasnik! na kraju kada izađeš iz petlje u textbox2 ispsati stanje brojača!

pogledaj malo i ovo!

http://www.techotopia.com/index.php/Working_with_Strings_in_Visual_Basic

pozz!

 

[joca pa]

Pa palo mi je nesto tako na pamet da probam ali nikako da imam vremena da sednem za komp malo.Mislio sam da pomocu ugradjene funkcije "Length" odredim duzinu stringa i da toliko puta izvrsim petlju.Ali kojim kodom da joj kazem da proverava slovo po slovo redom?Predpostavljam da samoglasnike moram deklarisati pre svega.

 

[awax22]

evo ti rešenje, nadam se da će ti malo proširiti pogled na programiranje

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Dim duzStr, br1 As Integer
Dim strMidString As String
br1 = 0
duzStr = Len(TextBox1.Text)

For i = 1 To duzStr
strMidString = Mid(TextBox1.Text, i, 1)

If strMidString = "a" Or strMidString = "e" Then
br1 = br1 + 1
ElseIf strMidString = "i" Or strMidString = "o" Then
br1 = br1 + 1
ElseIf strMidString = "u" Then
br1 = br1 + 1
End If
Next
TextBox2.Text = br1
End Sub

pozz!

 

[joca pa]

Aha sad mi je mnogo jasnije!
strMidString = Mid(TextBox1.Text, i, 1)
Ova linija koda mi je samo bila problem,citao sam o tome na onom sajtu sto si mi ostavio link al mi nije bilo najjasnije cemu sluzi,sad mi je mnogo jasnije!Samo jos jedno pitanje ako moze!
If strMidString = "a" Or strMidString = "e" Then
br1 = br1 + 1
ElseIf strMidString = "i" Or strMidString = "o" Then
br1 = br1 + 1
ElseIf strMidString = "u" Then
br1 = br1 + 1
End If
Zbog cega si dva puta koristio ElseIf kad je bar po meni jednostavnije ovako:
If strMidString = "a" Or strMidString = "e" Or strMidString = "i" Or strMidString = "o" Or strMidString = "u" Then
br1 = br1 + 1
End If
Meni ovako deluje nekako jednostavnije,razumljivije i krace.

 

[awax22]

logički operator "OR" mi je u nekim programima pravio probleme jer mi je odlučivao između samo prve dve navedene vrednosti, zašto nije mi bilo jasno, pa sam se ovako osigurao da logika bude sigurna!

pozz!