首頁猿問 vb中l(wèi)eft函數(shù)的使用?

vb中l(wèi)eft函數(shù)的使用?

算法

慕的地8271018 2019-02-14 14:11:20

vb中l(wèi)eft函數(shù)的使用

查看完整描述

2 回答

斯蒂芬大帝

TA貢獻(xiàn)1827條經(jīng)驗(yàn) 獲得超8個(gè)贊

lz說的不清楚??！那個(gè)語句好幾處毛病。
是不是這樣?
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”

反對(duì) 回復(fù) 2019-03-10

眼眸繁星

TA貢獻(xiàn)1873條經(jīng)驗(yàn) 獲得超9個(gè)贊

Left 函數(shù)，返回 Variant
(String)，其中包含字符串中從左邊算起指定數(shù)量的字符。

Left 函數(shù)示例

本示例使用 Left 函數(shù)來得到某字符串最左邊的幾個(gè)字符。

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