Question about dialogue box in NX Journaling

Hi everybody,
I have no experience in coding and I'm just starting to get on it with NX journaling. My question is I want to be able to have a dialogue box that whose input will allow me to access a part when I run the journal. For example, the partial code below lets me load part number 123456ABCD in revision 007. I want to be able to type those entities in the dialogue box and it will link to this journal code to load the parts as listed below. Can you show me how to do that or show me an example? Thank you so much for your help and suggestions.

Dim partLoadStatus1 As PartLoadStatus
Dim component1 As Assemblies.Component
component1 = workPart.ComponentAssembly.AddComponent("%UGMGR=V3.2 PH=0ZdJeJXvltBKvA PN=123456ABCD PRN=007 ", "MODEL", "123456ABCD", basePoint1, orientation1, -1, partLoadStatus1, True)