Sub RegExpSubtotal() '声明变量 Dim Regex As Object '正则对象 Dim Dic As Object '字典对象 Dim Key As String '关键字 Dim Item As Double '项内容 Dim Index As Long '序号 Dim Text As String '文本 Dim Mch As Object '匹配集合 Dim OneMch As Object '匹配子项 Dim Rng As Range '单元格对象 '实例化 正
目的: 同时按"游戏代号"和"礼包名"分类汇总,然后获取下拉框的数据. 如下图所示: SQL查询 select game,giftname from qyg_gifts group by game , giftname //连接mysql数据库 $conn = mysql_connect(DB_HOST, DB_USER, DB_PASS) or die("connect failed" . mysql_error()); mysql_se