vb中left函数的使用

发布网友发布时间：2022-05-01 22:13

共5个回答

热心网友时间：2022-06-24 05:17

Left 函数，返回 Variant
(String)，其中包含字符串中从左边算起指定数量的字符。

Left 函数示例

本示例使用 Left 函数来得到某字符串最左边的几个字符。

Dim AnyString, MyStr
AnyString = "Hello World"   ' 定义字符串。
MyStr = Left(AnyString, 1)   ' 返回 "H"。
MyStr = Left(AnyString, 7)   ' 返回 "Hello W"。
MyStr = Left(AnyString, 20)   ' 返回 "Hello World"。

热心网友时间：2022-06-24 05:17

lz说的不清楚啊！那个语句好几处毛病。
是不是这样?
Private Sub Form_Load()
Dim dtp1 As String, dtm1 As String
Form1.AutoRedraw = True
Form1.FontSize = 20
Form1.ForeColor = &H7700FF
'Form1.BorderStyle = 1
dtp1 = "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”

热心网友时间：2022-06-24 05:18

Left（a,N）
从左起第一位开始取值，向右取N位
举例：设a="Visual
Basic"
b=a.Left(a,9)
返回：b="Visual
Ba"
它也只有一个参数，Right（a,M，N）的写法是错的。

热心网友时间：2022-06-24 05:19

20031-10
8:300000

热心网友时间：2022-06-24 05:19

dtp是什么 dtm又是什么?
不太清楚地你要问什么