ࡱ>  dcRoot EntryklL NQ00x7 ]ContentsuVersionDocument Info D7 5 !"#$%&'()*+,-./0123468b9:;<=>?@ABCEFGHIKJQLMNOPSTUVWXYZ[\]^_`abcdefhijklmnopstuvwxyz{|}~Root EntryklL NQ ,7 @]ContentsVersionDocument Info D7 5 !"#$%&'()*+,-./01234689:;<=>?@ABCEFGHIKJQLMNOPSTUVWXYZ[\]^_`abcdefhijklmnopstuvwxyz{|}~The VBA Project   % 7)7UIControls@MetadataDTemplatesStyleGallery|Overposter Validation, Survey AnalystESRI Route Hatching Extension<Data Interoperability,Tracking Environment* Tracking Analyst"TabletPC Support"SMWindowSurveyAnalyst_ArcMapExtension<ESRI Object Editor&Locator Database Extension6DrawingDefaults  :Maps fPageLayoutSView RTableProperties q:BarState/Toolbars AcceleratorsDataGraphsDataWindows_VBA_Project( % 7)7VBA Project Data""  !"#$%&'()*+,-.0123456789:;<=>?@ABCDEFGHIJKLMNOPQTUVWXYZ[\]^_`abcdeghijklmnopqrstuvwxyz{|}~ˑU  NQ 1GiL NQ 1GiL NQ6L}|߃ Test Tool Test Toolu s|{ LAM Testv&nAov&nAos|{ LAM Testv&nAov&nAos|{ LAM Testv&nAov&nAos|{ LAM Testv&nAov&nAos|{ LAM Testv&nAov&nAos|{ LAM Testv&nAov&nAos|{ LAM Testv&nAov&nAos|{ LAM Testv&nAov&nAos|{ LAM Testv&nAov&nAos|{  UI_PatToolm泖pGKJm泖pGKJs|{  UI_PatToolm泖pGKJm泖pGKJs|{  UI_PatToolm泖pGKJm泖pGKJs|{  UI_PatToolm泖pGKJm泖pGKJs|{  UI_PatToolm泖pGKJm泖pGKJs|{ LAM Testv&nAov&nAov&nAos|{ UI_RasterSampling}7 HE|}7 HE|m泖pGKJs|{ UI_RasterSampling}7 HE|}7 HE|" Ӈ5Č^ì ,--P<  R       ::%Z H~H~v5M_|!nהm s*) Ypהm s**v5M_|!B˥R`+??@$@???$@@$@@???kyO< ,UnknownPWF_lOkȆ6 ~# 7Ls٬W@G5B` ~# 7Qc歊_|Bh8ZoningFPersonal Geodatabase Feature ClassFB|O:9zoningFPersonal Geodatabase Feature Class Shape5ZqO::pC:\temp\VirtualCampus\CustomArcGIS\MoveFwd\Custonia.mdbCustoniajH*O:XCyW_|!;y NA< ~# =y NA>y NA? y NA@?~# A $@~# Bֻ1W@\h4$3@ ^|  s*C^|  s*Dy NA<VN!O4ZONINGOBJECTID-w s*EOBJECTID Shape-w s*F Shape AREA-w s*G AREAGO~TH PERIMETER-w s*IPERIMETERGO~TJ ZONING-w s*KZONINGOVERLAY-w s*LOVERLAYShape_Length-w s*MShape_LengthGO~TN Shape_Area-w s*OShape_AreaGO~TP IX3 o +QEA o +R[ZONING]Defaultt>Z)C\S~# T ~# UY@Y@v>Z)C\ @@R KQV8Arial טIWr9\RSA  s*WB$AOkƥXwC&̟ ZYrC&̟ ZZKաMOkǎ[Y@y NA\y NA]~# ^6 @iV@IlL0@ ~# _ rp0R``#}$/:A3A&E:AkMMAgb*Q "sa3PROJCS["NAD_1983_StatePlane_Kansas_North_FIPS_1501_Feet",GEOGCS["GCS_North_American_1983",DATUM["D_North_American_1983",SPHEROID["GRS_1980",6378137.0,298.257222101]],PRIMEM["Greenwich",0.0],UNIT["Degree",0.0174532925199433]],PROJECTION["Lambert_Conformal_Conic"],PARAMETER["False_Easting",1312333.333333333],PARAMETER["False_Northing",0.0],PARAMETER["Central_Meridian",-98.0],PARAMETER["Standard_Parallel_1",38.71666666666667],PARAMETER["Standard_Parallel_2",39.78333333333333],PARAMETER["Latitude_Of_Origin",38.33333333333334],UNIT["Foot_US",0.3048006096012192]]HE8ADBoiH A@j@?n ?h㈵>@x/ bEA o +R KQcDB MS Shell DlgR KQdDB MS Shell Dlg~# e~# f*~# gl$b_+X@7Nk45&U@#rZ| ?*pf? kg"~# 7Qc歊_|BhhCounties0Shapefile Feature ClassFB|O:iCounties0Shapefile Feature Class Shape5ZqO:jHC:\Users\Ron\Documents\PSU\GIS DataARCINFO: Workspace = \\RONMOSGROVE\C$\Users\Ron\Documents\PSU\GIS Data;Shapefile DataZX|O:kDATABASEHC:\Users\Ron\Documents\PSU\GIS Dataj\O:XCyW_|!ly NAmy NAn~# oŨ$K@? ~# pʃV@*@X2@޲ڑ', ^|  s*q^|  s*ry NAm Name6FID-w s*sFID Shape-w s*t Shape NAME-w s*u NAMESTATE_NAME-w s*vSTATE_NAMESTATE_FIPS-w s*wSTATE_FIPSCNTY_FIPS-w s*xCNTY_FIPS FIPS-w s*y FIPS AREA-w s*z AREAGO~T{ POP1990-w s*|POP1990GO~T} POP1999-w s*~POP1999GO~T POP90_SQMI-w s*POP90_SQMIGO~T HOUSEHOLDS-w s*HOUSEHOLDSGO~T MALES-w s* MALESGO~T FEMALES-w s*FEMALESGO~T WHITE-w s* WHITEGO~T BLACK-w s* BLACKGO~T AMERI_ES-w s*AMERI_ESGO~T ASIAN_PI-w s*ASIAN_PIGO~T OTHER-w s* OTHERGO~T HISPANIC-w s*HISPANICGO~T AGE_UNDER5-w s*AGE_UNDER5GO~T AGE_5_17-w s*AGE_5_17GO~T AGE_18_29-w s*AGE_18_29GO~T AGE_30_49-w s*AGE_30_49GO~T AGE_50_64-w s*AGE_50_64GO~T AGE_65_UP-w s*AGE_65_UPGO~T NEVERMARRY-w s*NEVERMARRYGO~T MARRIED-w s*MARRIEDGO~T SEPARATED-w s*SEPARATEDGO~T WIDOWED-w s*WIDOWEDGO~T DIVORCED-w s*DIVORCEDGO~T HSEHLD_1_M-w s*HSEHLD_1_MGO~T HSEHLD_1_F-w s*HSEHLD_1_FGO~T MARHH_CHD-w s*MARHH_CHDGO~T MARHH_NO_C-w s*MARHH_NO_CGO~T MHH_CHILD-w s*MHH_CHILDGO~T FHH_CHILD-w s*FHH_CHILDGO~T HSE_UNITS-w s*HSE_UNITSGO~T VACANT-w s*VACANTGO~T OWNER_OCC-w s*OWNER_OCCGO~T RENTER_OCC-w s*RENTER_OCCGO~T MEDIAN_VAL-w s*MEDIAN_VALGO~T MEDIANRENT-w s*MEDIANRENTGO~T UNITS_1DET-w s*UNITS_1DETGO~T UNITS_1ATT-w s*UNITS_1ATTGO~T UNITS2-w s*UNITS2GO~T UNITS3_9-w s*UNITS3_9GO~T UNITS10_49-w s*UNITS10_49GO~T UNITS50_UP-w s*UNITS50_UPGO~T MOBILEHOME-w s*MOBILEHOMEGO~T NO_FARMS87-w s*NO_FARMS87GO~T AVG_SIZE87-w s*AVG_SIZE87GO~T CROP_ACR87-w s*CROP_ACR87GO~T AVG_SALE87-w s*AVG_SALE87GO~T IX3 o +EA o +[Name]Defaultt>Z)C\~#  ~# Y@Y@V@v>Z)C\ @@R KQ8Arial טIWr9\RSA  s*B$AOkƥwC&̟ ZrC&̟ ZKաMOkǎY@y NAy NA~# 6 @iV@IlL0@ ~#  rp0R`*y^pF@B+\^y:F@zQ "sGEOGCS["GCS_North_American_1983",DATUM["D_North_American_1983",SPHEROID["GRS_1980",6378137.0,298.257222101]],PRIMEM["Greenwich",0.0],UNIT["Degree",0.0174532925199433]]ff@xx{GzBEN^JC>MbP?MbP?x/ EA o +6 MALES1AGE_18_29MVACANT8OWNER_OCCMMARHH_CHDMSEPARATEDMAGE_UNDER5TUNITS3_9FRENTER_OCCTAGE_50_64MUNITS_1ATTTSTATE_NAMETMEDIANRENTTHSEHLD_1_FTAVG_SALE87T WHITE1UNITS50_UPTUNITS_1DETTAMERI_ESFUNITS28POP1990? FIPS*CNTY_FIPSMMARHH_NO_CTFHH_CHILDMAGE_30_49MCROP_ACR87TNEVERMARRYTAGE_5_17FMARRIED?UNITS10_49TMOBILEHOMETHSEHLD_1_MT BLACK1 OTHER1HOUSEHOLDSTWIDOWED? AREA? NAMEFASIAN_PIFPOP90_SQMITAGE_65_UPMMEDIAN_VALTFID# Shape?STATE_FIPSTFEMALES?POP1999?MHH_CHILDMAVG_SIZE87THISPANICFDIVORCEDFNO_FARMS87THSE_UNITSMR KQcR KQd~# e~# f*~# l$b_+X@7Nk45&U@#rZ| ?*pf?~# l$b_+X@7Nk45&U@R KQcR KQd~# e~# f*#rZ| ?*pf?@5.A5.A-C6*?>>Data FrameХbu -y NA.~# /? oהm s*0 !@&@ ףp= ?A t@?c/ @p= ף%@~# 1Y@1lu 2?1lu 3??1lu 4 1lu 5 ?'xu 'xu 'xu 'xu 'xu v5M_|!:33333ۿῚ!@'@!@&@ v5M_|!LayerszQ "s GEOGCS["GCS_Assumed_Geographic_1",DATUM["D_North_American_1927",SPHEROID["Clarke_1866",6378206.4,294.9786982]],PRIMEM["Greenwich",0.0],UNIT["Degree",0.0174532925199433]]ff@xx{GzBj@j@ܵ|JC>MbP?MbP?F +!<Default>r9ξ2 +"zQ "s - \UA@k|=[NB@ @/5)OOk#! ! ??@ a֊`Ok$GEOGTRAN["NAD_1927_To_NAD_1983_NADCON",GEOGCS["GCS_North_American_1927",DATUM["D_North_American_1927",SPHEROID["Clarke_1866",6378206.4,294.9786982]],PRIMEM["Greenwich",0.0],UNIT["Degree",0.0174532925199433]],GEOGCS["GCS_North_American_1983",DATUM["D_North_American_1983",SPHEROID["GRS_1980",6378137.0,298.257222101]],PRIMEM["Greenwich",0.0],UNIT["Degree",0.0174532925199433]],METHOD["NADCON"],PARAMETER["Dataset_conus",0.0]]a֊`Ok${f2@V=lI|x`nh%~# &XFL@ hQ9S@ԞQ@@rp0R`'- \UA@k|=[NB@zQ "s rp0R`(- \UA@k|=[NB@zQ "s {f2@y NAy NA~# Ũ$K@? ~# D=6X@<$#FAK8@ y NA ~# ? y NA ~#  @ ?~# t>Z)C\~#  ~# Y@Y@v>Z)C\$@@R KQArial טIWr9\t>Z)C\~#  ~# Y@Y@v>Z)C\ҞȻOr\@@@@y NAy NA~# Ũ$K@? ~# D=6X@<$#FAK8@ .@$@@R KQArial טIWr9\~&f h`B˥R`@@@@?@@@@&f h`rp0R`P@ 8@@@ 8@@(@(@@2seB tΠA|.ESRI AttributeTransfernsOBO['",,XXPP5{'"2FMOZ2Cre?TFm}7i8!Ȫb?SP0`ny NA~# XFL@ hQ9S@ԞQ@$@ ?~# y NA~# FMfU@$V^u}R@"@ ?~# y NA~# ROt15@D+cI@ՓnqR? '?ffffff"@ar_e?Window:BxeN@?>@?  ?]زJ&??nNעDA&@[M?'ˑ s*fC:\Users\Ron\AppData\Roaming\ESRI\ArcMap\Ron.styleESRI.styleCivic.style&Public Signs.style*Crime Analysis.stylefC:\Users\Ron\AppData\Roaming\ESRI\ArcMap\Ron.style|C:\Users\Ron\AppData\Roaming\ESRI\ArcMap\Templates\Normal.mxtDisplaySourceSelectionDisplayq[ s*~# 6 @iV@IlL0GO~T GO~T Lab 3Ron`Ľߗ`Ľߗ>ߗsRN1v9.2Host Project Items&6Host Project Item Names0# % 7 % 7VBA Project Signature, ! Project_Data_CurVer(%$ {l(ThisDocument*{m(5{@n(L{006B1AFE-C66C-11D0-B94C-080009EE4E51}7{n( L{40499F24-596F-45D2-ACE1-A251E2990017}9{o(";{ d($={d(&&L{866AE5D3-530C-11D2-A2BD-0000F8774FB5}FHost Project Item List Data8ThisDocument9 % 7 % 7VBA)0 % 7)7frmRasterSamplingOptions2+)7)7C:\Users\Ron\Documents\PSU\GIS Programming Geo 590\Project\Project.mxdUID="{14D60357-6D4A-42F4-A4C3-E313BD06D8BD}" Document=ThisDocument/&H00000000 Package={AC9F2F90-E877-11CE-9F68-00AA00574A4F} Module=Module1 BaseClass=frmRasterSamplingOptions Name="Project" HelpContextID="0" VersionCompatible32="393222000" CMG="0002DEE4E2E4E2E4E2E4E2" DPB="3230EC3C1F3D1F3D1F" GC="6466BA76DEA9DPROJECTwm&'PROJECTf[ o*,4 FA9DF56" [Host Extender Info] &H00000001={3832D640-CF90-11CF-8E43-00A0C911005A};VBE;&H00000000 &H00000002={EAB38D5E-26DC-11D2-98C0-00104B24170B};APC\esriFramework;&H00000000 [Workspace] ThisDocument=69, 69, 923, 449, Module1=138, 138, 1198, 678, Z frmRasterSamplingOptions=161, 161, 1115, 596, , 138, 138, 1092, 573, ThisDocumentThisDocumentModule1Module1frmRasterSamplingOptionsfrmRasterSamplingOptions6@,JrU~~~~~~~q   7# 7 )&(UIButtonControl1 7 8UI_RasterSCompObj-2aVBFrame,AThisDocument$&h__SRP_2__SRP_313Module168l__SRP_4$__SRP_525gfrmRasterSamplingOptions21_VBA_PROJECT.4rdirg__SRP_0R)__SRP_17/ Project Item Data$:; Control List Data$? % 7 % 7ReqControl List Data*< % 7 % 7ReqControl List Data*n Control_Data_CurVer(@m 00000000B % 7 % 700000001>=A % 7 % 7Control List Data$l(Control DatarControl Dataoampling 7 8Hbuttonshiftxy 9XpEnv ThisPixelType :hpRLayer pRasterDef PixelDims pSelectionEnv PixelGeoAddr%rU (`(D` 1Ii<44D`K*m@*\CC:\Users\Ron\AppData\Roaming\ESRI\ArcMap\Templates\Normal.mxtrU~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~/~O 9bY/҆lKjy   e 918q88819q9a < 9:y:::!;i;; <A</)  a-C¿RBB 11  99y  9 )II !" $%)&I'()* ,-.I/013 45 ThisDocumentModule1frmRasterSamplingOptionsProjectF@C:\Program Files\Common Files\Microsoft Shared\VBA\VBA6\VBE6.DLLVBA Q y `j SwO -C:\Program Files\ArcGIS\com\esriFramework.olb esriFramework qp0FC:\Windows\system32\stdole2.tlbstdole c7`%JOk! *C:\Program Files\ArcGIS\com\esriArcMap.olb esriArcMap aWFCC:\Program Files\Common Files\Microsoft Shared\VBA\VBA6\VBE6EXT.OLBVBIDE a{^gJķ:B *C:\Program Files\ArcGIS\com\esriSystem.olb esriSystem NkJLL  ) ,C:\Program Files\ArcGIS\com\esriSystemUI.olb esriSystemUI  q”2Ox h ,C:\Program Files\ArcGIS\com\esriGeometry.olb esriGeometry  1YLC@K~ܜ +C:\Program Files\ArcGIS\com\esriDisplay.olb esriDisplay  ) uL'h>p /C:\Program Files\ArcGIS\com\esriGeoDatabase.olbesriGeoDatabaseA?K-Uy/ 5C:\Program Files\ArcGIS\com\esriDataSourcesRaster.olbesriDataSourcesRaster  /éO5ɏ4C:\Program Files\ArcGIS\com\esriDataSourcesOleDB.olbesriDataSourcesOleDB  9 eC)E)O 3C:\Program Files\ArcGIS\com\esriDataSourcesFile.olbesriDataSourcesFile Ai vJMH|b{ 2C:\Program Files\ArcGIS\com\esriDataSourcesGDB.olbesriDataSourcesGDB a 0,}e B7r/6 *C:\Program Files\ArcGIS\com\esriOutput.olb esriOutput @XAǧbdFԐ:C:\Program Files\ArcGIS\com\esriGeoDatabaseDistributed.olbesriGeoDatabaseDistributed 9PT{^NJa9C:\Program Files\ArcGIS\com\esriGeoDatabaseExtensions.olbesriGeoDatabaseExtensions`Ľߗ^ y`hEބH}.ܮ )C:\Program Files\ArcGIS\com\esriCarto.olb esriCarto apEk0 3C:\Program Files\ArcGIS\com\esriNetworkAnalysis.olbesriNetworkAnalysis q +T\H@-UIButtonControl1 MxDocument .C:\Program Files\ArcGIS\com\esriGeoAnalyst.olbesriGeoAnalyst  q cH_  -C:\Program Files\ArcGIS\com\esri3DAnalyst.olb esri3DAnalyst g(K JbebX9C:\Program Files\ArcGIS\com\esriGeoStatisticalAnalyst.olbesriGeoStatisticalAnalyst )u)b*OL : 2C:\Program Files\ArcGIS\com\esriSpatialAnalyst.olbesriSpatialAnalyst AisO߈ 2C:\Program Files\ArcGIS\com\esriNetworkAnalyst.olbesriNetworkAnalyst aמJFea 1C:\Program Files\ArcGIS\com\esriGeoDatabaseUI.olbesriGeoDatabaseUI )ǭ ܎D'L +C:\Program Files\ArcGIS\com\esriCatalog.olb esriCatalog )o~OuXBcwO -C:\Program Files\ArcGIS\com\esriCatalogUI.olb esriCatalogUI  q w#ٱMa@ +C:\Program Files\ArcGIS\com\esriCartoUI.olb esriCartoUI !y! AQMVgH7C:\Program Files\ArcGIS\com\esriDataSourcesRasterUI.olbesriDataSourcesRasterUI !""0m~wO -C:\Program Files\ArcGIS\com\esriDisplayUI.olb esriDisplayUI>ߗ !#I##@@Mzu ,C:\Program Files\ArcGIS\com\esriOutputUI.olb esriOutputUI a$$$P$I@oYEQ ,C:\Program Files\ArcGIS\com\esriArcMapUI.olb esriArcMapUI q%%&`(*OEƕ+ 0C:\Program Files\ArcGIS\com\esriArcCatalogUI.olbesriArcCatalogUI &&'p0bL uUI_RasterSampling *C:\Program Files\ArcGIS\com\esriEditor.olb esriEditor ' (i(nY16GO)[6 2C:\Program Files\ArcGIS\com\esriGeoReferenceUI.olbesriGeoReferenceUI ( )y)kkyO .C:\Program Files\ArcGIS\com\esriLocationUI.olbesriLocationUI *)**5PA^<C:\Program Files\ArcGIS\com\esriGeoDatabaseDistributedUI.olbesriGeoDatabaseDistributedUI +9++ȅRy Imk -C:\Program Files\ArcGIS\com\esriEditorExt.olb esriEditorExt a,,,CY; +C:\Program Files\ArcGIS\com\esriArcScan.olb esriArcScan q---W۬:O4C:\Program Files\ArcGIS\com\esriSpatialAnalystUI.olbesriSpatialAnalystUI q../KL+o]sQ*HҞߗ4C:\Program Files\ArcGIS\com\esriNetworkAnalystUI.olbesriNetworkAnalystUI / 00ocA Zy;C:\Program Files\ArcGIS\com\esriGeoStatisticalAnalystUI.olbesriGeoStatisticalAnalystUI 1911P1ƂO6Vc 1C:\Program Files\ArcGIS\com\esriGeoprocessing.olbesriGeoprocessing Q2y22.E .`M C:\Windows\system32\FM20.DLLMSForms q3q333 נdfO$Ѷ /C:\Users\Ron\AppData\Local\Temp\VBE\MSForms.exd a4q3430w}DOk *C:\Program Files\ArcGIS\Bin\UIControls.dll UICONTROLSLib I5I5q55@QE5N81kCC:\Users\Ron\AppData\Local\Temp\APC\esriFramework\UICONTROLSLib.exd Q6I5y65Pwq>z0 p YIXzg2klL NQ-%,OCAg^ UI_RasterSampling_CursorIDUI_RasterSampling_MessageUI_RasterSampling_MouseMoveUI_RasterSampling_ToolTipUI_RasterSampling_MouseDownGetSelectionEnvelopey8_|( P<44< HH 8CannotHandleThisPixelType GetRasterDefq#5OGetSelectionDefOpenDialogandSampleCreatePixelBlockForSelectionGeoAddressOfSelctionPixelGetNextRandomPixelPerformRandomSampling !DisplayRasterCellValueInStatusBar  TT)\A(cCGIS\bin\\)yl(cCalleryCl::"|H_|!kהm s*5M_|!5M_|!GaU4'ӯVF>)>GaU4'ӯV No Rasteru5M_|!1}3%x5{K0$y8_|(௛@$ ( ,  ) Raster value = R{0  k*0* pHdProjectQ(@= l H3 J< rstdole>stdoleP h%^*\G{00020430-C 0046}#2.0#0#C:\Windows\system32\e2.tlb#OLE Automation`ENormalENCrma1Fv*\C/Users\Ron\AppDataaming\ESRI\ArcMap\Templates\+.mxt?#!..\-!r@H0 %esri6>sriAQcM^p uAA603763-259A-11D3-9F4ARC04F6BC621}#1R{gram Fil1GIS \com\G.oT= C" ObA LibraryAVBIDE>B.VBIDE'zE157Bvcz5.3z'C ommon+Microsoft Shared\VBA6E6EXT.OLB#G Visual Basic for" flics Extensibility +aSaSydt@ma5E1F7BC3-67C5-4AEE-8EC6-C4B73AAC42EDaCaanA UI>1eF U3 a8a34ECCA6E2-B16BCA-BD17-E74CAE4C150AcGUIGeometry G`,ou:e r. *094C2-FF32-4FA1-ABCB-7820F8D6FB68% +tDis.Dusp`a`w`-59FCCD31-43 4C-40 -BD EF-DBDEDC9CE0t@D@bas -Dt`b`s 08 `0475BDB1-E5B.CA2-9127-1683E70C2. /Aa/`SourcesRa@r>*A0aFaS`uBbRwrw`!8F0541A3-D5BE-4B3F-A8D9-062D5579E19B?$3Mh4M"OleDB>(We{5O@OepXB E2822F-C3A FA9P?9B-3512C98F97F/brbAr p P(i>&OGF6ㄑ0 1CE6A$C6W3F@529-8FC0-D7ED298E4F1L A ǁ P G$q Gd0 4A} 13-87}484D-AF82-0802947}7o   p p OBJECT~ՉOutputkq*O@ t@Ou@7 ى7DB92CEC-CB20A 37-FCD07(D43`1߉}߉ig _<PQORtributed>4OO\tC(ibe CA7C7@4158-1B-4664P04-8694D490`ϗ  Pons>2GQ_Exe4nPiPTq pAE7BA654FE-F55EEE5-8CFA yAEFFBA6g Pkc  PC`arto>8CU rP oQ}`s0 45C8Fx -488P3Q7D88`F  b ґ Lo3 L@jc tNo` 6B45C696-3C04268-A58B-D9D83Ck_W  [NetworkAnalXysi`%[NtDwP rknհ l s s[@9D1302`4C@75F-410892A-692B073E1 L G  Pa6s N14$BAq ah%$5C540428B-B#$hC40-2D89C191$u1Tw  / "esri3DAnalyst>sri3DAnalyALt |{ *\G{639FE90A-CC9A-48C6-AC1D-105FE50915B5}#1.0#0#C:\Program Files\ArcGIS \com\ .olb#ESRI  Object Libraryc}:GeoStatistical2GeoSTtts icٍpp0628CA67-C14B-4A0C-A5BE@-6265C58E8pSv|fO|Sp{y$ ySpv r2922975-992qC4F-BD20-F7F7113A9299%9K$G75NetworkFr5N@rtwQ@srkN559B4F73F7-90C0-11D5-A6C3-0008C7DF88AB5K$ۇ5 *5@$Database`UI>" DQBlabs:UI܍ 54A9C9ED7gD614-B(480@D961FC%5@#g-4 !Clog>`RdžCl4jgw`AD@/E29-DC048E-BBF6-27E4E34CF2ED't @h!0#/C0FC1503-7E6FI2-AABFIC04FA3785F1?/UInUI>.rtoa.Gar@o).D92377DC-FAB1-4DFB-A4C1-61BD8C40DBE`&.7t$.LSourcesRashter.^S Fu@c`_sRբ`t`r`!!I8F0F4190-51B8B598-84945667024_g%LDisplay)LjDpa/L0@16DF9D!L8"1$L2D10F8774FF7 Output $&Ou&pR !Ixb=E064D4@0-D6CE 0 -867A 5172019 g  MTap A$M$pT$ 40499F 24-59P=45DP=CE1-A251`J90017   PA> QT I Pa>ED18C80(E020FP|8745-B6A5D0C6952/>wr I Y  P Edit`or>d ETd/t=r` u0 4C896230-7F1A3/8#B9C6  %nRefeprencBySRHfBHeI/H %31996E-D0E736/p87295Bpo o a  {o b PALocon01L0[aAo }0$06BEA6@B-FF833`-9F79qn8&C4 [g /  pHWђLtributed 8pe 3kVt?iKe; (d90F28035-50Dp1A8-9B1C-8D14EE115EAOd33   = 20s,ExcI5ExY52AE85C8-0A490EPE0-E`6D8Ap_A & & %CScank+sMSn 85A385F8-E07F-43}8BC2-E3593B9FC3F3(((W ? 2 2K!'(%'o#&!&D5A7AC`243q4Dfob} w CYN֢alystUI>(es@riNHtwohkAnalyttUI  *\G{10DEE54B-98B4-4CBE-BC2B-6FDD12135D73}#1.0#0#C:\Program Files\ArcGIS\com\esriNet@workAn.olb#ESRI  Object LibraryHGeoStati@sticalO>,6 GoStot{sXicvzzE3AB636F-179C-41AE-AD09-AE965A CC1zV~ Qprocessing>" |po;}s?ngv A9C031A050-82C6-4F8F-8836-5692631CFFE6h9/#6T4#MSForms>@mF§m@43@+0D452@EE1-E0*1 01A-8-02608C4D0@BB4}#2ŢWindows\sem32\FM20.DLL#Microsoft B &/;"10- C00}#0&# 50 AA0D719D8-666FDB-B082-8924A1D1B6BE6Users\Ron\AppData\Lo@\Temp\VBE\S0.exdk.E .`M `@FUICO@NTROLSr>!COTRL`6LLb3j*`77E512AB-FD7D-11D2-9F44(C04F6BC61AKBin\ontrols.dll#g_5@46V5 g0h4551A308-ED35-4E15-8438-B431D6F`61E6B7APCbFe?/:B @w}DOk`D ThisDocumentG!h@7sD@mcum@n2"` H1Z"%,_+Aeodule1Godul1M"i2U =! frmRasterSamplOptionPsG0`fmU[at@r@\a`#pigOposy n2 p o`-*&.#**!am  /*\G{000204EF-0000-0000-C000-000000000046}#4.0#9#C:\Program Files\Common Files\Microsoft Shared\VBA\VBA6\VBE6.DLL#Visual Basic For Applications*\G{866AE5D3-530C-11D2-A2BD-0000F8774FB5}#1.0#0#C:\Program Files\ArcGIS\com\esriFramework.olb#ESRI Framework Object Library*\G{00020430-0000-0000-C000-000000000046}#2.0#0#C:\Windows\system32\stdole2.tlb#OLE Automation*\CC:\Users\Ron\AppData\Roaming\ESRI\ArcMap\Templates\Normal.mxt~*\C..\..\..\..\AppData\Roaming\ESRI\ArcMap\Templates\Normal.mxtrH0*\G{AA603763-259A-11D3-9F4A-00C04F6BC621}#1.0#0#C:\Program Files\ArcGIS\com\esriArcMap.olb#ESRI ArcMap Object LibraryZ*\G{0002E157-0000-0000-C000-000000000046}#5.3#0#C:\Program Files\Common Files\Microsoft Shared\VBA\VBA6\VBE6EXT.OLB#Microsoft Visual Basic for Applications Extensibility 5.3*\G{5E1F7BC3-67C5-4AEE-8EC6-C4B73AAC42ED}#1.0#0#C:\Program Files\ArcGIS\com\esriSystem.olb#ESRI System Object Library*\G{4ECCA6E2-B16B-4ACA-BD17-E74CAE4C150A}#1.0#0#C:\Program Files\ArcGIS\com\esriSystemUI.olb#ESRI SystemUI Object Library*\G{C4B094C2-FF32-4FA1-ABCB-7820F8D6FB68}#1.0#0#C:\Program Files\ArcGIS\com\esriGeometry.olb#ESRI Geometry Object Library*\G{59FCCD31-434C-4017-BDEF-DB4B7EDC9CE0}#1.0#0#C:\Program Files\ArcGIS\com\esriDisplay.olb#ESRI Display Object Library*\G{0475BDB1-E5B2-4CA2-9127-B4B1683E70C2}#1.0#0#C:\Program Files\ArcGIS\com\esriGeoDatabase.olb#ESRI GeoDatabase Object Library*\G{8F0541A3-D5BE-4B3F-A8D9-062D5579E19B}#1.0#0#C:\Program Files\ArcGIS\com\esriDataSourcesRaster.olb#ESRI DataSourcesRaster Object Library*\G{04E2822F-C3AE-4FA9-B19B-3512C98F97FB}#1.0#0#C:\Program Files\ArcGIS\com\esriDataSourcesOleDB.olb#ESRI DataSourcesOleDB Object Library*\G{1CE6AC65-43F5-4529-8FC0-D7ED298E4F1A}#1.0#0#C:\Program Files\ArcGIS\com\esriDataSourcesFile.olb#ESRI DataSourcesFile Object Library *\G{4A037613-879A-484D-AF82-0802947C627B}#1.0#0#C:\Program Files\ArcGIS\com\esriDataSourcesGDB.olb#ESRI DataSourcesGDB OBJECT Library*\G{7DB92CEC-CB65-420A-8737-FCD0722FD436}#1.0#0#C:\Program Files\ArcGIS\com\esriOutput.olb#ESRI Output Object Library**\G{A7C74158-1062-4664-B404-8694D490FCD1}#1.0#0#C:\Program Files\ArcGIS\com\esriGeoDatabaseDistributed.olb#ESRI GeoDatabaseDistributed Object Library&*\G{7BA654FE-F55E-4EE5-8CF2-FAEFFBC04A61}#1.0#0#C:\Program Files\ArcGIS\com\esriGeoDatabaseExtensions.olb#ESRI GeoDatabaseExtensions Object Library*\G{45AC68FF-DEFF-4884-B3A9-7D882EDCAEF1}#1.0#0#C:\Program Files\ArcGIS\com\esriCarto.olb#ESRI Carto Object Library*\G{6B45C696-3C30-4268-A58B-D9F32D80023C}#1.0#0#C:\Program Files\ArcGIS\com\esriLocation.olb#ESRI Location Object Library*\G{9D130258-C75F-41EF-892A-692B073E1AAC}#1.0#0#C:\Program Files\ArcGIS\com\esriNetworkAnalysis.olb#ESRI NetworkAnalysis Object Library*\G{5C54042B-B2ED-4889-8C40-2D89C19DB41D}#1.0#0#C:\Program Files\ArcGIS\com\esriGeoAnalyst.olb#ESRI GeoAnalyst Object Library*\G{639FE90A-CC9A-48C6-AC1D-105FE50915B5}#1.0#0#C:\Program Files\ArcGIS\com\esri3DAnalyst.olb#ESRI 3DAnalyst Object Library&*\G{0628CA67-C14B-4A0C-A5BE-6265C06258E8}#1.0#0#C:\Program Files\ArcGIS\com\esriGeoStatisticalAnalyst.olb#ESRI GeoStatisticalAnalyst Object Library *\G{62922975-992A-4C4F-BD20-F7F7113A9299}#1.0#0#C:\Program Files\ArcGIS\com\esriSpatialAnalyst.olb#ESRI SpatialAnalyst Object Library *\G{9B4F73F7-90C0-11D5-A6C3-0008C7DF88AB}#1.0#0#C:\Program Files\ArcGIS\com\esriNetworkAnalyst.olb#ESRI Network Analyst Object Library*\G{4A9C9ED7-F7DB-4614-B480-A5D265C961FC}#1.0#0#C:\Program Files\ArcGIS\com\esriGeoDatabaseUI.olb#ESRI GeoDatabaseUI Object Library*\G{ADC7DE29-DC0B-448E-BBF6-27E4E34CF2EC}#1.0#0#C:\Program Files\ArcGIS\com\esriCatalog.olb#ESRI Catalog Object Library*\G{C0FC1503-7E6F-11D2-AABF-00C04FA375F1}#1.0#0#C:\Program Files\ArcGIS\com\esriCatalogUI.olb#ESRI CatalogUI Object Library*\G{D92377DC-FAB1-4DFB-A4C1-61BD8C40DBEB}#1.0#0#C:\Program Files\ArcGIS\com\esriCartoUI.olb#ESRI CartoUI Object Library*\G{8F0F4190-51B8-4D1D-B598-849456670248}#1.0#0#C:\Program Files\ArcGIS\com\esriDataSourcesRasterUI.olb#ESRI DataSourcesRasterUI Object Library*\G{016DF9D3-7E81-11D2-A2D1-0000F8774FB5}#1.0#0#C:\Program Files\ArcGIS\com\esriDisplayUI.olb#ESRI DisplayUI Object Library*\G{AE064D40-D6CE-11D0-867A-0000F8751720}#1.0#0#C:\Program Files\ArcGIS\com\esriOutputUI.olb#ESRI OutputUI Object Library*\G{40499F24-596F-45D2-ACE1-A251E2990017}#1.0#0#C:\Program Files\ArcGIS\com\esriArcMapUI.olb#ESRI ArcMapUI Object Library*\G{ED18C81D-E028-4F2A-8745-B6A5D0C6952B}#1.0#0#C:\Program Files\ArcGIS\com\esriArcCatalogUI.olb#ESRI ArcCatalogUI Object Library*\G{4C896230-7F1A-11D2-8509-0000F875B9C6}#1.0#0#C:\Program Files\ArcGIS\com\esriEditor.olb#ESRI Editor Object Library *\G{31FB596E-D0E8-4736-864F-87295B15B736}#1.0#0#C:\Program Files\ArcGIS\com\esriGeoReferenceUI.olb#ESRI GeoReferenceUI Object Library*\G{E06BEA6B-FF83-11D3-9F79-00C04F8ED1C4}#1.0#0#C:\Program Files\ArcGIS\com\esriLocationUI.olb#ESRI LocationUI Object Library2*\G{90F28035-50D8-41A8-9B1C-8D14EE115EA8}#1.0#0#C:\Program Files\ArcGIS\com\esriGeoDatabaseDistributedUI.olb#ESRI GeoDatabaseDistributedUI Object Library*\G{52AE85C8-0A79-490E-A5E0-EAE86D8ACA6B}#1.0#0#C:\Program Files\ArcGIS\com\esriEditorExt.olb#ESRI EditorExt Object Library*\G{85A385F8-E07F-43B8-8BC2-E3593B9FC3F3}#1.0#0#C:\Program Files\ArcGIS\com\esriArcScan.olb#ESRI ArcScan Object Library*\G{D5FB57C1-ACDB-11D2-9F3A-00C04F8ED1D7}#1.0#0#C:\Program Files\ArcGIS\com\esriSpatialAnalystUI.olb#ESRI SpatialAnalystUI Object Library*\G{10DEE54B-98B4-4CBE-BC2B-6FDD12135D73}#1.0#0#C:\Program Files\ArcGIS\com\esriNetworkAnalystUI.olb#ESRI NetworkAnalystUI Object Library.*\G{E3AB636F-179C-41AE-AD09-AE965A79CCC1}#1.0#0#C:\Program Files\ArcGIS\com\esriGeoStatisticalAnalystUI.olb#ESRI GeoStatisticalAnalystUI Object Library*\G{C031A050-82C6-4F8F-8836-5692631CFFE6}#1.0#0#C:\Program Files\ArcGIS\com\esriGeoprocessing.olb#ESRI Geoprocessing Object Library*\G{0D452EE1-E08F-101A-852E-02608C4D0BB4}#2.0#0#C:\Windows\system32\FM20.DLL#Microsoft Forms 2.0 Object Library*\G{A0D719D8-6664-4FDB-B082-8924A1D1B6BE}#2.0#0#C:\Users\Ron\AppData\Local\Temp\VBE\MSForms.exd#Microsoft Forms 2.0 Object Library.E .`M *\G{77E512AB-FD7D-11D2-9F44-00C04F6BC61A}#1.0#0#C:\Program Files\ArcGIS\Bin\UIControls.dll#ESRI UIControls*\G{4551A308-ED35-4E15-8438-B431D6F61E6B}#1.0#0#C:\Users\Ron\AppData\Local\Temp\APC\esriFramework\UICONTROLSLib.exd#ESRI UIControlsw}DOk H3ThisDocument0?48d3fc99ThisDocument_8ZModule10@48d3fc99HModule1 =8U0frmRasterSamplingOptions0B48d40929 0frmRasterSamplingOptions&(8X&oP` CIf`3)H;nIvj9\6x8'qXax2oxIC M_N . as bByValCall.Debug=dimBDoubleCeachDelseHendifQfTFor^GoTo_Ifa ImplementskIsxlongyloopNameNothingNullOnPrivatePublicRSetSubThenToTrueTypeOfuntilwendWhileWith esriFrameworkG VBAWin16~Win32MacVBA6#Project1  stdole` Project- ThisDocument< _Evaluate Normal (esriArcMap|%(VBIDEA (esriSystem (esriSystemUI (esriGeometry (esriDisplay(esriGeoDatabase5(esriDataSourcesRaster(esriDataSourcesOleDB(esriDataSourcesFile`(esriDataSourcesGDB-- (esriOutputGL(esriGeoDatabaseDistributed"(esriGeoDatabaseExtensions (esriCarto1 (esriLocation(esriNetworkAnalysis(esriGeoAnalyst| (esri3DAnalyst(esriGeoStatisticalAnalystC(esriSpatialAnalyst (esriNetworkAnalyst(esriGeoDatabaseUI` (esriCatalog` (esriCatalogUI, (esriCartoUIe(esriDataSourcesRasterUI (esriDisplayUI (esriOutputUIi (esriArcMapUI(esriArcCatalogUIj (esriEditorO(esriGeoReferenceUI(esriLocationUI(esriGeoDatabaseDistributedUI= (esriEditorExt (esriArcScan' (esriSpatialAnalystUIy(esriNetworkAnalystUI(esriGeoStatisticalAnalystUIK(esriGeoprocessingm MxDocument- UserForm1) MSFormsCcmbSelectInput_ClickCexampleh" pGxDialogϷ IGxDialog3GxDialogn, pGxObject IEnumGxObjectAbObjectSelectedhpFilterIGxObjectFilterZ] GxFilterFilesAllowMultiSelect ButtonCaptionTitle~ ObjectFilter DoModalOpenyParenthWnd/ pGxDataFilerIGxFile.txtInput'Path2 cmbViewInput@7VisibleTrim@ txtOutput=cmbSortEnabled۪ _B_var_ifP _B_var_Set_B_var_txtInputx_B_var_cmbViewInput_B_var_txtOutput _B_var_TrimmT_B_var_cmbSortUserFormNTextBox1STextBox2SLabel1,Label2, Label2_Click QuickSortDemoytxtInputFileNameӊtxtOutputFileName^lblInputI lblOutputjcmdSelectInputcmdSelectOutput cmdEditInput6K cmdEditOutput OptionButton1k@ OptionButton2l@OptionButton2_Click/ optAscendingm optDescendingCommandButton1|CommandButton1_ClickcmdSortcmdClosej UICONTROLSLibRUIButtonControl1UIButtonControl1_Click#ClickfrmQuickSortDemoiShowtxtInputFileName_ChangeAcmbSelectInput.._B_var_txtInputFileNameL_B_var_txtOutputFileName QuickSortkeyarrdataarr!numEls> descending%dvalueKtempkey$tempdatavRsp$_leftStkf|rightStkleftNdxf_rightNdx inverseOrderi`ja IsMissingcmdEditOutput_Click>UserForm_ClickmsgOut _B_var_msgOut`MsgBoxRJu]RiRo^RonQhQu^QuiQuic(QuickTQuickSFaQuickSoQuickSor@ QuickSortM QuickSortMa QuickSortMac QuickSortMacrQuickSortMacrom Module1bUserForm_Initialize5c InitializeN_B_var_cmbSelectInputcmdEditInput_Click1 commandstre ReturnCode.Notepadexe@ShellV vbNormalFocusnote>cmdClose_Click!PHide9zcmdSelectInput_ClickNcmdSelectOutput_Clickvf_B_var_GxDialog cmdSort_Click_B_var_QuickSortPboolDirectionFlagboolSearchDescending lNumElements<LineNoGEOFinfile} LineStringinputArr LineNumberArrn _B_var_CloseFileNamej _B_var_Openl InputFile9_B_var_InputFileC OutputFile9i_B_var_OutputFileFree InputFileNameCOutputFileName-Wrire[ _B_var_Wrire _B_var_Write This̹ _B_var_ThisSegmenteof^codewastakeni formtheSClasslectureOnly _B_var_Only+cCount0vnon NumElements LoopCount_B_var_InputFileNameK_B_var_OutputFileName+ _B_var_ReDim _B_var_CalltxtIntputFileNamefrmQuickSortDem& _B_var_OutputsInputFileNumberoOutputFileNumber/% _B_var_Read{ _B_var_forjLMyFormat& MyTagFormatͶ_B_var_MyTagFormat MyLnFormat*Ln^MyTag#MyLnThisTag ThisLnNum _B_var_RSetthe' _B_var_The8UserForm_QueryCloseCancel CloseMode؟ QueryCloseTOutZ _B_var_Outk} _B_var_UBounddWorkscmdSelectOutput_Click DoModalSaveB_B_var_IEnumGxObject$_B_var_IGxObjectFilterF FinalLocationDFullNameОFullNam AnyStringMyStrRight  _B_var_Right9 _B_var_Next'ofrmLamAP2 cmdAddLayer{cmdRemoveLayer% cmdShowAttFields1 cmdClearMap#2 cmdMoveDown cmdMoveUp cmdSummarytxtMintxtMaxf  txtAverage lstAttributesklblMinlblMax lblAverage lblLayerList#{lblAttributeList lstLayers>cmdAddLayer_Click.2GxFilterDatasets pFLayerIZ IFeatureLayer FeatureLayer' FeatureClass% pGxDatasetDataset(pMapAddLayer0(pMxDoc?V ActivatedViewnRefreshDisplayLayerNamesS layercounter)2lstLayer8Clear LayerCountAddItem LayerlstLayers_Click5~ MyChangeColor  IMxDocument5FocusMapIMapTpGFLayer IGeoFeatureLayer] RendererISimpleRenderer pRenderer JSymbolISimpleFillSymbolAupFillSympColor IRgbColorColor2FRgbColor86RedGreenBluetempR ActiveViewwUpdateContents5 frmSetColor _B_var_Exit_B_var_pGxDatasetY IGxDataset'_B_var_FeatureLayer!a_B_var_FeatureClassU_B_var_IFeatureLayer{FeatureDatasetHypFeatWksIFeatureWorkspace{ pFeatClass! IFeatureClass= pFeatLayerpDataSetkIDataset-g pShpWksFact{ShapefileWorkspaceFactoryp OpenFromFileL,OpenFeatureClassW Application*Documentj_B_var_pShpWksFactIWorkspaceFactory _B_var_ShapefileWorkspaceFactory Debugprint__B_var_Debugprintc DatasetNamez WorkspaceNameX BrowseName Workspace3PathName'testing_B_var_testing _B_var_Debugۮ_B_var_IFeatureWorkspaceL_B_var_IMxDocument_B_var_IDataset>_B_var_IFeatureClass۷_B_var_OpenFromFileecmbAddLayer_ClickcmbRemovelayer_Click  ListIndexQ DeleteLayer { RemoveItemZ ListCount6cmbRemoveLayer9/lstLayer_Click cmbShowAtt> lstAttListDcmbDownWDcmbUpX cmbDown_ClickupositiontempstrQList* MoveLayer: cmbUp_ClickscmbShowAtt_Click/fcount'pFieldsIFieldsaFieldatIField)Fields7 FieldCount>oField3lstAttList_Click>atttypeattstr{9cmbStatsZ{cmbStats_ClicknrecordZattminattmaxattsum9tempval^pCursorNIFeatureCursor_Search FeatureCountzaFeature/IFeature_% NextFeaturecmbClearMap_ClickYb ClearLayersW_B_var_IGxDataset7xxcmdAddLayer_Click'kkcmdAddLayer_ClickAwwcmdAddLayer_Clickf! cmbClearMap} cmbAddLayer Label3,Label4,Label5,Reset>cmdRemoveLayer_Clickˢ_B_var_cmbShowAttiM_B_var_cmbRemoveLayercmdDown2hcmdUp _B_var_lstLayer/_B_var_cmdDownkheref _B_var_hereGcmdClearMap_Click8_B_var_cmbStatsRcmdMoveDown_ClickMyK^MyIndextempItemG OriginalIndex ThisItemJMove>yMov̴ _B_var_MovqcmdMoveUp_ClickNewIndexThisLayerIndexTacmdShowAttFields_Click_B_var_lstAttListocmdSummary_Click1lstAttributes_Click 7 _B_var_FormatPg SelectionZ ShowSelection{removalNumberOfFields:TotalNumberOfFields ThisField"Lab4eArcMapLayersDisplayDuexNov% IntroductionHoorayHNoj^morexYouwillJCreateMLAMdToolwhatC instructor shapefilesuseOneHgoodGhttpgroutine$ ThisFeatureCTotalNumFeatures ValueOfThis@ValueOfThisAttribute MinimumValue& MaximumValue SumOfValues_B_var_tempvaldb_B_var_Nothing$Sshortw _B_var_nrecordN _B_var_Longdisplaysall'tAttributeStringn AttributeTypeRXXXX(UIToolControl1 UI_PatToolUI_PatTool_SelectuUI_PatTool_CursorIDGpUITool_Select_CursorIDCursorIDQUI_PatTool_ToolTipGTooltip[EUI_PatTool_MouseDown*buttonshiftxoylpEnvƓ IEnvelope pRubberEnvZ IRubberBandRubberEnvelopeTTrackNew ScreenDisplaypElemIElementRectangleElementGeometryw  MouseDowns _B_var_pMxDoc _B_var_IMapCpFillShapeElemIFillShapeElementP pFillSymbol IFillSymbol_IColor< pLineSymbol% ILineSymbolOutline5 Transparency pGContainer IGraphicsContainer` AddElement}pCmdItemH ICommandItem CommandBars FindnArcIDcBEdit_SelectAllDExecuteYperform?mAXpSFilterISpatialFilterpFCursor pFeaturev SpatialFilter SpatialRelUesriSpatialRelIntersectsmpAreaTIAreaSumareaShapeAreaBmight;wantS _B_var_ISpatialFilterjMake,sure:canD}be\_B_var_IGraphicsContainerDeleteAllElements޴ _B_var_IAreaPolygonNFeature!>DataSourceTypeOsj_B_var_IFeature'_B_var_IFeatureCursorpFClassN FeatureType ShapeTypeQXShapeFieldName.esriGeometryPolygon/NumSelectedFeaturesWu_B_var_i Sum SumOfAllAreasXNum _B_var_nUM x _B_var_WhileIf _B_var_Wend _B_var_DoesriGeometryNullOesriGeometryPointFesriGeometryMultipoint0An\esriGeometryLineesriGeometryCircularArcOesriGeometryEllipticArcHesriGeometryBezier3CurvehesriGeometryPath esriGeometryPolylineͶesriGeometryRingesriGeometryEnvelopekesriGeometryAnyesriGeometryBag"esriGeometryMultiPatchesriGeometryTriangleStripTesriGeometryTriangleFan@esriGeometryRayesriGeometrySpherePesriGeometryTrianglesOeGeoNames{__B_var_GeoNames7_B_var_Variant GetGeoName` ThisGeoType"v _B_var_Select'EDescGP _B_var_Stringӊ Description NameOfGeometryType[esriSpatialRelContainsfcuntiontperformsnearly{!workk associatedeesriUnknownUnits esriInchesPyInches#& esriPointsLnPointsesriFeetFeet esriYardsYards esriMilesjMilesUesriNauticalMilesNautical~@esriMillimeters MillimetersWesriCentimetersG Centimetersb esriMeters>MetersresriKilometers KilometersNsesriDecimalDegreesesriDecimeters3 DecimetersNameOfMapUnits}Y ThisMapUnit6 DistanceUnits( AreaString/Query_SelectByGraphicsQuery_ZoomToSelected7SamplePanZoom_FullExtentUI_PatTool_Deactivateyg DeactivatejUsers^zUITool<ControlPlease referSetting|Cursorlfirstzshould (cZpPrevExt- m_pActiveViewWExtentOpNewExtm_pFeedbackEnv pPrevCloneIClone pNewCloneCloneExpand$d dNewWidthײ dNewHeightHeight|pFullExtH FullExtentT dFullWidthV dFullHeightp xzoomLimitX yzoomLimit{m_bIsMouseDownZoomToњ _B_var_pMap!_B_var_IElement IActiveViewD pActiveViewlpMapsActiveView~pMapAct0Zoom _B_var_ZoomrvmpMySetSISetu IGxObjecth pEnumGxObjectpGxObjectFilter& sFullPathNamev+objresponseanythingSelectedm_pAppJCurrentContentsView[I SelectedItem*IsEmpty ILayerUI_RasterSamplingUI_RasterSampling_SelectUI_RasterSampling_ToolTip\UUI_RasterSampling_CursorIDkUI_RasterSampling_MouseDownPqpLayerK[ SelectedLayer53 IRasterLayerh_B_var_IRasterLayerpRLayer[ RasterLayer:RowCountu ColumnCount$Query%ttM_pRasterIRasterOpRasLyrRastera$pRasterBandCol"IRasterBandCollection] pRawPixel! IRawPixelsItemz pRasterProps IRasterPropsVpSizeXIPntfDblPnt SetCoords pPixelBlock IPixelBlock3CreatePixelBlockpPntthe PixelValue position_x*3 position_y'3GetVal:B_B_var_IEnvelopeMin _B_var_Minpxmin;ymin"xmaxymaxZMinwvZMaxYuMMaxkMMinl QueryCoords. QueryCoordEdxmindxmaxdymin~dymax}DoubleAlternatingScaleBare_B_var_RubberEnvelopeTotalU _B_var_TotalMaxȲ _B_var_Maxo_B_var_pRasLyr_B_var_IRasterProps3 Label1_ClickUI_RasterSampling_MouseUp#MouseUp _B_var_IPnt3 _B_var_DblPnt}w_B_var_IPixelBlock3  txtHeight`BtxtWidthe lblFilenameQ]Label6,Label7, txtPercentQLabel8, lblSampleSize+Label9, optRandom9b optRegularteqq^pBandCol} pRasterBand^- IRasterBandpRasterDatasetIRasterDataset  RasterDatasetL pRasterPtrUPntpTopLeftr _B_var_HeightWxH,from~ _B_var_Xonerror_B_var_onerrorn ErrorHandlerOtxtDD txtDegreesS txtMinutess txtSecondsLsize_B_var_IRawPixels net _B_var_netu Translateg_TranslateCoordinateToIndexSAddrey PixelAddress_B_var_FunctionOConvert_B_var_ConvertyWKSPointsMap2PixelTransformNConvertPixelsToMapUnits0 pixelUnitsIrealWorldDisplayExtent{$ pixelExtent_sizeOfOnePixel pDT>IDisplayTransformationv deviceRECT ?tagRECT pMxDocument"DisplayTransformation? DeviceFrameIJ VisibleBoundsX< _B_var_fromESRI`SamplesXTop5bottomH{_B_var_IDisplayTransformation>Module2cAddrpPoint3IPointʔ ToMapPoint pBlockSizet IPixelBlockvValueh sPixelVals)dXSize dYSize$pPixeltPlanes5 StatusBarʜMessageendsub: _B_var_EndF!(DisplayRasterCellValueInStatusBartakesn Part~Startby\enteringcarefulreading̀pSpatialRefFactoryيISpatialReferenceFactory$SpatialReferenceEnvironmentpProjectedCoodinateSystemgIProjectedCoordinateSystem CreateProjectedCoordinateSystem+.esriSRProjCS_World_CassinisMessagemRoundpGeographicCoordinateSystemΫIGeographicCoordinateSystem CreateGeographicCoordinateSystem1esriSRGeoCS_WGS1984ӔFooBarttttUIToolControl1_MouseDownpClone™ pGeometryؖ IGeometry< pSpatialRefISpatialReferenceDpGeographicCoordSysPCurrentLocationW esriSRGeoCS_NAD1983}SetFalseOriginAndUnitsttt _B_var_tttUI_RasterSampling_MouseMoveSd MouseMovevUI_RasterSampling_MessageaUIEditBoxControl_Messageq&"_B_var_SpatialReferenceEnvironment2pixels_B_var_pRaster~_B_var_IActiveView%pPixelXY:WKSPointXlateMapToGeoCoordinatePmapCoordgeoCoordMapAddrGeoAddrWhXlateMapToGeoAddr MapToGeoAddr GeoToMapAddrڕInitCoversionDataPtktagPOINT4_B_var_tagPOINTZPixelsToMapUnitslMapUnitso_B_var_MapUnits7_B_var_IPixelBlockCreatePixelBlockFromEnvelope* _B_var_pixels,tlcPnt'pGlobalPixelBlockW_B_var_tagRECTpixelHorizontalExtentVpixelVerticalExtentrealHortizontalExtent_realVerticalExtentgeoHortizontalExtentgeoVerticalExtent,Vertical]VerticalSizeOfOnePixel[HorizontalSizeOfOnePixel"VerticalPixelSizeťHorizontalPixelSizeNDpVisibleBounds_B_var_pPixelBlock_B_var_IRasterC_B_var_ErrorHandlerSPixelse]_B_var_PixelseQ PixelBlockn_B_var_PixelBlockuSpatialReferenceD< GetDomain%oGeoXMin[GeoXMax|ZGeoYMin GeoYMaxc pLyr4 _B_var_pLyrapSpatialReference# pRasterExtentx?_B_var_IRasterBandCollectionModule3dClass1+CreateRasterIndexPm_pGxAppKesriCoreIGxApplication`ICommandTICommand_Bitmap¸ OLE_HANDLE(oICommand_Caption@ICommand_CategoryGICommand_CheckedICommand_EnabledICommand_HelpContextIDTICommand_HelpFileICommand_Message/ ICommand_NameICommand_OnClick frmImagesInit\[vbModaltICommand_OnCreatewEhookICommand_Tooltip  GetPixelValueERHeCreateDefaultRaster pTLCPoint5i pRawPixelso pSizePointDe pPixBlock2^ErroImportiarcgisscripting sysgph]tryInRasternInPropertyTypeProcessHGetRasterPropertiesexceptp GetMessagesZ CreatePixelBlockFromEnvelopexxxxGetRasterLayerBoundsXi_B_var_GetRasterLayerBoundsc RasterXmint RasterXmaxs RasterYmin# RasterYmaxg" pSelectionEnv GetSelectionEnvelopej_B_var_GetSelectionEnvelopeqwm(CreatePixelBlockForSelection_B_var_pGContaineroCallGetUserParameters>_B_var_CallGetUserParameters2GetUserParameters{ frmRasterSamplingOptionstxtHeightInPixelstxtWidthInPixels1txtRasterSizeInPixelstxtPercent_ChangetxtSelectionSizeInPixelsgChangeCaptionxPublicSelectionSize[PublicSelectionSizeInPixelsBPublicHeightInPixelsNPublicWidthInPixelslblUserErrorMsg CallPerformSamplingS_B_var_CallPerformSamplingPerformSamplingNumberOfSample8 GetNextPixel\/_B_var_GetNextPixel9x PixelMapAddrZFg^_B_var_g PixelGeoAddrRow _B_var_Row SamplesPerCol_B_var_SamplesPerCol NumberOfRows| (PerformRandomSampling(GetNextRandomPixelPRndRoptRandooptRand;optRan^'optRa optR optop^ofGenerate GeoAddressFromSelctionPixel"_B_var_GeoAddressFromSelctionPixel(GeoAddressOfSelctionPixel!lblFileName_ClicktxtFileName_Click txtFilenamed cmdGetFileWcmdGetFile_Click%ncmdGetFilenamex]txtGetFileName_ClickcmdGetFilename_Click_B_var_IGxDialogcmd~SortcmdBeginSampling.cmdBeginSampling_ClickwGeoAddressOfSelectionPixelZLonkLatk_B_var_RasterXminGettingDisplayParametersprasg pGeoDataSet~ IGeoDataset XXXXXXzz1`GetFalseOriginAndUnitsFd[dymxdymaxn(HRemarksU6 _B_var_dymaxn_B_var_ISpatialReferenceI pRasterLayer?DataFrameExtentE_B_var_IGeoDatasetpRasterLayerExtentf_B_var_pRasterExtent_B_var_IRubberBandpRasteHAreaDef]_B_var_GeoXMin_ PixelHeight PixelWidth_B_var_PixelWidthRLODInfoa_B_var_PixelHeight RasterAreaDefq* GeoHeight"GeoWidthTpPublicRasterLayerAreapPublicSelectionArea? (GetRasterDef6 pRasterDefc(PublicRasterLayerArea+(PublicSelectionArea,IEnvelopNIEnveloIEnvelGIEnveIEnv+IEnIE]pEn]pE^ _B_var_dxmin _B_var_xminhPPixelDimensionsi_B_var_PixelDimensions _WKSPoint_B_var_WKSPoint|HeightInPixels5 WidthInPixels _B_var_HeightInPixelsixel: _B_var_ixel(GetSelectionDefdj_B_var_GetSelectionDefS PixelDimsN(PublicPixelDimensions:WKSPoinҭWKSPoiFWKSPoN)WKSPVWKSVWK__B_var_pRasterLayerExtent8_B_var_pRasterPropsN _B_var_Raster UserMadeSelection#}_B_var_UserMadeSelection0enidDmsgbosR _B_var_msgbos;_B_var_RasterAreaDefN _B_var_MMin instanceR IGPProcess ddd instance1"_B_var_instance*Minimum_B_var_MinimumCIntAbs_B_var_CIntAbsD"_B_var_PublicSelectionSizeInPixels+_B_var_PublicHeightInPixels_B_var_PublicWidthInPixels temp2MClblSampleSize_Clickztemp3NC tSampleSizeWttxtSelectionSizeInPixelsrtSelectionSizeInPixels<tPercentS _B_var_temp_B_var_txtSelectionSizeInPixels_B_var_txtHeightInPixels#I_B_var_txtWidthInPixels+ lblPercent/_B_var_lblPercent ttPercentpU tPercentpw_B_var_tPercentppBrowseForOutputstrNameZGXDIALOG_BUTTONBGXDIALOG_TITLEpGxObjectFilterCollection%}IGxObjectFilterCollectionl=pESRILicenseInfo^IESRILicenseInfo6RRemoveAllFiltersGxFilterShapefilesD AddFilterGxFilterPGDBFeatureClassesESRILicenseInfoIDefaultProductesriProductCodeViewerGxFilterSDEFeatureClassesReplacingObject vbCritical+}MESSAGEBOX_TITLEn_B_var_PerformSampling!atHeight\tWidth=tSize JustMyTest_B_var_t_B_var_JustMyTest|ExecuteCmdCatalog%pDoc IDocumentVpCmdBars_} ICommandBarspItemA6Geography_FullExtenthArcToolbox_ShowCommandLine4o VBProjectOh4ArcToolbox_ShowCommandLineArcToolbox_ShowCommandLinenmModule4eData;types(OpenDialogandSampletlcSelectionArea`SelectionAreaSizef(GlobalPixelBlockuser_B_var_PublicRasterLayerArea_B_var_GetRasterDef_B_var_PtSelectionSize# _B_var_tSizelblSelectionSizeInPixels Label10@txtHeightInPixels_ChangelblHeightInPixels_PlblWidthInPixels CheckBox1CheckBox1_ClicklchkPreserveFrame6(GlobalPreserveSelectionFrameychkPreserveFrame_Click+txtFilename_Change1(GlobalOutputFileNamelbadw BadNumber _B_var_On6GotOne _B_var_GotOneVL_B_var_BadNumberb _B_var_Sub_B_var_position_x_B_var_PixelValue)P_B_var_WidthInPixels~Glo@ PixelTypexa PT_UNKNOWN FPixelKPT_U1PT_U2PT_U4PT_UCHARPT_CHAR! PT_USHORTPT_SHORTPT_ULONGPT_LONGrPT_FLOAT7_ PT_DOUBLE PT_COMPLEX PT_DCOMPLEX(CannotHandleThisPixelType$ _B_var_CannotHandleThisPixelType$8 ThisPixelType rstPixelTypeGld]TypeName pInRasProps pInPixelBlock9 NoDataValue^ vSafeArray P pOutRasPropsRasterNoDataVale,a_B_var_RasterNoDataVale&RasterNoDataValue`I _B_var_LooppubNumberOfSamplesPixelsWithNoData_B_var_optRegularad~\ _B_var_ad& recompute ^_B_var_recomputeWreflectpdb)d*f+h,n-I  0. " $ & ( * ,.02468:<>@BDFHJLNP R!T"V#X$Z%\&^'`(=f6@@@pt(&oAwL,qIhQK0y̆抑E1_il Ixl IoAwL,MEX @SPSSS@ 8     *X     *     0,P2 ( H 6 0    R   '  8 0 x   " ( p B D    (  ) p   <  .    x  @ ,P H .8       F $@      "H   ! 0 "  h  0   $P   8  #0 #  P  ! 0  !   @   ho( \ (o $ $(dq8o`d o 0 sampling till a file is successfully selected u1 of the GIS Programming course taught by Dr Duh# Declare and Initialize variables].t'$]`]x] .w'$$ Initialize and open mini browser.;n t9$ Only one filelnSelect9Select Output File9lnln =( no filtering (empty filter) Final Project:q" Raster sampling application ~G|j global variable t! (  \ (t it i !!7'~m5 ( tp8 This code was taken from the code presented in week 48  (( 5 5 '  ( '$ 5 ( (]h   @ Ron MosgroveA If user didn't select anything, get out. the user can't start) With a file we can enable the samplingx 0(  (( d $ d' ( !' nc8o !' H] $ d  $  5 5 ' qk  ( $ d'  ( must  ( 1 an  ( T& Ensure the percentage is reasonable t!' K Get the file specified by the user and put it in the text box and in the $!X'$ H $('$  ( must!Percent must be between 1 and 100  (  P H'$ P  $( Bad !Percent must be between 1 and 100  ( ] ( ' stk Finished  ( x8 Finished:  NO DATA Pixels  (  Save the user's choice User hit the begin buttonregion; User clicked in the % text box, make sure the % is valided to 6 We get bad input, just set to the default and go oncent recompute the sample sizeTS_5 This is the dialog that drives the sampling event.RC> and recompute the sample size to reflect the new percentageb\@ The selection size hasn't changed but we don't keep it aroundE anywhere as a numeric value_H Init the dialog boxGIAttribute VB_Name = "frmRasterSamplingOptions"  Bas0{4971ADA6-68AF-4B51-99011CF03079CC}{8AE6F686-E891@-45E8-$7-C315F6901} dGlobalSpacAoFalse CreatablPredeclaIdTru BExpose0TeateDerivCustomizD 0licit  ' Final Project: D s apcaĆRon Mosgrovf) This the dialog that *d]se+event. P9 Sub chk@Mserve$Fr@_C@/k(>)/(SaveBu 'soic@$ lblUErrorMsg.Caw”@|  zES|el@E@ M$.valq End,&0mdBeginű0J%$P hit/b 1tonCA.Dim PixelsWithNoD As LongB\78= PerfondoNm*C CIf> 0 The)A(X ished: " &&NO DATA{2` El a ds1IfEH3KmdGetFilenK' BXcode wa Vaken from"50pres@W`qin week 46@ofGIS!k g`Wm` courtaught by Dr Dtuh_8"#DC a!nit@lize vari-!se GpGlxDpFISet = New +$Ob!OIEnumGx{abf"` BooleaD-%Cdeme !Ia!op4-i brow}a c gGc.AllowMultic@}B' Only o0ne f EBu>ttȈcd5 Ti t" Outpdutle0.7C'#p$' \no&H(t>yAa/= .DoModal(YDocum PЀhWnd( b+f dn't s@Nyth, gG`out. ]Bca"tare till aesucces0sful@edG PHSHmPT`cS?A9$?  specifi`+9qk A%!@>atex;ox73gv8ce# eĎ7.NaIxj= dk8 2.we  Mb`( ecdcLj.EnADWA*n{Ttxt0dcp%_Change!zmcq{% 5, mpU sur{%!!0ui reco>m  Nto ref!zRnpKperqagӈcaG qGqs, t39}SJueI?cS_hjsOn GoTo BadNumberS6 = CInt(ws9b GotOnd Fp!We9@bad in,\ j ) Or 7< 1)XOOOxGaݏ =UAKՋqSr=Pub4+ASO Q[. s.hasAZc:d doAkeep NarounyXanywhe:a cN1 6hHei InC * .Width [ a OAN 3mtҬ<=p?* !) /! 8X( rgɿOF_GQA8box2Q''05_Mng_MSq_Mbcqϓ?uϱ v6,o+onj+ϰ lblWidthInPixels.Capti@on = . `  Heightf 2htSelecSize3 ) *o@End With  R s ?@ABCDEFGHIJKLMNOPQRSTUVWXYZ\]^_`abcdefghijkpqst@ a====Q>y>>>:?)?9Q?y???? @a7Y@@0 x  0 H  0   0   0 0   0  0   0  $V=xpx $lp=tp6dllhpt p h Qdl)ph[p=`p??` C<[p=$p2D px $p l pd,hlDpx $p $ lh )ph+hlDpx $p $ lh= \)ph,dl`hp\ X p  QdX)hpp\ X lp= 8p?h8 D h t p8 D p oot0)ph?h8 D h | p8 D p oot()ph 8 o0l t0 8  o(l t(:p8 D p t l Dooo09$ p:l Lp8 D p ooo(9$ p,lXdl$hp\ X p )hdp$@ X l dN l<0C<  l<*1<!l@X ,Hl<HK#*1?@ABCDEFGHIJKLMNOPQRSTUVWXZ[\]^_`an 2["U =xRRHHMEh@<0, $8D8 b8 8 f8 H  8 <<<( ( ( ( (4( d<@8 <  LL   "<<<<<<<<<<<<<<<<<<<<<<<<<<<<<8H0l%80( % %%8p%@ xhX% pp8 l ` kP==Yi pii Jx  `JFF) EE x@% p`% %( lhD XhD$% xd@D(%ꀪ  @A%aD%A%ꀰ 0@t @hp @ h %) A%) A%% hh ghj 0Jhl HDhn ` Dh x Dh ((?\h 00\Wh  44D %$%4%@% h@%i \ % fPtX<% lx@@0% p`4% \ % X,%`H `D`@`< 8X(%`0`( x$4%A%A% \@ @x @% (@) 8 + H`z ( (%`@ @%`h`d p )   ``JX>>F  0 `|J4% d`T ` T   `TJp 00) `5. P+* `0J  ) @ ) p h 88  x HH 0 0  @d Curr`P'` <er,  ($ D `|   J @) eastF @ @)  X  +( `J55$@  @p  i i@`@`( P` x 8@  @  @ @  , @ 8 , @ (@ H 4p 9h@ @ (@ @ @ @ @ @ @ @ @ @ @ @ @| @t @@p @l @h d`8` (z @h pX @H 8 @(  @ ( `@x p( @ @ @ @ @ @ 0@ @ @ @ 8@ @ @  ` p  @h ht @` @T hh(h(@h@  z XpXpp8 pXx H(  * X`hp P00h hX h@ (  @ @ P`p @ @ @ @ "8Pl ( D PX`hpx xH 0 H3*\R21*#5*\Rb*#c*\R12*#82*\R12*#2b5*\R6*$99*\R8*#a*\Ra*#cb$*\Rffff*0@48d3fc99(*\Rffff*0@48d3fc99\0*\Rb*#32*\Ra*#d3*\R8*#b*\Ra*#cf*\Rb*#17*\R12*#1c4*\R6*#28*\R1*#1*\R1*#2*\Ra*#d2*\R9*#1c*\R9*#1b$*\Rffff*0?48d3fc99(   8 (@ h p   J  x  ^ Hh  X"`""",*0(`(08 . B  x  T  .h & & & : 0P < 2 < 28 Bp D . @0 @T p "   T D     ( 8 @ PX p x    : <+h      r0O`              h  8 6=  P X "  `  \