【正文】
有交集 內(nèi)交 內(nèi)交,但邊緣不相交 特征包含形 形包含特征 特征完全包含形 形完全包含特征 特征包含形的第一個(gè)點(diǎn) 形包含特征的中心 特征和形相同 = 5End SubPrivate Sub MSFlexGrid1_Click() cmdCenter_ClickEnd SubPrivate Sub Toolbar1_ButtonClick(ByVal Button As ) 39。清除選中的圖形 If = Clean Then If Not pt Is Nothing Then Set pt = Nothing If Not pLine Is Nothing Then Set pLine = Nothing If Not pRectangle Is Nothing Then Set pRectangle = Nothing If Not pPolygon Is Nothing Then Set pPolygon = Nothing If Not pSel Is Nothing Then Set pSel = Nothing = 0 = 0 True End IfEnd Sub模塊代碼如下:Option Explicit39。窗體總位于最上邊Public Declare Function SetWindowPos Lib user32 (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal X As Long, ByVal Y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As LongPublic Const SWP_NOSIZE = amp。H1Public Const SWP_NOMOVE = amp。H2Public Const HWND_TOPMOST = 1Public Const HWND_NOTOPMOST = 2Public i As IntegerPublic pSel As 第三步:調(diào)試代碼,直至得到實(shí)驗(yàn)要求的結(jié)果: 點(diǎn)查詢 線查詢 矩形查詢: 多邊形查詢:a) 實(shí)驗(yàn)內(nèi)容對(duì)實(shí)驗(yàn)現(xiàn)象、實(shí)驗(yàn)結(jié)果的分析及其結(jié)論 實(shí)驗(yàn)達(dá)到預(yù)期效果。教師評(píng)語(yǔ)及評(píng)分:簽名: 年 月 日寧可累死在路上,也不能閑死在家里!寧可去碰壁,也不能面壁。是狼就要練好牙,是羊就要練好腿。什么是奮斗?奮斗就是每天很難,可一年一年卻越來(lái)越容易。不奮斗就是每天都很容易,可一年一年越來(lái)越難。能干的人,不在情緒上計(jì)較,只在做事上認(rèn)真;無(wú)能的人!不在做事上認(rèn)真,只在情緒上計(jì)較。拼一個(gè)春夏秋冬!贏一個(gè)無(wú)悔人生!早安!—————獻(xiàn)給所有努力的人. 學(xué)習(xí)好幫