程式狂想曲

昨天把本來好好的 Form.Timer 改成 System.Timer.本來想運用多執行緒的優點，來使程式更順暢。沒想到沒有，反而整個系統垮了，根本就動彈不得，設了Flag來保護也沒有用。Inteval又不能設太大，不然就失去意義了。今天才發現當三個System.Timer一起運作時，搶得還是同一個Thread.那用System.Timer就失去用多執行緒的意義。可惜對Thread.Timer不熟，也不打算用，不然之後維護的人可真的辛苦。

在網路上查了很多資料 但偏偏都少了這一句
請先 引用 Micorsoft Excel 11.0 Object Libary
讓我 try 了好久 >_< 後面再加上 把 Northwind.sdf檔讀入 MSHFledGrid 中 在Form 中要建立 button MSHFlefGrid1 ADODC1 Textbox1 and Progress1 Private Sub btntra_Click() '******** '*匯出到 Excel '****************** Call PrintTableToExcel(Me.MSH, "", "", App.Path & "\" & txtOut.Text & ".xls", Me.ProgressBar1) End Sub Public Sub PrintTableToExcel(ByRef myGrid As MSHFlexGrid, ByVal strHeader As String, _ ByVal strInfo As String, ByVal strFileName As String, _ ByRef proBar As ProgressBar) '************* '*執行 匯出的動作 '********************* If myGrid.Rows <= 1 Then Exit Sub Dim ExcelApp As Excel.Application Dim r As Long, c As Long On Error Resume Next Set ExcelApp = GetObject(, "Excel.Application") If Err.Number <> 0 Then
Err.Clear
Set ExcelApp = CreateObject("Excel.application")

這兩天快被 Servlet 給搞亂了
昨天是 Compile 時 一直出現 第一行開始會有個 ? 錯誤
今天是在整理 Sample600時 一直不能執行
最後發現 第一個是Micosoft的問題，檔案個開頭會塞個東西在裡面。
必須用 Notepad++ 在編碼時選 UTF-8無BOM 才能解決