把约会中第二个“/”左边的所有内容

如果它真的是VB中的日期,只需使用内置的日期函数来获取所需的数据,而不是将其视为字符串。

尝试如下操作:

Dim dt As New Date(2018, 5, 5)
Dim myVal As String = dt.Month & "/" & dt.Day

将日期字符串解析为 DateTime 然后使用 ToString 方法,使用所需的格式。

Sub Main
    Dim dateStr As String = "5/5/2018"
    Dim dt As DateTime
    dt = DateTime.Parse(dateStr)

    Console.WriteLine(dt.ToString("M/d"))
End Sub