Последовательный запуск функций в цикле - Visual Basic .NET
Формулировка задачи:
Добрый день!
Подскажите пожалуйста, каким образом VB.NET можно реализовать последовательный запуск функций в цикле, по аналогии приведенной ниже?
Листинг программы
- Dim nResult As Integer = 0
- For i = 0 to 5
- nResult = команда("MyFunc" & i & "(параметры)")
- If nResult > 0 Then
- msgbox("Задача выполнена")
- Else
- msgbox("Задача не выполнена")
- End If
Решение задачи: «Последовательный запуск функций в цикле»
textual
Листинг программы
- Public Class Form1
- Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
- Dim obj As New Test
- For i = 1 To 3
- MsgBox(CallByName(obj, "MyFunc" & i, CallType.Method, {i, i}))
- Next
- End Sub
- End Class
- Public Class Test
- Function MyFunc1(ByVal x As Integer, ByVal y As Integer) As Integer
- Return x + y
- End Function
- Function MyFunc2(ByVal x As Integer, ByVal y As Integer) As Integer
- Return x + y
- End Function
- Function MyFunc3(ByVal x As Integer, ByVal y As Integer) As Integer
- Return x + y
- End Function
- End Class
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д