1. What is the result? Module Module1 Dim a As Integer Sub Main() Dim a As Integer = 5 sub1(a, a) Console.WriteLine(func1(a, a)) End Sub Sub sub1(ByVal x As Integer, ByVal y As Integer) a += x : x += a : y += a End Sub Function func1(ByVal x As Integer, ByVal y As Integer) As Integer func1 = a + x + y End Function End Module25
12201015 |
|
2. What is the result? Module Module1 Dim a As Integer Sub Main() Dim a As Integer = 4 sub1(a, a) Console.WriteLine(func1(a, a)) End Sub Sub sub1(ByVal x As Integer, ByRef y As Integer) a += x : x += a : y += a End Sub Function func1(ByVal x As Integer, ByRef y As Integer) As Integer func1 = a + x + y End Function End Module25
12201015 |
3. What is the result? Module Module1 Dim a As Integer Sub Main() Dim a As Integer = 5 Console.WriteLine(func1(a, a)) sub1(a, a) End Sub Sub sub1(ByRef x As Integer, ByVal y As Integer) a += x : x += a : y += a End Sub Function func1(ByRef x As Integer, ByVal y As Integer) As Integer func1 = a + x + y End Function End Module2015101225
|
4. What is the result? Module Module1 Dim a As Integer Sub Main() Dim a As Integer = 5 sub1(5, a) Console.WriteLine(func1(a, a)) End Sub Sub sub1(ByRef x As Integer, ByVal y As Integer) a += x : x += a : y += a End Sub Function func1(ByRef x As Integer, ByRef y As Integer) As Integer func1 = a + x + y End Function End Module2015101225
|
5. What is the result? Module Module1 Dim a As Integer = 1 Sub Main() sub1(a, a) Console.WriteLine(func1(a, a)) End Sub Sub sub1(ByVal x As Integer, ByRef y As Integer) a += x : x += a : y += a End Sub Function func1(ByVal x As Integer, ByRef y As Integer) As Integer func1 = a + x + y End Function End Module25
12201015 |
6. What is the result? Module Module1 Dim a As Integer Sub Main() Dim a As Integer = 5 sub1(a, a) Console.WriteLine(func1(a, a)) End Sub Sub sub1(ByVal x As Integer, ByRef y As Integer) a += x : x += a : y += a End Sub Function func1(ByVal x As Integer, ByRef y As Integer) As Integer func1 = a + x + y End Function End Module25
12152010 |
7. What is the result? Module Module1 Dim a As Integer Sub Main() Dim a As Integer = 5 Console.WriteLine(func1(a, a)) sub1(5, a) End Sub Sub sub1(ByVal x As Integer, ByVal y As Integer) a += x : x += a : y += a End Sub Function func1(ByVal x As Integer, ByVal y As Integer) As Integer func1 = a + x + y End Function End Module20101225
15 |
8. What is the result? Module Module1 Dim a As Integer = 1 Sub Main() sub1(a, a) Console.WriteLine(func1(a, a) - 4) End Sub Sub sub1(ByRef x As Integer, ByRef y As Integer) a += x : x += a : y += a End Sub Function func1(ByRef x As Integer, ByRef y As Integer) As Integer func1 = a + x + y End Function End Module2015101225
|
9. What is the result? Module Module1 Dim a As Integer = 2 Sub Main() sub1(a, a) Console.WriteLine(func1(a, a)) End Sub Sub sub1(ByVal x As Integer, ByVal y As Integer) a += x : x += a : y += a End Sub Function func1(ByRef x As Integer, ByRef y As Integer) As Integer func1 = a + x + y End Function End Module2015101225
|
10. What is the result? Module Module1 Dim a As Integer Sub Main() Dim a As Integer = 5 sub1(a, a) Console.WriteLine(func1(a, a)) End Sub Sub sub1(ByRef x As Integer, ByVal y As Integer) a += x : x += a : y += a End Sub Function func1(ByRef x As Integer, ByVal y As Integer) As Integer func1 = a + x + y End Function End Module20101225
15 |
ไม่มีบริการใน thaiabc.com |
|
|