ASCII коды десятичных чисел - VB

Узнай цену своей работы

Формулировка задачи:

Имеется кнопка, при нажатии на которую выводится код элемента по ASCII таблице. То есть код есть только у целого числа. Я написал код, но не знаю, как сделать так, чтобы если я вводил дробное значение, то высвечивалось сообщение "Введите целое число", но если буква, то считало код. И как еще сделать, чтобы если число не входит в диапазон от 0 до 255, то тоже была ошибка? Пробовал через if и все такое, но постоянно ошибки. Подскажите, пожалуйста, как это сделать!
Листинг программы
  1. Dim N As String
  2. N = TextBox1.Text
  3. If IsNumeric(N) Then
  4. TextBox2.Text = Chr(N)
  5. Else
  6. TextBox2.Text = Chr(Asc(N) + 1)
  7. End If

Решение задачи: «ASCII коды десятичных чисел»

textual
Листинг программы
  1. Dim N
  2.         N = Textbox1.Text
  3.       If Not (IsNumeric(N)) Then
  4.              Textbox2.Text = Asc(N)
  5.       Else
  6.           If N >= 0 And N <= 255 Then
  7.              Textbox2.Text = Chr(N)
  8.           Else
  9.              MsgBox "Введите целое число [0,255]"
  10.           End If
  11.      End If

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

8   голосов , оценка 4.375 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Бесплатно
Оформите заказ и авторы начнут откликаться уже через 10 минут
Похожие ответы