Программирование
Веб программирование

Задания по vb

 
 

Я тебя готовил к этому на протяжении 4 частей, и подготовил. Твоя миссия будет заключаться в создании блокнота, да не просто блокнота, а Чудо Блокнота. Короче ты должен нанести тяжелый удар по Microsoft, чтоб они затрепищали... Ты должен сделать обычный блокнот, но с часами (до этого даже Билл Гейц не додумался:-))). Потом отправляешь его в компанию Microsoft, получаешь бабло, и 50% отдаешь мне. Ну что договорились? Отлично! Только бабки присылай НЕ ЧЕКОМ, а наличкой....


Есть вопросы? Спроси на нашем форуме!!
lLorD [20.05.2011 14:11]

Я написал =)) ток у мене когда делать exe файл ерорр а так всьо нормально роботает=)

Ден [19.07.2011 14:27]

xDDD дааа... как все может быть нормально если ЕХЕшник не создается =D

сраный советник [05.01.2012 18:23]

убили бы эту статью, это ж стёб тупой )

Андрей Новичков [23.03.2012 22:56]

Я написал! Там и часы, и дата, и можно даж игру запустить

Макс [26.03.2012 14:26]

Скукота

Release [26.03.2012 15:13]

Что для тебя не скукота?

Diamock [26.03.2012 18:16]

Ё-о-у, а я и не знал, что у нас конкурс на чудо-супер-мега БЛОКНОТ! Займусь на досуге... А часы электронные или со стрелками? Наверно и те, и другие, чтобы мелкомягкие удавились от зависти! ;-)

Release [26.03.2012 18:22]

Макс бери пример с Diamock))

Игорь [12.04.2012 16:45]

Как вырезать или скопировать ВЫДЕЛЕННЫЙ текст?

Игорь [12.04.2012 16:54]

Все, спасибо. Сам уже разобрался

Clipboard.SetText Screen.ActiveControl.SelText
Screen.ActiveControl.SelText = ""

Игорь [12.04.2012 19:07]

Другой вопрос. С помощью вот этого:

Private Sub Command1_Click()
myWord = Text2.Text
a = InStr(Form1.Text1.Text, myWord)
If a <> 0 Then
Form1.Text1.SetFocus
Form1.Text1.SelStart = a - 1
Form1.Text1.SelLength = Len(myWord)
End If
End Sub

я нахожу нужный текст в textbox. Проблема в том, что находится только первый по счету совпадающий текст. Как мне "найти далее"? Или подсветить все найденные совпадения?



Оставлять комментарии можно только зарегистрированным




Предупреждение: Вся информация представлена исключительно в образовательных целях.
Ни авторы, ни администрация не несут ответственности в случае ее использования в противозаконных целях.