XML doc from TextBox specified SP Parameter

[Benjatado]

I am trying to create a VB form which will create an xml document based upon
a text input box which relates to the @ItemNumber paramater within the SQL
stored procedure.
I have the create XML doc step which relates to my stored procedure to pull
back a specific ItemNumber/set of ItemNumbers, and then sends it through an
XSL for tranformation .... but I can't figure out how to add this to a
windows form to where a text box can specify the ItemNumber(s) to pull??

Can someone help me out please, I am a newbie here and VERY lost in a swirl
of code!

Thanks in advance!!
----CODE----------------------
'SqlXml_SqlQuery2File
Imports System
Imports System.IO
Imports System.Xml
Imports Microsoft.Data.SqlXml 'The SQLXML managed classes
Module Module1
Sub Main()
'Instantiate the SqlXmlCommand object and the connection
Dim objSqlXmlCmd As New SqlXmlCommand("Provider=SQLOLEDB;" _
& "Server=BEETHOVEN;Database=DSP;" _
& "Integrated Security=SSPI")
'Set type of query
objSqlXmlCmd.CommandType = SqlXmlCommandType.Sql
objSqlXmlCmd.CommandText = "exec StoredProcedure"
objSqlXmlCmd.RootTag = "Catalog"

objSqlXmlCmd.XslPath = "Format.xsl"

'execute into stream readed
Dim objStrmReader As New StreamReader(objSqlXmlCmd.ExecuteStream())
'prepare destiantion file
Dim objResult As New FileStream("Result.xml", FileMode.Create)
Dim objStrmWriter As New StreamWriter(objResult)

'write result into destination file
objStrmWriter.WriteLine(objStrmReader.ReadToEnd())

objStrmWriter.Close()
objResult.Close()
objStrmReader.Close()
End Sub
End Module