Some days ago, I found this somewhere in this forum:
Dim pm As PackageManager
currentVersion=pm.GetVersionCode ("your app's name here")
It worked for me, it gives the integer number of version. If you want the stringCode, I think you could try pm.getVersionName .
You have to include the Phone library for this (I suppose)