VS 2010 [RESOLVED] Change string value from a function?

Public Class Form1
 
Dim MyItem1, MyItem2, MyItem3 As Integer
 
Public Function SetItemStats(ByVal CurrentItemSlot As ComboBox, ByVal CurrentItemName As String)
        CurrentItemName = CurrentItemSlot.Text
End Function
 
Private Sub SetItem1Button_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles SetItem1Button.Click
        SetItemStats(item1list, MyItem1) ' item1list is the name of my combobox.
        MsgBox(MyItem1) ' Comes out empty here
End Sub
 
End Class