Dim sf As Object = BillingClient.billing.QuerySkuDetails("subs", Array(BillingClient.ADS_SDK_ID))
Wait For (sf) Billing_SkuQueryCompleted (Result As BillingResult, SkuDetails As List)
Log("Billing_SkuQueryCompleted: " & Result.IsSuccess)
Log("Billing_SkuQueryCompleted: " & SkuDetails.Size)