Вопросы по Visual Basic

[Jaffer]

Доброе время суток, уважаемые программисты. У меня уже частенько стали возникать затруднение при освоении среды вб. Это связано прежде всего с тем, что у меня поменялся учитель и его обьяснений не понять наверно не дано никому..\ Но перейду к телу :
1. Посоветуйте пожалуйста хороший учебник по вб.
2. Задача :
1. Определить, в какое из 2 слов (с1 или с2) чаще входит слово с3.
2. Определить, каких подслов больше в слове с1 - с2, с3 или с4?
Проходим счас функции : Mid; CHR; InStr. Прошу написать код к этим 2 задачам максимально просто и доступно, используя самые простые пути, поясняя каждый момент, в котором может возникнуть затруднение. Я понимаю, что мой уровень пока довольно низок, но я стараюсь его повысить, учусь в 10 классе. Жду ваших советов.

[Biggs]

1 Н.Г. Волченков Программирование на Visual Basic 6

[challengerr]

k=0 
l=0
m = instr(c1,c3)
do while  m <> 0
c1 = mid(c1,m+len(c3))
k = k+1 'количество вхождений c3  в c1
m = instr(c1,c3)
loop 

m = instr(c2,c3)
do while  m <> 0
c2 = mid(c2,m+len(c3))
l = l+1 'количество вхождений c3  в c1
m = instr(c2,c3)
loop 
if k>l then
msgbox ("c3  входит чаще c1")
elseif k<l then
msgbox ("c3  входит чаще c2")
else
msgbox ("количество вхождений одинаково")
end if

Функция mid
Параметры, которые получает функция при вызове:
1-ый параметр - строка
2-ой параметр - стартовая позиция
3-ий параметр - количество элементов, начиная со стартовой позиции, которые должна вернуть функция (параметр сожно опускать, тогда функцией будет возвращены все символы, начиная от стартовой позиции до конца строки)
Возвращаемое значение: типа String

Функция chr возвращает символ по коду в аблице ascii
Параметры, которые получает функция при вызове:
Возвращаемое значение: типа Char



Функция instr возвращает начало вхождения 2-й строки в 1-ую
Параметры, которые получает функция при вызове:
1-ый параметр - строка
2-ой параметр - строка
3-ий параметр - способ сравнения строк ( либо CompareMethod.Text (текстовое сравнение) либо CompareMethod.Binary ( двоичное сравнение))
Возвращаемое значение: типа Integer
Если строка переданная в качестве 2 параметра найдена в строке переданной в качестве 2 параметра, то возвращается позиция начиная с которой строки совпадают. Если строка 2 нулевой длины или не найдена возвращается 0.

Источники:
описание таблицы ASCII: http://ru.wikipedia.org/wiki/ASCII
Описание функции mid: http://msdn.microsoft.com/en-us/libr...(v=vs.80).aspx
Описание функции chr: http://msdn.microsoft.com/en-us/libr...(v=VS.80).aspx
Описание функции instr: http://msdn.microsoft.com/en-us/libr...(v=VS.80).aspx