update,

task1/task1-ticket1/_ref/Excel/Examples/usage_send.bas

@@ -0,0 +1,19 @@
+Attribute VB_Name = "usage_send"
+
+Private Sub Handle_Send()
+  ' API: https://code.google.com/p/selenium/wiki/JsonWireProtocol
+
+  Dim driver As New ChromeDriver
+  driver.Get "about:blank"
+  
+  ' Returns all windows handles
+  Dim hwnds As List
+  Set hwnds = driver.Send("GET", "/window_handles")
+  
+  ' Returns all links elements
+  Dim links As List
+  Set links = driver.Send("POST", "/elements", "using", "css selector", "value", "a")
+  
+  Debug.Assert 0
+  driver.Quit
+End Sub