資源簡介
建立運行環境-Excel Vba,可移植到VB環境中(需修改一些代碼)
'仿制簡單的SQL查詢語句,用于對二維數組的查詢
'參照SQL語句:Select * From array [Where conditions] [Distinct fields] [ResultWithTitle]
'
'實現功能:
' 依條件設置查詢數組,返回包含查詢字段(或全部字段)的數組,可多條件組合。
' 條件運算符包括:> = = <= , like(正則表達式)
'
'附注:
' 使用此函數,需要在文件中引用正則表達式腳本 Microsoft VBScript Regular Expressions x.x
' (根據不同的電腦配置和環境此處會有差異)
'算法簡要:
' 1、查詢條件運算符:僅有 >, =, =, <=, , like(正則表達式)
' 本函數中僅有上述運算符。原因在于,更多的運算符編制邏輯過于復雜,又不太常用。
' 為了盡可能多地容納各種運算關系,添加了正則表達式匹配運算,
' 在某個單一條件中,正則幾乎可以容納絕大部分的比對運算關系了。
' 2、數字比較:
' 采用了將數字型字符串類型轉換為數字之后再比較的方法,結果更為準確。
' 3、其他算法和運算速度:
' 編制過程中,試驗過使用 正則+邏輯分支+表達式引用 的方法,
' 可以實現幾乎等同于SQL查詢語句的復雜功能,而且代碼更簡捷。
' 但運算速度相差過于懸殊(大概幾十到上百倍 - "一閃而過"和"一袋煙"的差距!),最后不得不放棄。
' 所以現在的版本相當于一個簡化了的select語句,但對于大多數查詢情況而言夠用了。

代碼片段和文件信息
?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----
?????文件????????3430??2020-04-10?02:00??通用_SelectArr必須函數.txt
?????文件???????15520??2020-04-10?01:58??通用_Select_Arr.bas
?????文件???????17122??2020-04-10?01:59??通用_Select_Arr.txt
?????文件????????3362??2020-04-10?01:58??通用_SelectArr必須函數.bas
-----------?---------??----------?-----??----
?????文件????????3430??2020-04-10?02:00??通用_SelectArr必須函數.txt
?????文件???????15520??2020-04-10?01:58??通用_Select_Arr.bas
?????文件???????17122??2020-04-10?01:59??通用_Select_Arr.txt
?????文件????????3362??2020-04-10?01:58??通用_SelectArr必須函數.bas
- 上一篇:超市管理系統VB源代碼
- 下一篇:vb自定義打印紙張demo
評論
共有 條評論