0
我在我的Windows應用中實施了Admob,這是橫幅廣告和插頁式廣告。橫幅的工作方式(當在窗口中點擊時,廣告中的文本有時會被選中而不是觸發廣告)。 當interstitialAd出現時,它很好,當廣告被點擊/觸摸時,它就會消失。它確實將用戶引導到廣告網站。它只是回到了應用程序。Windows Phone 8.1 Admob插頁式廣告消失
我的代碼:
Public Sub showIntAd()
Dim IntAd As InterstitialAd = New InterstitialAd(INT_AD_UNIT)
Dim AdRequest As AdRequest = New AdRequest()
'AdRequest.ForceTesting = True
AddHandler IntAd.ReceivedAd, AddressOf OnAdReceived
AddHandler IntAd.FailedToReceiveAd, AddressOf adFailed
IntAd.LoadAd(AdRequest)
End Sub
Public Sub loadBannerAd(adReq As AdView)
adReq.Format = AdFormats.SmartBanner
adReq.AdUnitID = BANNER_AD_UNIT
Dim AdRequest = New AdRequest()
'AdRequest.ForceTesting = True
'BuildLocalizedApplicationBar()
adReq.LoadAd(AdRequest)
End Sub
Private Sub adFailed(sender As Object, e As AdErrorEventArgs)
'DO NOTHING
End Sub
Private Sub OnAdReceived(ByVal sender As Object, ByVal e As AdEventArgs)
Dim intAd As InterstitialAd = CType(sender, InterstitialAd)
intAd.ShowAd()
End Sub
任何想法?