ivabus/roulette
1
0
Fork 0
mirror of https://github.com/ivabus/roulette synced 2024-11-10 10:35:19 +03:00
Code Issues Actions Packages Projects Releases Wiki Activity

Самый ненужный коммит

Browse source
This commit is contained in:
Ivan Bushchik 2021-05-04 08:39:19 +03:00
parent c610d8a7a1
commit 9e12a67b68
1 changed files with 3 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
roulette/Program.vb
View file

@ -16,7 +16,7 @@ Module Program
"# # # # # # # # # # # ",
"# # # # # # # # # # # ",
"# # ### ### ##### ##### # # ##### "}
Function GetIndex(mass() As Integer, obj As Integer) As Integer
Function GetIndex(mass() As Integer, obj As Integer) As Integer 'Функция получает индекс объекта в массиве
For i = 0 To UBound(mass)
If mass(i) = obj Then Return i
Next
@ -341,7 +341,7 @@ Module Program
Console.ForegroundColor = ConsoleColor.DarkBlue
Console.WriteLine()
Loop
Console.WriteLine("У Вас кончились фишки, игра закончена.")
Console.WriteLine("У Вас кончились фишки, игра окончена.")
Console.WriteLine("Нажмите любую кнопку, чтобы перезапустить игру.")
Console.ReadKey()
End Sub