delegates - 代表程序（编写程序以使用代表三三两两计数）不起作用

Question

所以，这个程序没有打印任何东西，我认为这是因为我需要放置console.writeline()但我不知道在哪里放置它或在(). 这是到目前为止的程序：

Module Module1
Public Delegate Sub MyDelegate()
Sub Main()
    Dim Fns As MyDelegate
    Fns = New MyDelegate(AddressOf FnsTwos)
    Fns()
    Fns = New MyDelegate(AddressOf FnsThrees)
    Fns()
End Sub
Sub FnsTwos()
    Dim x As Integer
    x = x + 2
    Do While 0 < x < 100
    Loop
    Stop
End Sub
Sub FnsThrees()
    Dim x As Integer
    x = x + 3
    Do While 0 < x < 100
    Loop
    Stop
End Sub
End Module