Visual basic Даны три вещественных числа. Вывести на экран те, которые принадлежат интервалу (1; 10) - VB

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

1. Используя условный оператор if…then, разработайте проект для решения следующих заданий: 1.1. Даны три вещественных числа. Вывести на экран те, которые принадлежат интервалу (1; 10).

Решение задачи: «Visual basic Даны три вещественных числа. Вывести на экран те, которые принадлежат интервалу (1; 10)»

textual
                            Листинг программы 
                        

                            Option Explicit
Dim A As Double
Dim B As Double
Dim C As Double
If (A>1) And (A<10) Then Print "A=";A
If (B>1) And (B<10) Then Print "B=";B
If (C>1) And (C<10) Then Print "C=";C
                        