Премини към съдържанието
Форумът в приложение

По-лесно сърфиране. Научи повече.

Kaldata.com - Форуми

Приложение на форума на цял екран с push известия, значки и други.

За да инсталирате това приложение на iOS и iPadOS
  1. Докоснете Иконата за споделяне в Safari
  2. Превъртете менюто и докоснете Добавяне към началния екран.
  3. Докоснете Добавяне в горния десен ъгъл.
За да инсталирате това приложение на Android
  1. Докоснете менюто с 3 точки (⋮) в горния десен ъгъл на браузъра.
  2. Докоснете Добавяне към началния екран или Инсталиране на приложение.
  3. Потвърдете, като докоснете Инсталиране.

Добре дошли!

Добре дошли в нашите форуми, пълни с полезна информация. Имате проблем с компютъра или телефона си? Публикувайте нова тема и ще намерите решение на всичките си проблеми. Общувайте свободно и открийте безброй нови приятели.

Моля, регистрирайте се за да публикувате тема и да получите пълен достъп до всички функции.

 

VB6 - Програма за "обръщане" на изричение/дума ?

Featured Replies

Здр искам да ми дадете кода за програма, която да "обръща" думи или изричения :huh: Ето какво мисля да представлява програмата на външен вид -> | Има Два Textbox-а .. В 1-вия (Text1) ще се въвежда думата/изричението а в 2-рия (Text2) ще излиза обърнатата дума/изричение :) [2-рия ще е Look-нат (Locked - True)] ... ще има и един бутон (Command1) :) <- Как Изглежда?! | Искам Когато Въведа Дума В Text1 И Цъкня Бутона (Command1) В Text2 Да излиза думата/изричението но на обратно :)Ако помогнете ще сложа "реклама" на форума и сайта в програмата и ще има spec tnx Искъм да допълня че съм с Visual Basic 6 :) (За 2008 трябват много работи .. там firworks или там ко беше и още :huh: )

Редактирано от AkTuBeH_3a_BaC (преглед на промените)

Като испозваш Vb6 кода на кен би трябвало да даде грешка!

Пробвай с това

Private Sub Command1_Click()

Text2.Text = StrReverse(Text1.Text)

End Sub

Като си слагаш Text2.Locket = True

Може да си добавиш бутон изчисти ,който премахва инфо в текстовите полета!

Private Sub Command2_Click()

Text1.Text = ""

Text2.Text = ""

End Sub

Като испозваш Vb6 кода на кен би трябвало да даде грешка!

Ти ме уби !

"Програмата" упорито работи, и се инати с даването на грешката :huh:

  • Автор

Блягодаря!! Стана :P

А как може да направя Label Който да е интернет връзка... линк към някъде ??

Еdit: Към

Private Sub Command1_Click()

Text2.Text = StrReverse(Text1.Text)

End Sub

прибавих

Text1.Text = ""

Стана супер .. като цъкна на бутона .. и ми изтрива автоматично text1 и в text2 се появява обърнатата дума :) супер стана

Редактирано от AkTuBeH_3a_BaC (преглед на промените)

Кен беше дал код за vb 2008

ама после си се ред явно !

Регистрирайте се или влезете в профила си за да коментирате

Разглеждащи това в момента 0

  • Няма регистрирани потребители разглеждащи тази страница.

Дарение

  • Подкрепи съществуването на форума - направи дарение
    32%
    Дарени 315 € от нужните 1 000 €

Бюлетин

Получавайте известие, когато има важна промяна или новина свързана с форума.

Профил

Навигация

Търсене

Търсене

Конфигуриране на push известия в браузъра

Chrome (Android)
  1. Докоснете иконата на катинар до адресната лента.
  2. Докоснете Разрешения → Известия.
  3. Променете предпочитанията си.
Chrome (Desktop)
  1. Кликнете върху иконата на катинар в адресната лента.
  2. Изберете Настройки на сайта.
  3. Намерете Известия и коригирайте предпочитанията си.