vb中left函数的使用?

Question

left(dtp1,4)&right(left(dtp1,7)2)&right(dtp1,2)&left(dtm1,2)left(right(dtm1,5)2)运行2003-1-10，8:30:00的值

Answer 1

Private Sub Form_Load()Dim dtp1 As String, dtm1 As StringForm1.AutoRedraw = TrueForm1.FontSize = 20Form1.ForeColor = &H7700FF'Form1.BorderStyle = 1dtp1 = "2003-1-10"dtm1 = "8:30:00"Print Left(dtp1, 4) & Right(Left(dtp1, 7), 2) & Right(dtp1, 2) & Left(dtm1, 2); Left(Right(dtm1, 5), 2)End Sub答案是：“20031-108:30”

Answer 2

Left 函数，返回 Variant(String)，其中包含字符串中从左边算起指定数量的字符。Left 函数示例本示例使用 Left 函数来得到某字符串最左边的几个字符。12345Dim AnyString, MyStrAnyString = "Hello World"   ' 定义字符串。MyStr = Left(AnyString, 1)   ' 返回 "H"。MyStr = Left(AnyString, 7)   ' 返回 "Hello W"。MyStr = Left(AnyString, 20)   ' 返回 "Hello World"。