For c As Integer = 1 To 31
... ...
Dim c10 As Date = CDate(c9) Dim c11 as short = c10.DayOfWeek
上面代码要将字符串c9转化为日期格式，然后再将c10转换为星期几。但是如果碰到不存在的日期，比如2024-04-31的话，就会出现警告：
从字符串“2024-04-31”到类型“Date”的转换无效。
请问我要怎样才能避开这类不存在的日期，不让它出现警告呢? 谢谢。
我用另外一个方法(Days = Date.DaysInMonth(2007,2))处理好了。