| 
             
              ソスソスVBソスソスソスSソスメ掲ソスソスソスソス(VB2-VB6ソスソス.NETソスソスソスp)
             
           | 
        
ソスEC/C++
        ソスEDelphi
        ソスEVisual BasicソスソスソスSソスソス
        ソス@(VB2-VB6ソスソス.NETソスソスソスp)
        ソスEVisual Basic(VB2-VB6)
        ソスEVisual Basic .NET
        ソスEVisual C++
ソスソスソスNソスヤゑソスノ趣ソスソス竄ウソスソスソストゑソスソスソスソスソスソスソスソスワゑソスソスB
        ソスソスWEBソスナ抵ソスソスラて切ゑソス¥ソス閧オソスト搾ソスソスソスソスソスiソスハゑソスソスソスソスHソスjソスRソス[ソスhソスナゑソスソスソスソスAソスGソスNソスZソスソスソスソスUserFormソスノ描ソス謔キソスソスフに、WindowソスソスソスBソス黷スソスソスソスノ擾ソスソスソスソスネゑソスソス謔、ソスノ、ソスソスソスソスソスソスソスソスソスBitmapソスノ描ソス謔オソストゑソスソスソスABitmap2ソスノコソスsソス[ソスソスソスAPictureソス^ソスノ変奇ソスソスソスソスソスUserFormソスノセソスbソスgソスソスソストゑソスソスソスフでゑソスソスソスソスAソス`ソスソスソスcソスLソスソスソスソスソスソスソスソスソスワゑソスソスBUserFormソスソスDrawBufferソスフ値ソスソス10ソス{ソスソスソスソスニ良ゑソスソスニゑソスソスソスソスLソスソスソスソスンつゑソスソスト趣ソスソスソスソスワゑソスソスソスソスソスソスACeleron2.4GHz,256MByteソスソスソスソスソスソスソスAソスIソスソスソス{ソス[ソスhソスOソスソスソスtソスBソスbソスNソスAWIN2Kソスニゑソスソスソスソス`ソス[ソスvソスネ環具ソスソスフゑソスソス゚ゑソスソスマゑソスソスfソスソスソスソスソスワゑソスソスソスBソスソスソスソスソスソスソスノ対擾ソスソスソスソス@ソスソスソスソスソスソスワゑソスソスソスソスソス芫ウソスソスソスソスソスソスソスソスソスB
        ソスRソス[ソスhソスソスソスソスソスソスレゑソスソスワゑソスソスBソスソスソスソスツ描ソスソスソスフに、ソスsソスxPictureソスソスXソスVソスソスソスソスニゑソスソスソスソスRソス[ソスhソスナゑソスソスB
        (ソスOソスソスソスj
        SubdrawCircle(xAsLong,yAsLong)
        DimhbrAsLong
        DimretAsLong
        DimhOldBrAsLong
        Dimhbmp2AsLong
        
        hdcForm=GetDC(hwndForm)
        IfhdcForm=0ThenExitSub
        hdc=CreateCompatibleDC(hdcForm)
        hdc2=CreateCompatibleDC(hdcForm)
        hbmp2=CreateCompatibleBitmap(hdcForm,rc.Right,rc.Bottom)
        hbmpOld=SelectObject(hdc,hbmp)
        hbmpOld2=SelectObject(hdc2,hbmp2)
        ReleaseDChwndForm,hdcForm
        hbr=CreateSolidBrush(plotColor)
        hOldBr=SelectObject(hdc,hbr)
        Ellipsehdc,x-3,y-3,x+3,y+3
        SelectObjecthdc,hOldBr
        DeleteObjecthbr
        ret=BitBlt(hdc2,0,0,rc.Right,rc.Bottom,hdc,0,0,SRCCOPY)
        SelectObjecthdc,hbmpOld
        SelectObjecthdc2,hbmpOld2
        DeleteDChdc
        DeleteDChdc2
        
        Setpic=GetPictureObject(hbmp2)
        IfpicIsNothingThenDeleteObjecthbmp2
        SetUserForm1.Picture=pic
        EndSub
        
        PrivateFunctionGetPictureObject(ByValhbmpAsLong)AsObject
        DimiidAsGUID
        DimpdAsPICTDESC
        Ifhbmp=0ThenExitFunction
        Withiid
        .Data1=&H20400
        .Data4(0)=&HC0
        .Data4(7)=&H46
        EndWith
        Withpd
        .cbSizeofstruct=Len(pd)
        .picType=PICTYPE_BITMAP
        .hbitmap=hbmp
        EndWith
        OleCreatePictureIndirectpd,iid,1,GetPictureObject
        EndFunction
ソス謔ュソスソスソスソスソスソスワゑソスソスが、ソスQソスlソスノゑソスソス黷スソスツで趣ソスソス竄ウソスソストはどゑソスソスナゑソスソス蛯、ソスソス
Application.ScreenUpdatingソスニゑソスソスナ描ソスソスソス}ソスソスソスソスソストのはなゑソスソスH
        
        ソスソスソスソスgソスソスネゑソスソスソスソスソスソスソスソスソスソスソス
UserFormソスソスgソスソスソスソスソスニはほとゑソスヌなゑソスソスフで、ソスソスソスワゑソスレゑソスソスソスソスヘ述ソスラまゑソスソスが、
        ソスEソスBソスソスソスhソスEソスNソスソスソスXソスXソス^ソスCソスソスソスソスCS_SAVEBITSソスソスソスネゑソスソスソスノ、ソスwソスiソスFソスナ塗ソスソスラゑソス
        ソスソスソスソスソスソスソスソス髟ソスハのウソスBソスソスソスhソスEソスソスソスニ考ソスソスソスソスソスワゑソスソスフで、ソスソス{ソスIソスノはチソスソスソスツゑソスソスソス
        ソスソスソスソスソスソスヘゑソスソスナゑソスソスB
        
        WindowsAPIソスIソスノ会ソスソスソスソスソスソスフでゑソスソスソスホ、ソスTソスuソスNソスソスソスXソスソスソスナゑソスソスソスト、
        WM_ERASEBKGNDソスソスWM_PAINTソスナ、ソスwソスiソスFソスhソスソスツぶゑソスソスソスソスソスソスソスノ、ソスソスソスフまゑソス
        DIBソスネどとゑソスソスト趣ソスソスソスソストゑソスソスソスfソス[ソス^ソス直接描ソスソス(Bltソスn)ソスソスソス驍アソスニになゑソスナゑソスソス蛯、ソスB
        
        ソスソスソスソスソスAソスソスソスソスソスワでゑソスソスソスフは面倒ソスソスソスネ、ソスニは思ソスソスソスワゑソスソスB
ソスFソスlソスAソスソスソスEソスAソスhソスoソスCソスXソスソスソス閧ェソスニゑソスソスソスソスソスソスソスソスワゑソスソスB
        ソスソスソスNソスOソスノ作成ソスソスソスソスソスAソスXソスLソスソスソスソスソスソスソスソスソスOソスソスソスtソスソスソス逅費ソスlソスソスヌみ搾ソスソズブソスbソスNソスソスAソスソスソスソスソスソスソスソスoソスソスソスト使ソスソスソストみゑソスソスニゑソスソスソス`ソスソスソスcソスLソスソスソスレに優ソスソスソスソスソスネゑソスソスソスソス゚、ソスソスソスmソスbソスソスqソスリと思ソスソスソスワゑソスソスソスソスBソスソスソスソスソスヘほとゑソスソスROMソスナゑソスソスソスソスソスソスAソスソスソスソスソス轤ゥソスAソスソスソスOソスソスソスフ掲ソスソスソスツの記ソスソスソスソスQソスlソスノゑソスソスソスソストゑソスソスソスソスソスソスソスソスソスソスフではなゑソスソスソスソスニ思ソスソスソスワゑソスソスB
        
        ScreenUpdatingソスノつゑソスソストは、ソスソスソスソスソストゑソスソスソスフでゑソスソスソスソスAPictureソスソスソスソスソスソス゚ゑソスソスソスソス自ソスフゑソスソス}ソスソスソスソスソスソストゑソスソスワゑソスソスト、ソスソスソスソス`ソス謔ウソスソスネゑソスソスネゑソスソストゑソスソスワゑソスソスワゑソスソスソスソスB
        
        WM_PAINTソス]ソスXソスヘ、ソスuソスLソスナゑソスソスソスソスソスソスWindowsソスvソスソスソスOソスソスソス‾ソスソスソスOソスvソスソス皷橸ソスヌ破ソスソスソスソスソスソスソスソスヌ、ソスソスソスpソスソスソス驍セソスソスソスフ暦ソスソスソスノ趣ソスソスソスソストゑソスソスネゑソスソスqソスLソスネ趣ソスソスソスソスノは荷ゑソスソスdソスソスソスナゑソスソスBソスuExcelVBAソスAソスNソスVソスソスソスソスソスQソス[ソスソスソス成ソスソスソスソスvソスナゑソスwソスソスソスソスソストゑソスソスラ具ソスソスソスソスソスホでゑソスソスソスフゑソスソスソスソスソスソスワゑソスソスソスヒ。
        
        ソスソスソスソスソスソスソスソスJソスソスソストゑソスソスソスソストみまゑソスソスBソスソスしソスソスソスソスソスヒゑソスソスソスソスソスソスワゑソスソスB
Application.ScreenUpdating=Falseソスノ関ゑソスソスソスLソスqソスヘ鯉ソスソスナゑソスソスソスソスB
        ソスソスソスソスソスフ作成ソスソスソスソスソスuソスbソスNソスフ托ソスソスソスソスソスソスソストゑソスソスワゑソスソスソスソスB
        ソスuソス`ソスソスソスcソスLソスヘ会ソスソスPソスソスソスソスワゑソスソスソスナゑソスソスソスソスvソスソスソスソスソスソスソスソスソスナゑソスソスB
        ソスソスソスソスソスソスソスソスソストゑソスソスソスソスソスソスソスソスワゑソスソスB
ソスソスLソスソスVBソスヨ撰ソスソスヘ趣ソスソスソスソスワゑソスソスソスナゑソスソスソスソスソスソスAWinAPIソスソスBltソスヨ係ソスヘ托ソスソスソスソスかソスソスフでゑソスソスフ包ソスソスソスソスソスソスソスソス`ソスソスソスソスソストゑソスソスソスソスニ、ソスソスソスソスツゑソスソスソスソスソスソスニゑソスソスソスソスフは、ソスFソスXソスネ場合ソスソスソスソスソスソスソスト茨ソスTソスノは鯉ソスソスソスソスワゑソスソスが、ソスRソスソスソスgソスソスソス[ソスソスソスnソスフよくソスソスソス驍ソソスソスツゑソスソスヘ、
        
        1.ソスソスソスソスソスソスWM_PAINTソスニゑソスソスナドソスソスソス[ソスソスソストゑソスソストゑソスAソスwソスiソス`ソスソスナ擾ソスソスソスノバソスbソスNソスOソスソスソスEソスソスソスhソスJソスソスソス[ソスナ更ソスVソスソスソストゑソスソスワゑソスソスト費ソスソスソスソスソスソスソスソスソス
        
        2.ソスソスソスソスソスナドソスソスソス[ソスソスソスソスxソスソスソスソスsソスソスソストゑソスソスト、ソスXソスVソス^ソスCソス‾ソスソスソスOソスOソスナゑソスソスソスフ表ソスソスソスソスソスソスソスソスソストゑソスソスワゑソス
        
        ソスフ2ソスツゑソスソスソスソスソスソスナゑソスソスB
        
        1ソスヘ確ソスソスWM_CTLCOLORソスソスNULLBURUSHソスニゑソスソスノゑソスソスソスホ防ソスソスソスソスソス謔、ソスノ記ソスソスソスソスソストゑソスソスワゑソスソスB
        
        2ソスヘスソスソスソス蛯ウソスソスフコソス[ソスhソスナ鯉ソスソスソスソスネゑソスソスhbmp2ソスソスロ趣ソスソスソスソストゑソスソスソスソスト、ソスソスソスソスソス鼕ソスソスソスソスWM_PAINTソスネどで表ソスソスソスソスソスソスソスソス@ソスナゑソスソスニゑソスソスソスツゑソスソスネゑソスソスネゑソスワゑソスソスB
        
        ソスナ鯉ソスノゑソスソスソスツゑソスソスソスソスヘ色ソスXソスニ包ソスソスGソスネ包ソスソスソスワゑソスナゑソスソスソスフで、2ソスフようソスノ趣ソスソスソスソスナバソスbソスNソスOソスソスソスEソスソスソスhソスソスヌ暦ソスソスソスソスソスフゑソスソスソスソスソスニゑソスXソス}ソス[ソスgソスソスソスニ思ソスソスソスワゑソスソスB
        
        ソスソスソスソスソスツ違いソスネ話ソスノなゑソスワゑソスソスソスソスソスソスQソスlソスノなゑソスワゑソスソスソスソスソスKソスソスソスナゑソスソスB
ソスFソスlソスAソスソスソスEソスAソスhソスoソスCソスXソスソスソス閧ェソスニゑソスソスソスソスソスソスソスソスワゑソスソスB
        ソスソスソスLソスソスQソスlソスソスWM_PAINTソスソス゚托ソスソスソスソスト、ソスト描ソスソスソスソスソスンまゑソスソスソスソスソスソスAソスソスソスUserformソスソスソスニ難ソスソスすソスソスフでゑソスソスソスソスAソスソスソスソスソスフコソス[ソスhソスニ組ソスン搾ソスソスせソスソスニ、ソス}ソスEソスXソスJソス[ソス¥ソスソスソスソスソスtソスHソス[ソスソスソスソスOソス黷スソスニゑソスソスソスソスOSソスソスソス¥ソスソスソスソスソスト、ソスソス閧ュソスソスソスソスソストゑソスソスワゑソスソスソスB(ソスソスソスソスソスソスソスソスソスソスソスニゑソスソスAソストサソスuソスNソスソスソスXソスソスソスソスナゑソスソストゑソスソスネゑソスソスj
        http://www11.plala.or.jp/micras/software/whywhat.html
        ソスソスソスソスフ搾ソスナ、
        ソスハ擾ソスフ描ソスソスヘ、ソスソスLhbmp2ソスソスUserFormソスノ抵ソスソスソスBitBltソスナ転ソスソスソスソスソスソスBソスiソスソスソスソスツゑソスソスヘ軽ソスソスソスソスソス黷スソスjUserFormソスソスナ擾ソスソスソスソスソスソスソスソスソスAソスソスソスフサソスCソスYソスノ戻ゑソスソスiExcelソスソスUserFormソスノは厄ソスソスソスソスナゑソスソスソスソスAソスtソスHソス[ソスソスソスソス¥ソスソスソスソスソスソスソスワまソスソス[ソスNソスVソス[ソスgソス操作しソスソスソスソスソスsソスソスソスソスAソスナ擾ソスソスソスソス{ソス^ソスソスソスソスンゑソスソストゑソスソスソスワゑソスソスjソスソスソスソスソスソスソスAResizeソスCソスxソスソスソスgソスソスPictureソスノ変奇ソスソスソスソストゑソスソス迴托ソスソスソス゚ゑソスソスニゑソスソスソスソスワ抵ソスソストで、ソス皷橸ソスソスソスソスソストゑソスソスワゑソスソスB
        WM_PAINTソスナゑソスソスソストゑソスソスソスソスナはなゑソスソスフで、ソスハのウソスBソスソスソスhソスEソスナ隠ソスソスソス黷スソス鼾ソスノは厄ソスソスヘで、ソスlソスlソスノ使ソスソスソストゑソスソスソスソスソスソスソスソスノは厄ソス閧ェソスソスソスソスワゑソスソスソスソスDソスDソスD
        ソスソスソスソスソスソスホらくソスAソスJソスソスソストゑソスソスソスソスワゑソスソスフで、ソスソスしソスソスソスソスソスヒゑソスソスソスソスソスソスワゑソスソスB
ソスソスソスソスニゑソスソスソスソスソスソスワゑソスソスB
        ソスソスソスソスソスソスソスソスソスソスソスソスソスソスFソスlソスAソスソスソス閧ェソスニゑソスソスソスソスソスソスソスソスワゑソスソスソスソスB