我想要获取特定类型的附近位置,但谷歌地图上不存在该类型。我想添加那种类型。我们可以在谷歌地图上添加类型吗?
答案 0 :(得分:0)
谷歌地图上不存在类型。
您可以添加以下代码:
T
使用Public Sub CreateForms()
On Error GoTo ex
Dim rs As DAO.Recordset
Set rs = CurrentDb().OpenRecordset("SELECT DISTINCT LocationID FROM T ORDER BY LocationID;", dbOpenSnapshot)
With rs
If .EOF Then GoTo out
.MoveLast
.MoveFirst
End With
Dim frm As Access.Form, i As Integer
For i = 1 To rs.RecordCount
Set frm = CreateForm()
frm.Caption = "formLocation" & rs![LocationID]
DoCmd.Close acForm, frm.Name, acSaveYes
Set frm = Nothing
rs.MoveNext
Next i
out:
On Error Resume Next
rs.Close
Set rs = Nothing
On Error GoTo 0
Exit Sub
ex:
MsgBox Err.Description, vbCritical
Resume out
End Sub
参数指定您要查找的位置类型(此处我们会找到一些餐馆)。
您可以参考附近搜索说明中指定的documentation类型参数。
如果您有任何疑问,请告诉我。