198
Is it possible to change the header's visual appearance (EBN)

With AxPropertiesList1
	.BeginUpdate()
	.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
	.HeaderVisible = True
	.GetOcx().BackColorHeader = &H1000000
	.HeaderHeight = 22
	.EndUpdate()
End With
197
Is it possible to change the header's visual appearance

With AxPropertiesList1
	.BeginUpdate()
	.HeaderVisible = True
	.HeaderAppearance = EXPROPERTIESLISTLib.AppearanceEnum.Etched
	.HeaderHeight = 22
	.EndUpdate()
End With
196
ImageSize property on 32 (specifies the size of control' icons/images/check-boxes/radio-buttons)

With AxPropertiesList1
	.BeginUpdate()
	.ImageSize = 32
	.DefaultItemHeight = 36
	.HeaderHeight = .DefaultItemHeight
	.Font.Size = 16
	.ToolTipFont.Size = AxPropertiesList1.Font.Size
	.FilterBarFont.Size = AxPropertiesList1.Font.Size
	.Indent = 26
	.DescriptionHeight = 96
	.DisplayBoolAs = EXPROPERTIESLISTLib.DisplayBoolEnum.exBoolCheck
	.FilterBarPromptVisible = EXPROPERTIESLISTLib.FilterBarVisibleEnum.exFilterBarVisible
	.HeaderVisible = True
	.Images("gBJJgBAIDAAEg4AEEKAD/hz/EMNh8TIRNGwAjEZAEXjAojKAjMLjABhkaABAk0plUrlktl0vmExmUzmk1m03nE5nU7nk9miAoE+oVDolFo1HpFJpU5h8Sf9OqFNqUOq" & _
"NUqdPq9VrFWrlbr1QpdhAFAkFis1ntFptVrtkrpszrNvmVxqk3uVtm1kmF3sdBvF/wGBmV+j9BYGHwWJulfxdax2NyFdx2JlV6l9Nw7AAGZymdz2Cy2GxErvWcz9ivlw" & _
"yV21cuxugwktzGIzmvwtl0+53U5y0a0Wazmmyu/3dCyOMyXHx/J5nIr9q3uyqnBxFN3G46ma4vb7mD2Ng4nZze00fDkHC7t7us2rOX5tguetpHRlmz4HVqnXk1PjHO+C" & _
"MPo9MBMC+j2vC8j7wS8cFNI4kBo05UIvfCT/NsnsApU+0Fqg/T+oy/kPxC0sEQfErKQK96+w28UWRI8UGvO8sTLS9r2PWmsMJTDTask3CsIbIEQRA3shOXEEAO/GclJ9" & _
"FEKrrA8FRbKMXRIlb0JxCkjS1LMswhCcvuel0cv26cSMa8Ufx+2sQwhEUoSXOCjSbLcnxjKc7sdKUVyq28NtVI71P9P7JxtQEapjQ6fzfM8zPfNE2PhIsLL63E40slk5" & _
"y7N89LcyU9SvMb3SdUc6VJLj5VLVLfO/PS9KzNFHUa/0XyBD0dxlS9cxhMlTRSoNXypPErWDPyfNS+MwprRNO0FD8wVVZ1AI08URwVRjtJ1WCn21QkkUrXVLVPQS/XIk" & _
"FgTxT9iONZ9xVTdq+L1eKg3kkF6Upe68XtfV51/MtrVjBlwYFL1ev8y1/P6/lyzzYl02wntj0RVFmS1Qa+M5as93QxEUW9e993rfmQ2+vy65M/mL1lhl/2bj2ByVduMt" & _
"NhCJT9hdz41nN14Ld12Z9UjfI/oUAaGseiw6+uFLLhcVabJOS5RqOE0BHlZ5VnEr5fOMs3st+aa/bbRzrJGV51Y0b0DbqaWXZD90hIsPbjWu52+6Wyadpe66hhO+P/Xi" & _
"oW5rD8ZbrUZuVg6n1dsE/cXmewu1m9PVwnd35/nueXho/NaJzmjc61W76esuT77eG8pTquy9TwWH8LEzG8RDfFalx3Gcfvna9rvG/cptGLd9tuI6TZOP5Fiqi99vea+X" & _
"4VRcBq/JZZtVQ9cwSs5lsXE372+a9z7PbfB3VVqHyvMctLto8uob6eV0m/cD6MN2v+T33t6sBut42vdv2bJ8a997x2maFJfK+qArbGJPEKE+1qTflMsIdW/GCJX17KcT" & _
"6/czr/X+u1g29B7j/4BQfWkkx4zIHisjhPCmE0K4SwtXM+d4BvHRwNZOoBph9IJvPek9d40FoMJxf691jj2ywQQcHEWET4XJwkTszlVqm2GokewxtBT1DpQjRxDN0rUV" & _
"DNKdC3lb6tzNOwh6upMSSYfv4YBCl/bsn9PxiFCEo7SI6Obc9HeOrnY8x4jtHtdpN4GRbaorhsbu18Pph5CiHymI0RpSXGJ/z2oUOxYxG858AyiI+bfJtuTcG5yelBJy" & _
"T8okhqFd4a5yxL0rvulYtKCsZiWxWkc1s1cRoxxwhA31DLE0mR9l9HqX8fJgTDmFMVH0MIsRzVYnwnMi1dyzmhLt2kS2pxIiU62Wj5ptQGlSYFakLonTUJNLKaM5Wzlf" & _
"fEkuFkk5wTrhVO2eE7G6lJhxFFYUZ55zmn0WuBCD4pzhirFCKkbomsOoIYmZx5p90LoYWGPdD5g0QmJRKYxbZ6zYoVQ2jVGylSak7KSkFH6RSjpHKFuU+YMyNo5SulkC" & _
"6I0vonTCitMXPoEpVS2H5FQfEqp2R1opIgAEkJISYARTCukOhmPNI5Ex/wzGHUsicMwA1LHgQ90Y/KpoQHAD+pB/R4NzIaMAB9Xaw1gqaAOsh/A/ptIkWUfhGK1kZH8R" & _
"gH5GqvgArqRmt4AAPrTroRofBGADkqr6Rmu4D7CEaHARiwpJrEEZsXXwlVjyMWRsaRqwdkLGNBABZmytmyMnaINZqyVpLR2ftKAAAdd6h2osbaskdiq4EZtgSmyNcbVW" & _
"RJNXe3AA7REar3b0stlAAXBtoRmvJGLjEYAHUWsFcwCD/rnaop9aEICMAPdK5hT6xpeuzdOtAgKuJeGfdq6ggEbkTvAP+p9UCHXrvKkcgIA==")
	With .VisualAppearance
		.Add(1,"gBFLBCJwBAEHhEJAAEhABfICg6AADACAxRDgMQBQKAAzQFAYbhkGCGAAGMZxRgmFgAQhFcZQSKUOQTDKMIziaQAGgkNQwCSLIwjNIsBxPFKVQChEYxSjKA40SJNUgyj" & _
"6CCY+QLIE5PfQgAL9I6eJABCCSQKkYx0HScRiwPBIbAZAYhCZqaKhWgkKI/WBQIABRDVLx5ESiLRtKy7Mq2bpvXBcNxXHalaztO68LxvKyqHb5fJ/PpgL4YHgmC4NQ7E" & _
"MRwF6rfbyfZ7Xg/ORPTijZ4sdzMHTzJyscx3HqfaBoOaZU5eMLceTUMofHIndxCcasPbsOatVqjG5sYjcGC3La9cz3Pq/bpuDCbMxuaK1TrYXr1TTrcofBDldAxXRKDx" & _
"RDWVhLnYOw9i6XxzjuXprCaOoKB6EwbiCZZCGOdZYlcT4xHmbhMnwNxtn+G5bmqdZ7n4Pw/i+X5zm+dQ9g4CAFjsfAJheOI8HsDoWDWTB/lwSAQkmA5PEgRYoDyDwYFY" & _
"FoFmGCBmBqBphDgRJ0gOTIYBGRB/lyRh0iSCZbjYWJzgWDwIjYLoLmMCJGDKDJjBgWgqG6YhyhGHRzA2aJ1mCABOAiOJvhCZBJBYRoRmSCQmEqEQimkAZgg8TZnDCV4U" & _
"kmCUmBKZYJGYWoWCUUhiFMNZckNUh2GENoaGaGZmgmJhqhqZpGGIEx2GYIxSGGGJdggWJth2Z4JmYeoemeSZ2H6H4hGmQhihyTRHGYLg7CiCgmgqIpokoNoOiOaJ4jqA" & _
"ochqaZGgaCxpAoZoaiaaJqEmWIcGgShcnCJwqEqFoR3YOoFlgchflqNouiuawHmWSYqGkWZQhcatzmaOoumuSp2j6L5bBaKo0GQKRnGGCxqiyCwmkqMpsksNpOGUGI7A" & _
"0ew1G0Rxlg0PptgsZuDG2Sx2l6N5tnYNZZjUDRXDCVo5l2FoymqOpukuNpujubwLjmWY5k0ZwxkaFxYlWdp6j6b5Lnafo/nABQdg2FxcUsY5BkmXAkmeQpckwNRrkKTh" & _
"8CSHZBk4NwyC4KxxgMDwakOMZDn8GgwnGAo2C4cwthMcwmCcMoHBMHRehwTIghySYNksZwcH4HBMEsHx5hyPItiweYxnwSZEH4Mozn0fR+DMAo7EYJ50gkdZelKdNql2" & _
"UgJn0GIukwH4HicQRai2GI4mSVpNl0dZGledgNgcYpYDWUx3FsOQi5YV5anaTY3G6W53A2RxylydxFjiaxEFCCgBBAQ==")
		.Add(2,"gBFLBCJwBAEHhEJAAEhABcoFg6AADACAxRDgMQBQKAAzQFAYbhkGCGAAGMZxRgmFgAQhFcZQSKUOQTDKMIziaQAGgkNQwCSLIwjNIsBxPFKVQChEYxSjKA40SJNUgyj" & _
"6CCY+QLIE5PfQgAL9I6eJABCCSQKkYx0HScRiwPBIbAZAYhCZqaKhWgkKI/WBQIABRDVLx5ESiLRtKy7Mq2bpvXBcNxXHalaztO68LxvKyqHb5fJ/PpgL4YHgmC4NQ7E" & _
"MRwF6rfbyfZ7Xg/ORPTijZ4sdzMHTzJyscx3HqfaBoOaZU5eMLceTUMofHIndxCcasPbsLpOS5LNKsaxmWLYdhFdTxQi6LpvfA8BwXC6JY7heRYRbFbYxRjGNi1TS7G4" & _
"nGKd5WGuL4UHwI4VkaYxii8V4pgQMgVBQdQ5iCTYGi8T4vlWbJ3nuPg+l+H5AlSCg6ByPBoE8Ap3jqYxhBido5g0OgOGOGI4CsSpCCAcgcAuEokiEN5NCKfJ9DyTRjnS" & _
"cg1CEYxOBmBpPCgagdgcIZoHoGIFA4AxQkCAxKAgKBwgGSpIBCZhjF2E5UnQPQMiMCJBCIBwxkSQgsgo+JtDKT4ziiQw+k6EwAnsOgLnkHI+yCQ4iEuE4klkPhShEJBp" & _
"AoPgymOMoaDgHBjFMBgyD0HYTiCZSZhIIIGC4ChiHSew5kwM5omILZPiOBI0hwZw5kodIdA+M4Uj4PxOmMSJ9DuTQzmyZgviceZagaHVfj4awwmaAh2GUIYmCOEZZDaD" & _
"RDFGdwcg4EwyHMN4LBOaJbCoaZqgKH8qkMfIyD8DozDyfA7A0Coui0OpMmOZJdCsahKg6NooioChwmEMxLEoXJbDUTRXGSUgykyMgQG0GpPHMdI3D4TRCgSeQ0kmaw+l" & _
"GNAtCOZJVCiT5DhyRQwAqMg0EoDBBGEGAsASC5yiSCw+k4Mp6lWNQuksTpRjMTxDGzJwGmGMpDDKXYTECSAxl6Q5olkK4PgMMIVkASRMBMBgzEkaZEjsNALhIZA6AeQB" & _
"gk0ZJEgAAJ0CIAgODMNIsD6DRih9uYwFyAwfCUb5ijmbI+gwdxkk8MZMGeMpPCkDxzBiC5MHMPJLDSSROFMLIoBEQogEMFJPnENYQGgE4DCOaJfC7tYkhGTQ0kyWwyku" & _
"XpMiyRpKjKR4wngM4JmOWJACCdYtHMWw+Eych4nINYLAEYA8AgdAEEsQZajaQoog4GxPiMVIolcdxNG8XZVkmNoRwWRVBlFeFEeAZQJgnFiHgHwcAhjhHgGMSI5xki2C" & _
"yA4EQsA3i0HkBsLwKRFgAHcPkHopBJBcBeDUYI7xyDOHqKkWo2hLCsDIBIY4qQ5A8DoMMYwOAqCSBGKgU4yB2iDBwIgB4hxQgAAWNgBoAgsBdEcBUQ4sQ9A/HqD0JI8R" & _
"pBzH2OYVgahLBHFiJQJweQiDhDUE4SAARQAzFsG0EQwA6AOWSBkFgVAIBCHeGERQFQiCQHeFkC4vkiB8DyB4F4QxVDvGMNEOQexMjlBeOAKQiQLgfDA7QEAaRiBdEkH8" & _
"TI7AZiFBAGYBIABWjYBiGACioQ4C1A+AMMgWhfgxHgPsT4URIB0COKgPgjRwiAB8AYUArxBgCF6J4GY5hrAOCAPAAoGRRCsCIMEXATXfgAF8BMJwURuEQDgD4Q4OBoAe" & _
"HGFgLIwQrC2D0JoSQ+QvhrHoSgQI8AbDFGID8C4Ah6BQAQAASACwgCYCMAUMARAvCKAiAMCAokeCKBEOAKgCBoDaHuMsEAqwJDiACDURg8R6gPCyDofYWAhgoDIJ4ZAu" & _
"hoiGAYGgRoQw/A0GMMga4GwxiEDeIYYInATCDBQAoBAwAoDlA0KMBoVRGiDGwDQUYIRsgaGGDgM4LAwDWB8EcIA1APhjEgGQVwgRIgjFIIQHokgZA+CSEkLIKQSjHAwM" & _
"sCwDAsAEB2ABTIwRwD6A8CMToSxkAxE4HYIw+BsgbBEDAHYBwojCBoIYFgXSjABE4MsHIbQWhlGILQS4UhvBdAUKEEwHgxDAAABQQQUAhgKHiDwE4JS4A7BGLQZwCR4g" & _
"aBEMUYAqgKApHgGwVAIRNgvBMMQXImwZDtE4I8UIyAZCDCAE8AwrhgAdEEBACQLRCg4FEB4AYtA7CdEiPQMoJAMDNCkOMCAXAFDhH0D0Q4EgfAaGSK4NYzRUj9BuCgAg" & _
"swOBjB4Fqpw8B2ADAwE4A4Qx2DAE6JIaQPQGhAGKBcIQ5B5gHByKIFARwADbAyKUfgdBKBBGyEcVIAB/ijHoIoSA0gdBNl+OATYERZgBGSDYWIWAUCEGKA4FAhR7CIBt" & _
"YQGYZg4CMAiKEcAOwkBjHWE8Z4lQgA+DkBoTohwwCeAaMEEgBQCCABgHMRwQRhhMEWFQd4HwZgwDqFESItAbAGEANCpINAzANCCJkK4ah+heFYBURwsQrS2CsMYMoWGB" & _
"hYDWI0EInQgiApXaOVI1QFDsC8MUNoMBMA1HMJga4eh+BeAWOgNNowGjYzCGAAwax+iJBeBVT4gxoBIAGFsJFBxgBiGKFkKQ7g5DFFQEcAo4AzDDACKEQQLgCiJDYB0M" & _
"gRBCCQAgQEA==")
		.Add(3,"gBFLBCJwBAEHhEJAAEhABQ4Fg6AADACAxRDgMQBQKAAzQFAYbhkGCGAAGMZxRgmFgAQhFcZQSKUOQTDKMIziaQAGgkNQwCSLIwjNIsBxPFKVQChEYxSjKA40SJNUgyj" & _
"6CCY+QLIE5PfQgAL9I6eJABCCSQKkYx0HScRiwPBIbAZAYhCZqaKhWgkKI/WBQIABRDVLx5ESiLRtKy7Mq2bpvXBcNxXHalaztO68LxvKyqHb5fJ/PpgL4YHgmC4NQ7E" & _
"MRwF6rfbyfZ7Xg/ORPTijZ4sdzMHTzJyscx3HqfaBoOaZU5eMLceTUMofHIndxCcasPbsLpOS5LNKsaxmWLYdhFdTxQi6LpvfA8BwXC6JY7heRYRbFbYxRjGNi1TS7G4" & _
"nGKd5WGuL4UHwI4VkaYxii8V4pgQMgVBQdQ5iCTYGi8T4vlWbJ3nuPg+l+H5AlSCg6ByPBoE8Ap3jqYxhBido5g0OgOGOGI4CsSpCCAcgcAuEosiYN5NHMOJ+D4TpTnS" & _
"eQ7CEY4uBmBpPhgagdgcIZoHibIEyUBJZDQIJShoCgcCAcoyAQOYYlcZJ1D0DxDCiQgwEiAZMHEMJLFKPJ9D2DoDnidQ4k+Y5QmKEROBkIhKD0JIZDIS4TGUCQuEeEJj" & _
"nOIg8CuY4RkYNgwGMM5RllGpThDRYIGKZIpCkJFUH0PINyWcQ3CaaZCG+HBnEOTJhD8Tx4GoeQ/GcaZSHOH5nCmQhshoZhihYYwhiYA4RlkNoNEMUZ3ByDjwEsPxOnMa" & _
"J9DuDR6F6GYmCmKh0nANtMioP4Gg8aoSiIO5NhodociqaY6GaFYkEyOg8lsNRNTaUgykyMgQG0GpPiONJbD8DpDEyfA6k0KwOkWMQsGsAJU0SagwkoJQJDIPISCQCJTG" & _
"SUwyGaM4KkmMgtksHpFjAZ4TGCBAbgaSpcksdhNAMIJHHsD5TjSWWMAMOpwjyLwbk6cAz0KRJiDkDYzESCwiggcgcgYIQwCIEINCMCITj6TVxkMXp2j0cQLlCTo7E2F4" & _
"ymkMZdhMPJHDGHpLAyVg+k4UwrCCSIyByDJ8DuDY8CiWY0kiXAXC6QJwFKGIjCeJpjgyezjlyDw6klHx5myRoMGwZwbkcToTEiew4kwbQfEmUgPkOKJUD4DpTHSHQmgk" & _
"XI/ASTA1g0XIEDMTBimyfI7jSLYHEiUoPk0Fw/kadAsHGao8A0A5smEMJ2mNyg5gzJZwDgCpChyIZVyIZwFCMJEPASRkBqE+IcHInRcDxA2H4bIsx0AtDsIBpwZwYicD" & _
"6BscwDwUBgHCIYaIfgtiVH2O4WgUwJjEFeAEQA7y4hMCiBMS4aRdB9A4CYE4LxljyBMHcDItBxinDCLcTYmgejBFQ9UTg9gFBOEmAQTI7A4iZGMGkQAWQ7jYA2HIL8BR" & _
"AjDG4HcCwARbjZHiNoDw1nLDnGyNINQ+wjCpBMEgcovQUgICQJEcgWRuBvAyJ4d4ugpCUAINcHogxIgnDiM4N4axzD3F2JMTY/hRqYF6FsWIxhYAGGoAALQYgYirBwBE" & _
"BwpAjBEAAIEIYsA2gOHCMAGgXAACIDmMITAUgFABH0D0I4WwvhNFGMAOIvxRD2GKNcMA8gjAPDCPwBogRPAxA8PgRwZRICYDED8RAXQEghEAN8DIgwIBdB4JYWwMgtiQ" & _
"HoFQKAiRFguFKGwGQhglDsEOVwEQQRkCKBwOIHgSREDRBYHEXQcQdD7GIGARQHRxipBrMobgewDCUCADsEYWAzgMHKHQDQxxsDzA6EMfAeQHB4GQDkUYPA0iECiKoGgR" & _
"hcDdA2GMQA8AOCjDSPgHI4QnApAKBICwHg1A+BcAwcYsgbjGGQNkCIgRsA6EcBEWANADjsB0B8YYzQQDIGSBcEYZBCCPEkFIHQSgkgZAwG4IwBAbAYGGAgL4Ch4g8BOC" & _
"QAA2KKC0GcAke4AAXAFCoHkDw4xbBFEcJkE4JRSiEFeJYKQVRMgJHODwX4xAgC/AsIIZAeAHDRG0HYI40RKCLEGDUI4jAghwBWIceA+whCpHMFYZYOQxglDMHMBQGxYj" & _
"VHiAoBIPgfgHGwPsHYJRSB6A0IERQLhCjJHMA4OQoAoCOACLYGYSx8DpBQIMWQdRnDRH+DsE4fB3CeAmM67kAAXBFEIDYDI7wLBtEoEIfYNwjiUGGJQYQMAjCHEAO0C4" & _
"zxW29CoCgfIxR9AKA6J8BgUAIhDGMIoJ40hqgwCgKETgnBhhqCGI0AIqgZhGDANQDIlBDCRGkCoJISR0g1BSKQOgfAzBRG0DYHARh4DeDAOwANuw8ApCKKkYg/RPhjBs" & _
"H0J4yg5hPGWN0GwFBHQBFaDoQIURljFAoB4GgzRVzbBECQFQRQoguHGHANwDRdCKy8CgSIGwhhoDYJYYI1giBICSAEgI=")
		.Add(4,"gBFLBCJwBAEHhEJAAEhABUYCg6AADACAxRDgMQBQKAAzQFAYbhkGCGAAGMZxRgmFgAQhFcZQSKUOQTDKMIziYBYfgkMIgSbJUgDGAkRRdDSOYDmGQYDiCIoRShOMIjH" & _
"LUXxtDaIZwhEAoJb+RgAUY/cTzaAEUwHHiTKInaCQShsFYJUJAdRURQ9EwvCIZBpEWwLChENQwWLCNj2TScBwjCyqbale45ViqdoDU5EUiXJJ8ZxnECfYyrGjaMpCeKB" & _
"UrGYTVRBIMxLLSia5oeJqMrnBpNVrIUgXCAGFwHK6BcauXIIDp6XoWWRbAAWDpVVzNNC3YzkCIceADHKiXxmVz4JLdGZ1QTGID2XaYaxWK4oZjsVSc4KDHbETbHFi9Fo" & _
"3NaaxGisew+GYc4HlCR5NAAAIIEkQJSGMOgdE4RhYDwJJsAaAYQgmPpolCWgSCiBJzjcEIAkQXIBm8d5UhOQgCDUIBDDJDhgggJgKgKYJIDSVoDk8KBFF4OohEMZgWDs" & _
"YYDj4GoGmGSB2B6B5iAiBgYDsYRjGSbIJo4RgqDuIpIAoLoLmMCJGDKDJjJiLA7xqUAAgGTwYnYPoPmQCQGEKEJkEkFg9gGY44BoRoSmSSQ2EKEggHgRhShSZRJFYVoV" & _
"mWCRmFKFAgGOTheheZgJgYYoYmYSYWGaF4lkMMJ0hqZpJjYbobmcCZGHKHJmjmJh0h2Z4JmYcIaE8WZ2H6H5oAoBoCiCaBKBYfdjGoJoKiKaJKDaDojmkChGgmIgpCoV" & _
"oWiWaJZiSd4mmmSh2h6J5qAqBoiiiaY5iSeIpmqComiqKpqkqNouiuah6hqMIsmsSpWiuGhP1kOoumuSp2j6L5sAsBo54gKwWkaMZsgsJpKjKbJLDaRYxYWRpSjSbIZi" & _
"Se41m2CxmlqNptksdpejebR5iSfI4m4S4W16boLiaao6m5fJ9jubwLkaco8m8S5WnaPZunuOp4j6b5Lnac4SA0PAGlgP4wEwFwGkGcIMCcCpCnCCxiA8NYAAmMJfkSbh" & _
"FCcFpFnGDBnBqRpUhuEwTDeZ5lHCfw6HIQxLCaAxygyJwqgGcATE4FA6hWY4tjEAAQBAgIA==")
	End With
	.GetOcx().BackColorHeader = &H4c6c6c6
	.GetOcx().SelBackColor = &H4000000
	.SelForeColor = RGB(0,0,1)
	.set_Background(EXPROPERTIESLISTLib.BackgroundPartEnum.exCursorHoverColumn,-1)
	.set_Background(EXPROPERTIESLISTLib.BackgroundPartEnum.exHeaderFilterBarButton,67108864)
	.set_Background(EXPROPERTIESLISTLib.BackgroundPartEnum.exFooterFilterBarButton,67109119)
	.set_Background(EXPROPERTIESLISTLib.BackgroundPartEnum.exCheckBoxState0,16777216)
	.set_Background(EXPROPERTIESLISTLib.BackgroundPartEnum.exCheckBoxState1,33554432)
	.set_Background(EXPROPERTIESLISTLib.BackgroundPartEnum.exCheckBoxState2,50331648)
	.Select(AxPropertiesList1.GetOcx())
	.Sort()
	.EndUpdate()
End With
195
ImageSize property on 16 (default) (specifies the size of control' icons/images/check-boxes/radio-buttons)

With AxPropertiesList1
	.BeginUpdate()
	.ImageSize = 16
	.DisplayBoolAs = EXPROPERTIESLISTLib.DisplayBoolEnum.exBoolCheck
	.FilterBarPromptVisible = EXPROPERTIESLISTLib.FilterBarVisibleEnum.exFilterBarVisible
	.HeaderVisible = True
	.Images("gBJJgBAIDAAEg4AEEKAD/hz/EMNh8TIRNGwAjEZAEXjAojKAjMLjABhkaABAk0plUrlktl0vmExmUzmk1m03nE5nU7nk9miAoE+oVDolFo1HpFJpU5h8Sf9OqFNqUOq" & _
"NUqdPq9VrFWrlbr1QpdhAFAkFis1ntFptVrtkrpszrNvmVxqk3uVtm1kmF3sdBvF/wGBmV+j9BYGHwWJulfxdax2NyFdx2JlV6l9Nw7AAGZymdz2Cy2GxErvWcz9ivlw" & _
"yV21cuxugwktzGIzmvwtl0+53U5y0a0Wazmmyu/3dCyOMyXHx/J5nIr9q3uyqnBxFN3G46ma4vb7mD2Ng4nZze00fDkHC7t7us2rOX5tguetpHRlmz4HVqnXk1PjHO+C" & _
"MPo9MBMC+j2vC8j7wS8cFNI4kBo05UIvfCT/NsnsApU+0Fqg/T+oy/kPxC0sEQfErKQK96+w28UWRI8UGvO8sTLS9r2PWmsMJTDTask3CsIbIEQRA3shOXEEAO/GclJ9" & _
"FEKrrA8FRbKMXRIlb0JxCkjS1LMswhCcvuel0cv26cSMa8Ufx+2sQwhEUoSXOCjSbLcnxjKc7sdKUVyq28NtVI71P9P7JxtQEapjQ6fzfM8zPfNE2PhIsLL63E40slk5" & _
"y7N89LcyU9SvMb3SdUc6VJLj5VLVLfO/PS9KzNFHUa/0XyBD0dxlS9cxhMlTRSoNXypPErWDPyfNS+MwprRNO0FD8wVVZ1AI08URwVRjtJ1WCn21QkkUrXVLVPQS/XIk" & _
"FgTxT9iONZ9xVTdq+L1eKg3kkF6Upe68XtfV51/MtrVjBlwYFL1ev8y1/P6/lyzzYl02wntj0RVFmS1Qa+M5as93QxEUW9e993rfmQ2+vy65M/mL1lhl/2bj2ByVduMt" & _
"NhCJT9hdz41nN14Ld12Z9UjfI/oUAaGseiw6+uFLLhcVabJOS5RqOE0BHlZ5VnEr5fOMs3st+aa/bbRzrJGV51Y0b0DbqaWXZD90hIsPbjWu52+6Wyadpe66hhO+P/Xi" & _
"oW5rD8ZbrUZuVg6n1dsE/cXmewu1m9PVwnd35/nueXho/NaJzmjc61W76esuT77eG8pTquy9TwWH8LEzG8RDfFalx3Gcfvna9rvG/cptGLd9tuI6TZOP5Fiqi99vea+X" & _
"4VRcBq/JZZtVQ9cwSs5lsXE372+a9z7PbfB3VVqHyvMctLto8uob6eV0m/cD6MN2v+T33t6sBut42vdv2bJ8a997x2maFJfK+qArbGJPEKE+1qTflMsIdW/GCJX17KcT" & _
"6/czr/X+u1g29B7j/4BQfWkkx4zIHisjhPCmE0K4SwtXM+d4BvHRwNZOoBph9IJvPek9d40FoMJxf691jj2ywQQcHEWET4XJwkTszlVqm2GokewxtBT1DpQjRxDN0rUV" & _
"DNKdC3lb6tzNOwh6upMSSYfv4YBCl/bsn9PxiFCEo7SI6Obc9HeOrnY8x4jtHtdpN4GRbaorhsbu18Pph5CiHymI0RpSXGJ/z2oUOxYxG858AyiI+bfJtuTcG5yelBJy" & _
"T8okhqFd4a5yxL0rvulYtKCsZiWxWkc1s1cRoxxwhA31DLE0mR9l9HqX8fJgTDmFMVH0MIsRzVYnwnMi1dyzmhLt2kS2pxIiU62Wj5ptQGlSYFakLonTUJNLKaM5Wzlf" & _
"fEkuFkk5wTrhVO2eE7G6lJhxFFYUZ55zmn0WuBCD4pzhirFCKkbomsOoIYmZx5p90LoYWGPdD5g0QmJRKYxbZ6zYoVQ2jVGylSak7KSkFH6RSjpHKFuU+YMyNo5SulkC" & _
"6I0vonTCitMXPoEpVS2H5FQfEqp2R1opIgAEkJISYARTCukOhmPNI5Ex/wzGHUsicMwA1LHgQ90Y/KpoQHAD+pB/R4NzIaMAB9Xaw1gqaAOsh/A/ptIkWUfhGK1kZH8R" & _
"gH5GqvgArqRmt4AAPrTroRofBGADkqr6Rmu4D7CEaHARiwpJrEEZsXXwlVjyMWRsaRqwdkLGNBABZmytmyMnaINZqyVpLR2ftKAAAdd6h2osbaskdiq4EZtgSmyNcbVW" & _
"RJNXe3AA7REar3b0stlAAXBtoRmvJGLjEYAHUWsFcwCD/rnaop9aEICMAPdK5hT6xpeuzdOtAgKuJeGfdq6ggEbkTvAP+p9UCHXrvKkcgIA==")
	With .VisualAppearance
		.Add(4,"gBFLBCJwBAEHhEJAAEhABUYCg6AADACAxRDgMQBQKAAzQFAYbhkGCGAAGMZxRgmFgAQhFcZQSKUOQTDKMIziYBYfgkMIgSbJUgDGAkRRdDSOYDmGQYDiCIoRShOMIjH" & _
"LUXxtDaIZwhEAoJb+RgAUY/cTzaAEUwHHiTKInaCQShsFYJUJAdRURQ9EwvCIZBpEWwLChENQwWLCNj2TScBwjCyqbale45ViqdoDU5EUiXJJ8ZxnECfYyrGjaMpCeKB" & _
"UrGYTVRBIMxLLSia5oeJqMrnBpNVrIUgXCAGFwHK6BcauXIIDp6XoWWRbAAWDpVVzNNC3YzkCIceADHKiXxmVz4JLdGZ1QTGID2XaYaxWK4oZjsVSc4KDHbETbHFi9Fo" & _
"3NaaxGisew+GYc4HlCR5NAAAIIEkQJSGMOgdE4RhYDwJJsAaAYQgmPpolCWgSCiBJzjcEIAkQXIBm8d5UhOQgCDUIBDDJDhgggJgKgKYJIDSVoDk8KBFF4OohEMZgWDs" & _
"YYDj4GoGmGSB2B6B5iAiBgYDsYRjGSbIJo4RgqDuIpIAoLoLmMCJGDKDJjJiLA7xqUAAgGTwYnYPoPmQCQGEKEJkEkFg9gGY44BoRoSmSSQ2EKEggHgRhShSZRJFYVoV" & _
"mWCRmFKFAgGOTheheZgJgYYoYmYSYWGaF4lkMMJ0hqZpJjYbobmcCZGHKHJmjmJh0h2Z4JmYcIaE8WZ2H6H5oAoBoCiCaBKBYfdjGoJoKiKaJKDaDojmkChGgmIgpCoV" & _
"oWiWaJZiSd4mmmSh2h6J5qAqBoiiiaY5iSeIpmqComiqKpqkqNouiuah6hqMIsmsSpWiuGhP1kOoumuSp2j6L5sAsBo54gKwWkaMZsgsJpKjKbJLDaRYxYWRpSjSbIZi" & _
"Se41m2CxmlqNptksdpejebR5iSfI4m4S4W16boLiaao6m5fJ9jubwLkaco8m8S5WnaPZunuOp4j6b5Lnac4SA0PAGlgP4wEwFwGkGcIMCcCpCnCCxiA8NYAAmMJfkSbh" & _
"FCcFpFnGDBnBqRpUhuEwTDeZ5lHCfw6HIQxLCaAxygyJwqgGcATE4FA6hWY4tjEAAQBAgIA==")
	End With
	.GetOcx().BackColorHeader = &H4c6c6c6
	.GetOcx().SelBackColor = &H4000000
	.SelForeColor = RGB(0,0,1)
	.set_Background(EXPROPERTIESLISTLib.BackgroundPartEnum.exCursorHoverColumn,-1)
	.set_Background(EXPROPERTIESLISTLib.BackgroundPartEnum.exHeaderFilterBarButton,67108864)
	.set_Background(EXPROPERTIESLISTLib.BackgroundPartEnum.exFooterFilterBarButton,67109119)
	.Select(AxPropertiesList1.GetOcx())
	.Sort()
	.EndUpdate()
End With
194
How can I add property of button type

' ModalPropertyChange event - Fired when the properties browser is about to change a property's value using a modal dialog.
Private Sub AxPropertiesList1_ModalPropertyChange(ByVal sender As System.Object, ByVal e As AxEXPROPERTIESLISTLib._IPropertiesListEvents_ModalPropertyChangeEvent) Handles AxPropertiesList1.ModalPropertyChange
	With AxPropertiesList1
		Debug.Print( .get_Property() )
	End With
End Sub

With AxPropertiesList1
	.BeginUpdate()
	.Add("Button","the button is always shown",EXPROPERTIESLISTLib.EditTypeEnum.Button)
	.Add("EditButton","show on focus only",EXPROPERTIESLISTLib.EditTypeEnum.EditButton)
	.Add("EditPage","show on focus only",EXPROPERTIESLISTLib.EditTypeEnum.EditPage)
	.EndUpdate()
End With
193
Is it possible to decode/view the control's Layout property
With AxPropertiesList1
	.BeginUpdate()
	.Select(AxPropertiesList1.GetOcx())
	With CreateObject("Exontrol.Print")
		Debug.Print( .Decode64TextW(AxPropertiesList1.Layout) )
	End With
	.EndUpdate()
End With
192
Does your control supports scrolling by touching the screen

With AxPropertiesList1
	.BeginUpdate()
	.Select(AxPropertiesList1.GetOcx())
	.AutoDrag = EXPROPERTIESLISTLib.AutoDragEnum.exAutoDragScrollOnShortTouch Or EXPROPERTIESLISTLib.AutoDragEnum.exAutoDragScroll
	.EndUpdate()
End With
191
If I enabled the list filter on runtime, the user can click on [x] and close the filter text. Can I disabled this action

With AxPropertiesList1
	.BeginUpdate()
	.AllowMultipleValuesOnEnum = True
	.Select(AxPropertiesList1.GetOcx())
	.Sort(True)
	.FilterBarPromptVisible = EXPROPERTIESLISTLib.FilterBarVisibleEnum.exFilterBarAlwaysVisible
	.EndUpdate()
End With
190
Is it possible to specify a different background/foreground color for the property from the cursor, aka hot item

With AxPropertiesList1
	.Select(AxPropertiesList1.GetOcx())
	.HotBackColor = RGB(0,0,255)
	.HotForeColor = RGB(255,255,255)
	.SelBackColor = RGB(0,0,128)
	.SelForeColor = RGB(255,255,255)
End With
189
My development environment does not have any Object,GetOcx,DefaultDispatch,GetControlUnknown,nativeObject, ... property, is there any alternative I can pass the component to PrintExt so I can get printed

With AxPropertiesList1
	.Select(AxPropertiesList1.GetOcx())
	.Template = "Dim p;p = CreateObject(`Exontrol.Print`);p.PrintExt = Me;p.AutoRelease = False;p.Preview();"
End With
188
How can I display checkboxes for flags values only

With AxPropertiesList1
	.BeginUpdate()
	.AllowMultipleValuesOnEnum = True
	With .Add("Nextevent",81,EXPROPERTIESLISTLib.EditTypeEnum.EditEnum)
		.AddValue(1,"Option A")
		.AddValue(2,"Option B")
		.AddValue(3,"Option C")
		.AddValue(4,"Option D")
		.AddValue(16,"Flag A")
		.AddValue(32,"Flag B")
		.AddValue(64,"Flag C")
		.AddValue(128,"Flag D")
	End With
	.Refresh()
	.EndUpdate()
End With
187
Is is possible to display a checkbox on ENUM types

With AxPropertiesList1
	.BeginUpdate()
	.AllowMultipleValuesOnEnum = True
	With .Add("Nextevent",5,EXPROPERTIESLISTLib.EditTypeEnum.EditEnum)
		.AddValue(1,"Flag A")
		.AddValue(2,"Flag B")
		.AddValue(4,"Flag C")
		.AddValue(8,"Flag D")
		.AddValue(16,"Flag E")
	End With
	.Refresh()
	.EndUpdate()
End With
186
Is it possible to display the full path in the EditFolder editor

With AxPropertiesList1
	With .Add("Folder","c:\",EXPROPERTIESLISTLib.EditTypeEnum.EditFolder)
		.Option(EXPROPERTIESLISTLib.OptionEnum.exEditFolderTitle) = "Current Folder"
		.Option(EXPROPERTIESLISTLib.OptionEnum.exEditFolderShowEditBox) = False
		.Option(EXPROPERTIESLISTLib.OptionEnum.exEditFolderShowPath) = True
	End With
End With
185
How can I include a "New Folder" button so user can create new folders when using the EditFolder form

With AxPropertiesList1
	.Add("Folder","",EXPROPERTIESLISTLib.EditTypeEnum.EditFolder).Option(EXPROPERTIESLISTLib.OptionEnum.exEditFolderAllowNewFolder) = True
End With
184
Is it possible to show always the selection in the files/folders list in the EditFolder dialog
With AxPropertiesList1
	.Add("Folder","",EXPROPERTIESLISTLib.EditTypeEnum.EditFolder).Option(EXPROPERTIESLISTLib.OptionEnum.exEditFolderNewUI) = True
End With
183
How can I hide the editbox in the EditFolder editor

With AxPropertiesList1
	.Add("Folder","",EXPROPERTIESLISTLib.EditTypeEnum.EditFolder).Option(EXPROPERTIESLISTLib.OptionEnum.exEditFolderShowEditBox) = False
End With
182
How can I include the files in the in the EditFolder editor

With AxPropertiesList1
	.Add("Folder","",EXPROPERTIESLISTLib.EditTypeEnum.EditFolder).Option(EXPROPERTIESLISTLib.OptionEnum.exEditFolderIncludeFiles) = True
End With
181
Is it possible to change the caption in the EditFolder editor

With AxPropertiesList1
	.Add("Folder","",EXPROPERTIESLISTLib.EditTypeEnum.EditFolder).Option(EXPROPERTIESLISTLib.OptionEnum.exEditFolderTitle) = "Select a directory..."
End With
180
Is it possible to filter for properties that contains a specified text

With AxPropertiesList1
	.BeginUpdate()
	.Select(AxPropertiesList1.GetOcx())
	.Sort(True)
	.FilterBarPromptVisible = EXPROPERTIESLISTLib.FilterBarVisibleEnum.exFilterBarVisible
	.FilterBarPrompt = "<font ;7><fgcolor=FF0000><c>Start Filtering..."
	.FilterBarPromptPattern = "back"
	.IncrementalSearch = EXPROPERTIESLISTLib.AutoSearchEnum.exContains
	.EndUpdate()
End With
179
How can I filter the properties at runtime

With AxPropertiesList1
	.BeginUpdate()
	.Select(AxPropertiesList1.GetOcx())
	.Sort(True)
	.FilterBarPromptVisible = EXPROPERTIESLISTLib.FilterBarVisibleEnum.exFilterBarVisible
	.FilterBarPrompt = "<font ;7><fgcolor=FF0000><c>Start Filtering..."
	.FilterBarPromptPattern = "Back"
	.EndUpdate()
End With
178
Is it possible to change the caption being displayed in the filter bar

With AxPropertiesList1
	.BeginUpdate()
	.Select(AxPropertiesList1.GetOcx())
	.Sort(True)
	.FilterBarPromptVisible = EXPROPERTIESLISTLib.FilterBarVisibleEnum.exFilterBarVisible
	.FilterBarPrompt = "<font ;7><fgcolor=FF0000><c>Start Filtering..."
	.EndUpdate()
End With
177
How can I enable the filter-prompt feature

With AxPropertiesList1
	.BeginUpdate()
	.Select(AxPropertiesList1.GetOcx())
	.Sort(True)
	.FilterBarPromptVisible = EXPROPERTIESLISTLib.FilterBarVisibleEnum.exFilterBarVisible
	.EndUpdate()
End With
176
How do I specify the height of the control's header bar

With AxPropertiesList1
	.BeginUpdate()
	.HeaderVisible = True
	.HeaderHeight = 36
	.Select(AxPropertiesList1.GetOcx())
	.Sort(True)
	.EndUpdate()
End With
175
Is it possible to display a checkbox for ENUM types that allow BIT combinations

With AxPropertiesList1
	.BeginUpdate()
	.AllowMultipleValuesOnEnum = True
	.Select(AxPropertiesList1.GetOcx())
	.Sort(True)
	.FilterBarPromptVisible = EXPROPERTIESLISTLib.FilterBarVisibleEnum.exFilterBarVisible
	.FilterBarPromptPattern = "Inc"
	.EndUpdate()
End With
174
Can I add different EditFile entries with different filters

With AxPropertiesList1
	.BeginUpdate()
	.Add("Text File","text.txt",EXPROPERTIESLISTLib.EditTypeEnum.EditFile).Option(EXPROPERTIESLISTLib.OptionEnum.exEditFileFilter) = "Text Files (*.txt)|*.txt"
	.Add("INI File","text.ini",EXPROPERTIESLISTLib.EditTypeEnum.EditFile).Option(EXPROPERTIESLISTLib.OptionEnum.exEditFileFilter) = "INI Files (*.ini)|*.ini"
	.EndUpdate()
End With
173
Is it possible to expand items/entries when user types for searching properties

With AxPropertiesList1
	.BeginUpdate()
	.ExpandOnSearch = True
	.Select(AxPropertiesList1.GetOcx())
	.EndUpdate()
End With
172
Is it possible to show ticks on the slider control

With AxPropertiesList1
	.Add("Slider",50,EXPROPERTIESLISTLib.EditTypeEnum.EditSlider)
	With .Add("Slider w/h ticks",50,EXPROPERTIESLISTLib.EditTypeEnum.EditSlider)
		.SliderStep = 10
		.SliderTickFrequency = 10
	End With
	.Refresh()
End With
171
How can I edit a number between a range or interval
With AxPropertiesList1
	.BeginUpdate()
	With .Add("Slider",50,EXPROPERTIESLISTLib.EditTypeEnum.EditSlider)
		.Numeric = True
		.SpinStep = 0
		.SliderWidth = 0
		.SliderStep = 0
		.SliderMin = 0
		.SliderMax = 100
	End With
End With
170
How can I edit a number between a range or interval
With AxPropertiesList1
	.BeginUpdate()
	With .Add("Slider","0.5",EXPROPERTIESLISTLib.EditTypeEnum.EditSlider)
		.NumericFloat = True
		.SpinStep = 0
		.SliderWidth = 0
		.SliderStep = 0
		.SliderMin = 0
		.SliderMax = 1
	End With
End With
169
How can I add a slider or track bar editor, with a fixed size

With AxPropertiesList1
	.BeginUpdate()
	.Add("Slider","0.5",EXPROPERTIESLISTLib.EditTypeEnum.EditSlider).SliderWidth = 48
	.EndUpdate()
End With
168
How can I add a slider or track bar editor, so it covers half of the cell
With AxPropertiesList1
	.BeginUpdate()
	.Add("Slider","0.5",EXPROPERTIESLISTLib.EditTypeEnum.EditSlider).SliderWidth = -50
	.EndUpdate()
End With
167
How can I add a slider or track bar editor, so it covers the full cell

With AxPropertiesList1
	.BeginUpdate()
	.Add("Slider","0.5",EXPROPERTIESLISTLib.EditTypeEnum.EditSlider).SliderWidth = -100
	.EndUpdate()
End With
166
How can I add a spin editor within a range or interval of float numbers

With AxPropertiesList1
	.BeginUpdate()
	.AllowSpin = True
	With .Add("Slider","0.5",EXPROPERTIESLISTLib.EditTypeEnum.EditSlider)
		.NumericFloat = True
		.SpinStep = ".01"
		.SliderWidth = 0
		.SliderMin = 0
		.SliderMax = 1
	End With
	.EndUpdate()
End With
165
How can I add a spin editor within a range or interval of numbers

With AxPropertiesList1
	.BeginUpdate()
	.AllowSpin = True
	With .Add("Slider",10,EXPROPERTIESLISTLib.EditTypeEnum.EditSlider)
		.Numeric = True
		.SliderWidth = 0
		.SliderMin = 5
		.SliderMax = 15
	End With
	.EndUpdate()
End With
164
Can I use your HTML format to display a property

With AxPropertiesList1
	.BeginUpdate()
	.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
	.GetOcx().SelBackColor = &H1000000
	.SelForeColor = RGB(0,0,0)
	.Images("gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTq" & _
"lVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m" & _
"0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/y" & _
"NAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=")
	.set_ColumnWidth(0,304)
	With .Add("I1","link1",EXPROPERTIESLISTLib.EditTypeEnum.Edit)
		.HTMLName = "<br>text<off 4>subscript</off><off -4>sup<off -4>ers</off>cript</off> icons <img>1</img>, <img>2</img>, ... pictures <img>p1</i" & _
"mg>, <img>p2</img> <br><br>text <b>bold</b>, <i>italic</i>, <u>underline</u>, <s>strikeout</s>, ...<br><dotline>and so on...<br>" & _
" <a>anchor</a> or <a2>hyperlink</a><br><fgcolor=FF0000>fgcolor</fgcolor> or <bgcolor=00FF00>bgcolor</bgcolor>"
		.Height = 128
	End With
	With .Add("I2","link1",EXPROPERTIESLISTLib.EditTypeEnum.Edit)
		.HTMLName = "<sha ;;0>antialiasing</sha> format"
	End With
	.EndUpdate()
End With
163
How can I display I picture to a property

With AxPropertiesList1
	.BeginUpdate()
	.set_HTMLPicture("pic1","c:\exontrol\images\zipdisk.gif")
	.set_HTMLPicture("pic2","c:\exontrol\images\auction.gif")
	With .Add("Picture 1","link1",EXPROPERTIESLISTLib.EditTypeEnum.Edit)
		.HTMLName = "<img>pic1</img> <b>1</b>"
		.Height = 48
	End With
	.Add("Edit","text",EXPROPERTIESLISTLib.EditTypeEnum.Edit)
	With .Add("Picture 2","link2",EXPROPERTIESLISTLib.EditTypeEnum.Edit)
		.HTMLName = "<img>pic2</img> <b>2</b>"
		.Height = 32
	End With
	.EndUpdate()
End With
162
How do I display an icon to a property

With AxPropertiesList1
	.DefaultItemHeight = 18
	.BeginUpdate()
	.Images("gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTq" & _
"lVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m" & _
"0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/y" & _
"NAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=")
	.Add("I1","link1",EXPROPERTIESLISTLib.EditTypeEnum.Edit).HTMLName = "<img>1</img> <b>1</b>"
	.Add("Edit","text",EXPROPERTIESLISTLib.EditTypeEnum.Edit)
	.Add("I2","link1",EXPROPERTIESLISTLib.EditTypeEnum.Edit).HTMLName = "<img>2</img> <b>2</b>"
	.EndUpdate()
End With
161
How do I specify the height of a property

With AxPropertiesList1
	.BeginUpdate()
	.set_HTMLPicture("pic1","c:\exontrol\images\zipdisk.gif")
	.set_HTMLPicture("pic2","c:\exontrol\images\auction.gif")
	With .Add("Picture 1","link1",EXPROPERTIESLISTLib.EditTypeEnum.Edit)
		.HTMLName = "<img>pic1</img> <b>1</b>"
		.Height = 48
	End With
	.Add("Edit","text",EXPROPERTIESLISTLib.EditTypeEnum.Edit)
	With .Add("Picture 2","link2",EXPROPERTIESLISTLib.EditTypeEnum.Edit)
		.HTMLName = "<img>pic2</img> <b>2</b>"
		.Height = 48
	End With
	.EndUpdate()
End With
160
How do I edit a float number

With AxPropertiesList1
	.BeginUpdate()
	.AllowSpin = True
	With .Add("Edit","0.5",EXPROPERTIESLISTLib.EditTypeEnum.Edit)
		.NumericFloat = True
		.SpinStep = "0.1"
	End With
	.EndUpdate()
End With
159
How do I change the step for a spin

With AxPropertiesList1
	.BeginUpdate()
	.AllowSpin = True
	.Add("Edit",10,EXPROPERTIESLISTLib.EditTypeEnum.Edit).SpinStep = 10
	.EndUpdate()
End With
158
How do I sort the items in a drop down editor

With AxPropertiesList1
	With .Add("Enum",1,EXPROPERTIESLISTLib.EditTypeEnum.EditEnum)
		.DropDownItems = 1
		.AddValue(1,"First choice")
		.AddValue(2,"Second choice")
		.AddValue(3,"Third choice")
		.SortItems()
	End With
	.Refresh()
End With
157
How do I specify the number of visible items in a drop down editor

With AxPropertiesList1
	With .Add("Enum",1,EXPROPERTIESLISTLib.EditTypeEnum.EditEnum)
		.DropDownItems = 1
		.AddValue(1,"First choice")
		.AddValue(2,"Second choice")
		.AddValue(3,"Third choice")
	End With
	.Refresh()
End With
156
How do I bold a property

With AxPropertiesList1
	.BeginUpdate()
	.Add("Edit","text",EXPROPERTIESLISTLib.EditTypeEnum.Edit).Bold = True
	.EndUpdate()
End With
155
How do I disable or enable a property

With AxPropertiesList1
	.BeginUpdate()
	.Add("Edit","text",EXPROPERTIESLISTLib.EditTypeEnum.Edit).Enabled = False
	.EndUpdate()
End With
154
How do I specify a tooltip for a property

With AxPropertiesList1
	.BeginUpdate()
	.AllowTooltip = True
	.Add("ToolTip","",EXPROPERTIESLISTLib.EditTypeEnum.Edit).ToolTip = "This is a bit of text that shows up when the user hovers the cursor"
	.EndUpdate()
End With
153
How do I specify the masking character

With AxPropertiesList1
	.BeginUpdate()
	With .Add("Edit",12,EXPROPERTIESLISTLib.EditTypeEnum.Edit)
		.Mask = "##"
		.MaskChar = 48
	End With
	.EndUpdate()
End With
152
How do I specify a mask

With AxPropertiesList1
	.BeginUpdate()
	.Add("Edit",12,EXPROPERTIESLISTLib.EditTypeEnum.Edit).Mask = "##"
	.EndUpdate()
End With
151
How do I edit a number

With AxPropertiesList1
	.BeginUpdate()
	.AllowSpin = True
	.Add("Edit",15,EXPROPERTIESLISTLib.EditTypeEnum.Edit).Numeric = True
	.EndUpdate()
End With
150
How do I change the foreground color for a cell

With AxPropertiesList1
	.BeginUpdate()
	.Add("Edit","text",EXPROPERTIESLISTLib.EditTypeEnum.Edit).CellForeColor(0) = RGB(255,0,0)
	.EndUpdate()
End With
149
How do I change the foreground color for a cell

With AxPropertiesList1
	.BeginUpdate()
	.Add("Edit","text",EXPROPERTIESLISTLib.EditTypeEnum.Edit).CellForeColor(1) = RGB(255,0,0)
	.EndUpdate()
End With
148
How do I change the background color for a cell

With AxPropertiesList1
	.BeginUpdate()
	.Add("Edit","text",EXPROPERTIESLISTLib.EditTypeEnum.Edit).CellBackColor(0) = RGB(255,0,0)
	.EndUpdate()
End With
147
How do I change the background color for a cell

With AxPropertiesList1
	.BeginUpdate()
	.Add("Edit","text",EXPROPERTIESLISTLib.EditTypeEnum.Edit).CellBackColor(1) = RGB(255,0,0)
	.EndUpdate()
End With
146
How do I change the background color for a property

With AxPropertiesList1
	.BeginUpdate()
	.Add("Edit","text",EXPROPERTIESLISTLib.EditTypeEnum.Edit).BackColor = RGB(255,0,0)
	.EndUpdate()
End With
145
How do I change the foreground color for a property

With AxPropertiesList1
	.BeginUpdate()
	.Add("Edit","text",EXPROPERTIESLISTLib.EditTypeEnum.Edit).ForeColor = RGB(255,0,0)
	.EndUpdate()
End With
144
How do I associate an extra data to a property

With AxPropertiesList1
	.BeginUpdate()
	.Add("Color",255,EXPROPERTIESLISTLib.EditTypeEnum.EditColor).UserData = "your data"
	.EndUpdate()
End With
143
How do I get the caption of the property, as it is displayed in the browser

With AxPropertiesList1
	.BeginUpdate()
	.Add("Color",255,EXPROPERTIESLISTLib.EditTypeEnum.EditColor).ID = 12345
	.Add(.get_Property("Color").DisplayValue,"",EXPROPERTIESLISTLib.EditTypeEnum.Label).Bold = True
	.EndUpdate()
End With
142
How do I get the value of the property

With AxPropertiesList1
	.BeginUpdate()
	.Add("Edit","text",EXPROPERTIESLISTLib.EditTypeEnum.Edit).ID = 12345
	.Add(.get_Property("Edit").Value,"",EXPROPERTIESLISTLib.EditTypeEnum.Label).Bold = True
	.EndUpdate()
End With
141
How do I make a property read only
With AxPropertiesList1
	.BeginUpdate()
	.Add("Edit","text",EXPROPERTIESLISTLib.EditTypeEnum.Edit).Locked = True
	.EndUpdate()
End With
140
How do I specify a description for a property

With AxPropertiesList1
	.BeginUpdate()
	.Add("Edit","text",EXPROPERTIESLISTLib.EditTypeEnum.Edit).Description = "This is just a description"
	.SelectedProperty = .get_Property("Edit")
	.EndUpdate()
End With
139
How do I get the identifer of the property

With AxPropertiesList1
	.Add("Edit","text",EXPROPERTIESLISTLib.EditTypeEnum.Edit).ID = 12345
	.Add(.get_Property("Edit").ID,"",EXPROPERTIESLISTLib.EditTypeEnum.Label).Bold = True
	.Refresh()
End With
138
How do I get the type of the property
With AxPropertiesList1
	.Add("Edit","text",EXPROPERTIESLISTLib.EditTypeEnum.Edit)
	.Add(.get_Property("Edit").Type,"",EXPROPERTIESLISTLib.EditTypeEnum.Label).Bold = True
	.Refresh()
End With
137
How do I get the name of the property

With AxPropertiesList1
	.Add("Edit","text",EXPROPERTIESLISTLib.EditTypeEnum.Edit)
	.Add(.get_Property("Edit").Name,"",EXPROPERTIESLISTLib.EditTypeEnum.Label).Bold = True
	.Refresh()
End With
136
How do I select a folder

With AxPropertiesList1
	.Add("Folder","",EXPROPERTIESLISTLib.EditTypeEnum.EditFolder)
	.Refresh()
End With
135
How do I select a file

With AxPropertiesList1
	.Add("File","",EXPROPERTIESLISTLib.EditTypeEnum.EditFile)
	.Refresh()
End With
134
How do I slider or trackbar editor

With AxPropertiesList1
	.Add("Slider",50,EXPROPERTIESLISTLib.EditTypeEnum.EditSlider)
	.Refresh()
End With
133
How do I add a button

With AxPropertiesList1
	.Add("Button","Aaa",EXPROPERTIESLISTLib.EditTypeEnum.EditButton)
	.Refresh()
End With
132
How do I add a check box editor

With AxPropertiesList1
	.Add("Check",True,EXPROPERTIESLISTLib.EditTypeEnum.EditCheck)
	.Refresh()
End With
131
How do I add a color editor

With AxPropertiesList1
	.Add("Color",255,EXPROPERTIESLISTLib.EditTypeEnum.EditColorPage)
	.Refresh()
End With
130
How do I add a new object properties inside the control

With AxPropertiesList1
	.BeginUpdate()
	.Add("MySelf 1",AxPropertiesList1,EXPROPERTIESLISTLib.EditTypeEnum.EditObject)
	.Add("MySelf 2",AxPropertiesList1,EXPROPERTIESLISTLib.EditTypeEnum.EditObject)
	.EndUpdate()
End With
129
How do I add a new objects inside the control

With AxPropertiesList1
	.BeginUpdate()
	.Add("MySelf",AxPropertiesList1,EXPROPERTIESLISTLib.EditTypeEnum.EditObject)
	.EndUpdate()
End With
128
How do I add a drop down editor with some predefined values

With AxPropertiesList1
	With .Add("DropDown","Aaa",EXPROPERTIESLISTLib.EditTypeEnum.EditDropDown)
		.AddValue(1,"First choice")
		.AddValue(2,"Second choice")
		.AddValue(3,"Third choice")
	End With
	.Refresh()
End With
127
How do I add a password editor

With AxPropertiesList1
	.Add("Password","pass",EXPROPERTIESLISTLib.EditTypeEnum.EditPassword)
	.Refresh()
End With
126
How do I add a date picker editor

With AxPropertiesList1
	.Add("Date","1/1/2001",EXPROPERTIESLISTLib.EditTypeEnum.EditDate)
	.Refresh()
End With
125
How do I add a drop down editor with some predefined values

With AxPropertiesList1
	With .Add("Enum",1,EXPROPERTIESLISTLib.EditTypeEnum.EditEnum)
		.AddValue(1,"First choice")
		.AddValue(2,"Second choice")
		.AddValue(3,"Third choice")
	End With
	.Refresh()
End With
124
How do I add a boolean editor

With AxPropertiesList1
	.Add("Boolean",True,EXPROPERTIESLISTLib.EditTypeEnum.EditBoolean)
	.Refresh()
End With
123
How do I add a button or a page editor

With AxPropertiesList1
	.Add("Page","",EXPROPERTIESLISTLib.EditTypeEnum.EditPage)
	.Refresh()
End With
122
How do I add a picture editor

With AxPropertiesList1
	.Add("Picture",Nothing,EXPROPERTIESLISTLib.EditTypeEnum.EditPicture)
	.Refresh()
End With
121
How do I add a font editor

With AxPropertiesList1
	.Add("Font","Arial",EXPROPERTIESLISTLib.EditTypeEnum.EditFontName)
	.Refresh()
End With
120
How do I add a font editor

With AxPropertiesList1
	.Add("Font","Arial",EXPROPERTIESLISTLib.EditTypeEnum.EditFont)
	.Refresh()
End With
119
How do I add a color editor

With AxPropertiesList1
	.Add("Color",255,EXPROPERTIESLISTLib.EditTypeEnum.EditColor)
	.Refresh()
End With
118
How do I add an edit

With AxPropertiesList1
	.Add("Edit","text",EXPROPERTIESLISTLib.EditTypeEnum.Edit)
	.Refresh()
End With
117
How do I specify the character sets being included in the font editor

With AxPropertiesList1
	.set_Option(EXPROPERTIESLISTLib.OptionEnum.exFontCharSet,"0")
	.Add("Font","Arial",EXPROPERTIESLISTLib.EditTypeEnum.EditFontName)
	.Refresh()
End With
116
How do I show or hide the bottom scroll bar in the drop down date picker calendar editor

With AxPropertiesList1
	.set_Option(EXPROPERTIESLISTLib.OptionEnum.exDateShowScroll,False)
	.Add("Date","1/1/2001",EXPROPERTIESLISTLib.EditTypeEnum.EditDate)
	.Refresh()
End With
115
How do highlight the "Today" date is the drop down date picker calendar editor

With AxPropertiesList1
	.set_Option(EXPROPERTIESLISTLib.OptionEnum.exDateMarkToday,True)
	.Add("Date","1/1/2001",EXPROPERTIESLISTLib.EditTypeEnum.EditDate)
	.Refresh()
End With
114
How do I show or hide the "Today" button is the drop down date picker calendar editor

With AxPropertiesList1
	.set_Option(EXPROPERTIESLISTLib.OptionEnum.exDateShowTodayButton,False)
	.Add("Date","1/1/2001",EXPROPERTIESLISTLib.EditTypeEnum.EditDate)
	.Refresh()
End With
113
How to specify the first day of the week in the drop down date picker calendar editor

With AxPropertiesList1
	.set_Option(EXPROPERTIESLISTLib.OptionEnum.exDateFirstWeekDay,1)
	.Add("Date","1/1/2001",EXPROPERTIESLISTLib.EditTypeEnum.EditDate)
	.Refresh()
End With
112
How to specifies the shortcut for the weekdays to be displayed in the drop down date picker calendar editor

With AxPropertiesList1
	.set_Option(EXPROPERTIESLISTLib.OptionEnum.exDateWeekDays,"Du Lu Ma Mi Jo Vi Si")
	.Add("Date","1/1/2001",EXPROPERTIESLISTLib.EditTypeEnum.EditDate)
	.Refresh()
End With
111
How can I change the name of the months in the drop down date picker calendar editor

With AxPropertiesList1
	.set_Option(EXPROPERTIESLISTLib.OptionEnum.exDateMonths,"Janvier Février Mars Avril Mai Juin Juillet Août Septembre Octobre Novembre Décembre")
	.Add("Date","1/1/2001",EXPROPERTIESLISTLib.EditTypeEnum.EditDate)
	.Refresh()
End With
110
Can I change the "Today" caption being displayed in the drop down date picker calendar editor

With AxPropertiesList1
	.set_Option(EXPROPERTIESLISTLib.OptionEnum.exDateTodayCaption,"Azi")
	.Add("Date","1/1/2001",EXPROPERTIESLISTLib.EditTypeEnum.EditDate)
	.Refresh()
End With
109
How can I open the drop down editors, using a different than F4 key
With AxPropertiesList1
	.EditOnSelect = False
	.EditOnKey = 113
	.Select(AxPropertiesList1.GetOcx())
End With
108
How do I display the color properties as RGB

With AxPropertiesList1
	.BeginUpdate()
	.DisplayColorAs = EXPROPERTIESLISTLib.DisplayColorEnum.exRGB
	.Add("Red",255,EXPROPERTIESLISTLib.EditTypeEnum.EditColor)
	.Add("Blue",16711680,EXPROPERTIESLISTLib.EditTypeEnum.EditColor)
	.EndUpdate()
End With
107
How do I get the list of properties being listed as a string

With AxPropertiesList1
	.Select(AxPropertiesList1.GetOcx())
	.Add(" _ toString _ ",.get_ToString(EXPROPERTIESLISTLib.ToStringEnum.exLiterals),EXPROPERTIESLISTLib.EditTypeEnum.EditButton).Bold = True
	.Sort(True)
End With
106
How can I display a picture to a property

With AxPropertiesList1
	.DefaultItemHeight = 48
	.set_HTMLPicture("pic1","c:\exontrol\images\zipdisk.gif")
	.set_HTMLPicture("pic2","c:\exontrol\images\auction.gif")
	.Add("Picture 1","link1",EXPROPERTIESLISTLib.EditTypeEnum.Edit).HTMLName = "Pic <img>pic1</img> or <img>pic2</img>"
	.Refresh()
End With
105
How do I show or hide the properties with multiple parameters

With AxPropertiesList1
	.ShowMultipleParams = False
	.Select(AxPropertiesList1.GetOcx())
End With
104
How can I add a hyperlink or anchor element

With AxPropertiesList1
	.BackColor = RGB(255,255,255)
	.SelBackColor = .BackColor
	.SelForeColor = .ForeColor
	.Add("Link 1","link1",EXPROPERTIESLISTLib.EditTypeEnum.Edit).HTMLName = "Link <a1>one</s>"
	.Refresh()
End With
103
Can I change the visual effect, appearance for the anchor, hyperlink elements, in HTML captions, after the user clicks it

With AxPropertiesList1
	.SelBackColor = RGB(255,128,255)
	.set_FormatAnchor(False,"<b><u><fgcolor=880000> </fgcolor></u></b>")
	.Add("Link 1","link1",EXPROPERTIESLISTLib.EditTypeEnum.Edit).HTMLName = "Link <a1>one</s>"
	.Refresh()
End With
102
Can I change the visual effect, appearance for the anchor, hyperlink elements, in HTML captions

With AxPropertiesList1
	.SelBackColor = RGB(255,128,255)
	.set_FormatAnchor(True,"<b><u> </u></b>")
	.Add("Link 1","link1",EXPROPERTIESLISTLib.EditTypeEnum.Edit).HTMLName = "Link <a1>one</s>"
	.Refresh()
End With
101
How do I specify the indentation of the child items relative to their parents

With AxPropertiesList1
	.AutoIndent = False
	.Indent = 8
	.Select(AxPropertiesList1.GetOcx())
	.ExpandAll()
End With