dcboy888的专栏

在dbcombo、dblist、datacombo、datalist中用以下方式： 查询Private Sub cmdserch_Click()Dim x As String定义查找方式DBList1.MatchEntry = dblBasicMatchingx = InputBox("请输入要查询的姓名", "查询", DBList1.Text)If Trim(x) = vbNullStri

--这个是最好的改进版本，已经在企业用了两年没有问题CREATE PROCEDURE P_Global_TomCrossTable @vSourceTAB As Varchar(200), --表名@vGroupbyField As Varchar(1000),--groupby字段名 行@vPivotCol As Varchar(500), --需要横转纵的字段名 列@FunctionStr a