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

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

Kaldata.com - Форуми

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

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

Добре дошли!

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

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

 

Помощ за код

Featured Replies

Здравей те може ли някой да ми предостави код с който като напиша число от 0 до 50 и да го позная :)

  • Автор

Имаш един Textbox и в него да пишеш число от 0 до 50 и програмата да направи числото примерно 32 да е вярно и трябва да го познаш

Ето за това ти говоря: http://cs-bg.info/forum/viewtopic.php?f=89&t=57615 (НЕ Е РЕКЛАМА)

Имаш един Textbox и в него да пишеш число от 0 до 50 и програмата да направи числото примерно 32 да е вярно и трябва да го познаш

Ето за това ти говоря: http://cs-bg.info/fo...hp?f=89&t=57615 (НЕ Е РЕКЛАМА)

Ами дихотомия, защочвате от средата на числото и проверявате по-голямо ли е, след това делите интервала пак на две и така

Аз мога да ти я напиша ,ако искаш ?

Имаш един Textbox и в него да пишеш число от 0 до 50 и програмата да направи числото примерно 32 да е вярно и трябва да го познаш

Да ти имам правописа. Нищо не разбрах.
  • 2 месеца по-късно...

Някой ще ми помогне ли ?

Нещо такова на прима виста (трябва да си сложиш текстово поле и бутон):

Public Class Form1

Dim a As Byte

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim b As Integer = Val(TextBox1.Text)

Select Case b

Case Is > a

TextBox1.Text = "Намали!"

Case Is < a

TextBox1.Text = "Увеличи!"

Case Else

TextBox1.Text = "Позна!"

Randomize()

a = Int(50 * Rnd()) + 1

End Select

End Sub

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

Randomize()

a = Int(50 * Rnd()) + 1

End Sub

End Class

Архивирана тема

Темата е твърде стара и е архивирана. Не можете да добавяте нови отговори в нея, но винаги можете да публикувате нова тема, в която да продължи дискусията. Регистрирайте се или влезте във вашия профил за да публикувате нова тема.

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

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

Дарение

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

Бюлетин

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

Профил

Навигация

Търсене

Търсене

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

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