visual basic

[Sanek_premium]

Ребят немогу разобраться! есть консольное приложение :
Sub Main()
Dim year, mn As Integer
System.Console.Write("Введіть дату народження:")
year = Console.ReadLine()
mn = year \ 4
If mn * 4 = year Then
System.Console.WriteLine("высокосны й")
Else
System.Console.WriteLine("невысокос ный")
End If
End Sub
нужно сделать windows form application в visual basic

[Zer0]

Во-первых -КРОССПОСТ запрещен
Во-вторых - переделать - не сложно, просто вместо Console.Readline, Console.Writeline переменные нужно получать\выводить из визуальных компонентов (TextBox, Label)

Serge, забыл об этом

В-четвертых - 2100 год, например, високосным не является (а почему - посмотрите в википедии), а программа его определит как високосный.. да и вообще, я немного подзабыл VB, но разве

mn As Integer
...
mn = year \ 4
If mn * 4 = year

будет работать как надо?

[Serge_Bliznykov]

Zer0 +1

в-третьих, код нужно по правилам оформлять тегами.