Free unlimited Text Messaging to any US mobile number. Simply type your message in the Widget, select a name or phone number and hit send. The Widget figures out the carrier.
一函數定義如下:
Function Add2( ByVal A, ByVal B ) As Double
Add2 = A + B
End Function
寫出以下敘述執行的結果:
Dim I As Integer = Add2( 7.2, 2.4 )
Console.WriteLine( Add2( 7.2, 2.4 ) )
Console.WriteLine( I )
9.6
10
43. 有一副程式定義如下:
Sub Div4( ByRef A )
A = A / 4
End Sub
寫出以下幾種呼叫敘述的結果:
(1) Dim I As Integer = 5 (2) Dim I As Integer = 5
Call Div4( I ) Call Div4( (I) )
Console.WriteLin…e(I) Console.WriteLine(I)
(3) Dim I As Double = 5
Call Div4( I )
Console.WriteLine(I)
(1) 1 (2) 5 (3) 1.25
42. Sub Swap( ByRef X As Integer, ByRef Y As Integer)
Dim Temp As Integer
Temp= X
X = Y
Y = Temp
Console.WriteLine( X & "," & Y )
End Sub
一副程式定義如上,寫出以下敘述執行的結果:
(1) Call Swap( 10, 20) ( )
(2) Swap( 10.9, 20.3 ) ( )
(3) Swap( "33.3", "66.6" ) ( )
(4) Dim M As Double = 7.7, N As Double = 17.2
Swap( M, N ) : Console.WriteLine( M & "," & N ) ( )
20,10
20,11
67,33
17,8
17,8More