Drop Tiles frowm Windows start menu

.remove-tiles.ps1

Add-Type -AssemblyName System.Windows.Forms

# show the MsgBox:
$result = [System.Windows.Forms.MessageBox]::Show('Do you want to clean up all tiles?', 'Warning', 'YesNo', 'Warning')

# check the result:
if ($result -eq 'Yes')
{
  (New-Object -Com Shell.Application).
      NameSpace('shell:::{4234d49b-0245-4df3-b780-3893943456e1}').
      Items() |
    %{ $_.Verbs() } |
    ?{$_.Name -match '.*Von "Start" l.*sen'} |
    %{$_.DoIt()}
}