在VB中,可以使用`Date.Parse`或`Date.TryParse`方法将字符串转换为日期。
```vb
Dim dateString As String = "2021-09-30"
Dim dateValue As Date = Date.Parse(dateString)
```
或者使用`Date.TryParse`来转换字符串,这样可以避免在无效日期字符串的情况下引发异常:
```vb
Dim dateString As String = "2021-09-30"
Dim dateValue As Date
If Date.TryParse(dateString, dateValue) Then
' 转换成功
Console.WriteLine(dateValue)
Else
' 转换失败
Console.WriteLine("无效的日期字符串")
End If
```
请注意,日期字符串的格式必须符合当前系统的日期格式设置,否则将引发异常或无法成功转换。