Sub LoadAd
BannerAd.Initialize2("BannerAd", "ca-app-pub-9301620xxxxxxxxxx/8543266512", BannerAd.SIZE_SMART_BANNER)
BannerAd.LoadAdWithTestDevice("CAD8007B065E0B86EF3C52DFD5558E21")
Dim height As Int
If GetDeviceLayoutValues.ApproximateScreenSize < 6 Then
'phones
If 100%x > 100%y Then height = 32dip Else height = 50dip
Else
'tablets
height = 90dip
End If
Activity.AddView(BannerAd, 0dip, 100%y - height, 100%x, height)
'Activity.AddView(BannerAd, 0, 0, 320dip, 50dip)
'BannerAd.LoadAd
End Sub