office交流網--QQ交流群號

Access培訓群:792054000         Excel免費交流群群:686050929          Outlook交流群:221378704    

Word交流群:218156588             PPT交流群:324131555

Access文本數據類型提取數字的查詢

2017-12-07 16:56:00
tmtony8
原創
9548

有網友問及 一箇字段中,卽有文本字符,又有數字字符。現在想對數字字符的內容進行求平均,如何操作呢?

麵對這樣的問題,我們應該分解內容,逐步去實現需求。

第一步是先從文本字符串中提取數字

第二步是求平均值


如有錶“tbl1”,文本字段“f1”,需要提取字段“f1”中的數字


1.編寫從字符串中提取數字的函數

Public Function NumberGet(chkStr As String) As String
'從字符串中提取數字
    Dim i As Integer
    For i = 1 To Len(chkStr)
        If Mid(chkStr, i, 1) Like "[0-9]" Then
            NumberGet = NumberGet & Mid(chkStr, i, 1)
        End If
    Next i
    NumberGet = NumberGet
End Function



2.在查詢中調用該函數

SELECT NumberGet([tbl1].[f1]) AS 提取數字
FROM tbl1;

提取錶文本字段中的數字成功


3.閤計求平均值

SELECT Avg(查詢2.提取數字) AS 平均值
FROM 查詢2;

實現效果圖


    分享