該類窗體功能：查詢一定時間範圍內的表資訊，並將查詢資訊匯出為excel表。
步驟：1，該窗體用到的是dtpicker和msflexgrid控制項，以及對excel的呼叫。
2，難點一：查詢條件的填寫：
do while not (mrs.eof)
if ((datediff("d", mrs.fields(5), dtpstart.value)) > 0) then '若在開始時間之前則不顯示
mrs.movenext
exit do
elseif ((datediff("d", mrs.fields(5), dtpend.value)) < 0) then '若在結束時間之後也不顯示
mrs.movenext
exit do
end if
『將表中滿足日期範圍內的表中資訊新增到msflexgrid中
loop
當然還有其他的方法來查詢範圍內的資訊：
strsql="select * from recharge where date>='" & format(dtpstart.value, "yyyy/mm/dd") & "' and date <='" & format(dtpend.value, "yyyy/mm/dd") & "'"
3，難點二：匯出excel表。
實際上這個只要在網上搜一下就有好多，可是對於本程式來說，很多東西都是多餘的，我篩選了一下：
'匯出至excel
機房收費系統之 組合查詢
總是把它想象的很難。所以才會畏懼。其實只要邏輯清晰，就好了。private function fieldname strfieldname as string as string 將程式的字對應為資料庫 select case strfieldname case 卡號 fieldname cardn...
機房收費系統之組合查詢
前言 組合查詢是機房的另乙個重點 涉及到的窗體有 學生基本資訊維護 學生上機資訊統計 操作員工作記錄。邏輯 問題及重點 1.呼叫函式的目的是使得漢字與表中字段進行轉化 例 sql語句的姓名應該是student name，而 中新增的是文字 combo3.additem 姓名 通過函式可以將兩者進行轉...
機房收費系統之組合查詢BUG
宣告 以下內容只對在學生上機記錄查詢 組合查詢 只查詢已下機記錄，操作員工作記錄 組合查詢 只查詢已登出記錄的同學適用！在機房收費系統中有三個組合查詢 學生基本資訊查詢 學生上機記錄查詢 操作員工作記錄查詢 其中的學生上機記錄查詢，我個人認為應該只查詢出已經下機的記錄，正在上機的記錄不應該被查詢出來...