vb表單讀取文本框中資料,如067309010000100010010
如何將提取部分資料將其變成73090100001-0001
uj5u.com熱心網友回復:
先明確提取規則是什么,然后使用mid函式提取uj5u.com熱心網友回復:
Option Explicit
Private Sub Command1_Click()
Dim strTmp As String
Text1 = "067309010000100010010"
strTmp = Mid(Text1, 3, 11) & "-" & Mid(Text1, 14, 4)
MsgBox strTmp
'73090100001-0001
End Sub
uj5u.com熱心網友回復:
你都沒說根據什么規則來取主要是規則
常用的 函式 也就 mid left right InStr
這個幾個應該就夠了
轉載請註明出處,本文鏈接:https://www.uj5u.com/gongcheng/139674.html
標籤:VB基礎類
