老师,示例中中国地图,怎么让简介采用浮动窗口显示?
原来代码:
If TypeOf e.Sender Is WinForm.Label Then '如果单击的是标签
If e.Sender.Name.ToLower.StartsWith("sh") Then '而且名称是以sh开头
Dim sh As String = e.Sender.Name.SubString(2) '获取省份
Dim ps As Integer = Tables("中国地图").FindRow("省份 = '" & sh & "'") '找出此省份所在行的位置
If ps >= 0 Then '如果找到
Tables("中国地图").Position = ps '定位到此行
End If
End If
End If
看了帮助语法是这样:
ShowToolTip(ToolTip, Duration)
[此贴子已经被作者于2019/10/25 11:31:42编辑过]