AppBrainBanner= CreateBanner("DEFAULT")
Activity.AddView(AppBrainBanner, 0, 100%y-50dip, 100%x, 50dip)
.
.
...
Sub CreateBanner (AdUnitId As String) As JavaObject
Dim AdId As JavaObject
Dim builderb As JavaObject
AdId.InitializeStatic("com.appbrain.AdId")
builderb = builderb.InitializeNewInstance("com.appbrain.AppBrainBanner", Array(ctxt))
builderb.RunMethod("setAdId", Array(AdId.GetField(AdUnitId)))
Return builderb
End Sub