vb.net 自动清除 指定资料夹的文档

我的档案存在于此资料夹下
Debug\map\
201904270858337395.html
201904270900485227.html
201904270901151482.html

每次都要手动去清除很不方便

比如说,点一个button,透过日期(今天) 20190427

把所有开头像是20190427,副档名又是html的清除
这个有什么办法呢?

感谢

Dim files = Directory.GetFiles("Debug\map\", "20190427*.html")
For Each f As String In files
File.Delete(f)
Next

写个批处理,放在文件夹里,直接点击清除,不是更简单。