Quiz ID : vbnet01
1. 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 Module
20
15
10
12
25
2. 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 Module
20
15
10
12
25
3. 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 Module
20
10
12
25
15
4. 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 Module
12
15
25
20
10
5. 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 Module
20
10
12
25
15
6. 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 Module
12
15
25
20
10
7. 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 Module
25
12
15
20
10
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 Module
25
12
20
10
15
9. 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 Module
25
12
20
10
15
10. 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 Module
25
12
15
20
10
ไม่มีบริการใน thaiabc.com

สถิติ 100 รายการ : เริ่มใหม่ : ภาพเตรียมข้อสอบ : รหัสต้นฉบับ : รุ่น 1.600119 : เวลา : Aug 5,20 10:30:00
คอมพิวเตอร์
vb.net 1
คีย์แอพพลิเคชั่น 1*
จาวาทำซ้ำ 1
คอมพิวเตอร์ 1
คอมพิวเตอร์ 2
 คณิต
บวกเลข 1
บวกเลข 2
อนุกรม (ก.พ.)
เตรียมสอบ (ก.พ.)
คณิต 1
 อังกฤษ
ถาม - ตอบ
present 1
present perfect 1
อังกฤษเบื้องต้น
อังกฤษ 1
 ไทย สังคม
สังคมศึกษา
ความรู้ทั่วไป
ไทย f.1
ไทย p.1
ไทย m.1 		เกี่ยวกับเรา
หน้าหลัก
ทีมงาน
ศูนย์สอบออนไลน์
สนับสนุน
facebook page