Дано четырехзначное число. Переставьте местами цифры так, чтобы сначала оказались цифры, меньшие пяти - Visual Basic .NET

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

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

Сделала, чтоб формировалось рандомом четырехзначное число, а как сделать условие ?

Решение задачи: «Дано четырехзначное число. Переставьте местами цифры так, чтобы сначала оказались цифры, меньшие пяти»

textual
Листинг программы
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim Rand As New Random()
        Dim RandNumber As Integer = Rand.Next(1000, 10000)
        TextBox1.Text = CStr(RandNumber)
End Sub

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

5   голосов , оценка 3.8 из 5
Похожие ответы