关于VB的left ，mid，right函数

Private Sub Form_Load()
Label1.Caption = Left(Text1, 11)
Label2.Caption = Mid(Text1, 12, 6)
Label3.Caption = Right(Text1, 5)
Label1.FontSize = Text1.FontSize
Label2.FontSize = Text1.FontSize
Label3.FontSize = Text1.FontSize
End Sub
我没有设置字体，你自己在属性窗口设置一下，