[VB.NET] ビットシフト

今まで実践で使ったことがありません。
と言うか、使い方がわかってないから使えていないだけなんでしょうか。。。
これから意識していきたいです。

Dim i As Integer
i = 2
i = i << style="color: rgb(0, 153, 0);">'10進数数値
Debug.WriteLine("10進数数値:" & Convert.ToInt32(i, 10))
'2進数文字列に変換
Debug.WriteLine("2進数文字列に変換:" & Convert.ToString(i, 2))
'16進数文字列に変換
Debug.WriteLine("16進数文字列に変換:" & Convert.ToString(i, 16))

'10進数数値:4
'2進数文字列に変換:100
'16進数文字列に変換:4

i = 2
i = i << style="color: rgb(0, 153, 0);">'10進数数値
Debug.WriteLine("10進数数値:" & Convert.ToInt32(i, 10))
'2進数文字列に変換
Debug.WriteLine("2進数文字列に変換:" & Convert.ToString(i, 2))
'16進数文字列に変換
Debug.WriteLine("16進数文字列に変換:" & Convert.ToString(i, 16))

'10進数数値:8
'2進数文字列に変換:1000
'16進数文字列に変換:8

i = 2
i = i >> 1
'10進数数値
Debug.WriteLine("10進数数値:" & Convert.ToInt32(i, 10))
'2進数文字列に変換
Debug.WriteLine("2進数文字列に変換:" & Convert.ToString(i, 2))
'16進数文字列に変換
Debug.WriteLine("16進数文字列に変換:" & Convert.ToString(i, 16))

'10進数数値:1
'2進数文字列に変換:1
'16進数文字列に変換:1

i = 2
i = i >> 2
'10進数数値
Debug.WriteLine("10進数数値:" & Convert.ToInt32(i, 10))
'2進数文字列に変換
Debug.WriteLine("2進数文字列に変換:" & Convert.ToString(i, 2))
'16進数文字列に変換
Debug.WriteLine("16進数文字列に変換:" & Convert.ToString(i, 16))

'10進数数値:0
'2進数文字列に変換:0
'16進数文字列に変換:0