D Deleted member 103 Guest Feb 14, 2015 #2 Try this, I did it by Erel. B4X: Public Sub GetVersion As String Dim no As NativeObject no = no.Initialize("NSBundle").RunMethod("mainBundle", Null) Dim name As Object = no.RunMethod("objectForInfoDictionaryKey:", Array("CFBundleShortVersionString")) Return name End Sub Upvote 0
Try this, I did it by Erel. B4X: Public Sub GetVersion As String Dim no As NativeObject no = no.Initialize("NSBundle").RunMethod("mainBundle", Null) Dim name As Object = no.RunMethod("objectForInfoDictionaryKey:", Array("CFBundleShortVersionString")) Return name End Sub