how to pass parameter to different sub?

can some1 pls help me? i m beginner in writing some marco.
below r my code

private sub commandbutton1_click()
x=10
call part1
end sub

sub part1()
msgbox x
end sub

how to pass the x=10 to sub part1?