Çalışmıyor Hazır karekter valuesi itemleri

Mr Robot red:30245  

Mr Robot blue:30244  

RİN:30243

TETRA:30242

Cristoper Shmit Diriliş:30238

Pedro Gomez Diriliş:30240

Angelo Mao Diriliş:30239

Lin Meling Diriliş:30241

Hanna:30218

Eliana:30219

Hanna Yıl Başı:30236

Eliana Yılbaşı:30237

Rashid Neo: 30214

Saladin Neo :30213

Yavuz Sultan Selim :30052

Simon Bolivar :30093

  Dim text As String = Me.ListBox2.SelectedItem
If  item="Mr Robot red:30245 " Then
Textbox8.text="30245"
ElseIf item="Mr Robot blue:30244 " Then
Combobox9.text="30244
ElseIf item=" RİN : 30243" Then
Textbox8.text="30243" 
ElseIf item="TETRA:30242"Then
Textbox9.text="30242"
ElseIf item="Pedro Gomez Diriliş:30240" Then
Textbox8.text="30240"
ElseIf item="Cristoper Shmit Diriliş:30238" Then
Textbox9.text="30238"
ElseIf item= "Lin Meling Diriliş:30241" Then
Textbox8.text="30241"
ElseIf item="Angelo Mao Diriliş:30239" Then
Textbox9.text="30239"
ElseIf item="Eliana:30219" Then
Textbox8.text="30219"
ElseIf item="Hanna:30218" Then
Textbox9.text="30218" 
ElseIf item="Eliana Yılbaşı:30237" Then
Textbox8.text="30237" 
ElseIf item="Hanna Yıl Başı:30236" Then
Textbox9.text="30236" 
ElseIf item="Rashid Neo: 30214" Then
Textbox8.text="30214" 
ElseIf item="Saladin Neo :30213" Then
Textbox9.text="30213" 
ElseIf item=Yavuz Sultan Selim :30052 Then 
Textbox9.text="30052" 
ElseIf item="Simon Bolivar :30093" Then
Textbox9.text="30093" Then
End If