OSDN Git Service

Warningが出ないように変更
authorsyo68k <syo68k@users.sourceforge.jp>
Tue, 30 Aug 2011 20:12:27 +0000 (05:12 +0900)
committerKimura Youichi <kim.upsilon@bucyou.net>
Sat, 18 Feb 2012 14:19:47 +0000 (23:19 +0900)
Tween/Google.vb

index 53d9c83..557340c 100644 (file)
@@ -350,8 +350,8 @@ Public Class Google
 
         Private Sub SendRequest(ByVal info As Dictionary(Of String, String), ByVal userId As Long)
 #If UA <> "True" Then
-            exit sub
-#End If
+            Exit Sub
+#Else
             If userId = 0 Then Exit Sub
             If Me._SessionFirst = 0 Then Me.Init()
 
@@ -413,6 +413,8 @@ Public Class Google
             End If
 
             Me.GetAsync(params, New Uri(GA_GIF_URL))
+
+#End If
         End Sub
 
         Private Sub GetAsync(ByVal params As Dictionary(Of String, String), ByVal url As Uri)