برای اندازه ویوها من dip میدم و تمامی دستگاه ها درست نمایش میده اگر از % استفاده میکنید ب مشکل میخورید
ول برای چیزی ک شما میخواین فکنم StringUtil متد مد نظر داره MeasureMultilineTextHeight
Dim Label1 As Label
Label1.Initialize("")
Label1.Text = "this is a long sentence, and we need to " _
& "know the height required in order To show it completely."
Label1.TextSize = 20
Activity.AddView(Label1, 10dip, 10dip, 200dip, 30dip)
Dim su As StringUtils
Label1.Height = su.MeasureMultilineTextHeight(Label1, Label1.Text)
موفق باشید