string類的left函數(shù)是如何使用的
3 回答
森欄
TA貢獻(xiàn)1810條經(jīng)驗(yàn) 獲得超5個(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
添加回答
舉報(bào)
0/150
提交
取消