小吳 VBQA: 12月 1999

用vb中的findfirst指令做查詢,這個指令後面的條件式要怎麼寫??(編號：571)

as title
例如: 資料控制項(data)連結的是guest資料表, 要找出其中g_name欄位的值為變數name的記錄,
那麼整個敘述要怎麼寫??

資料存取速度太慢(編號：569)

我使用VB6 OLE DB CONNECT SQL SERVER 資料約十萬筆,每次存取如
resync動作時都要等很久,請問有沒方式加速.
CursorLocation = adUseClient
CursorType = adOpenStatic
TKS

小弟寫了一個VB程式,並將它放至公司intranet網路上,但卻遭遇到下列問題,請各位先進幫忙解決:
前言 :
假設本人有存取intranet網路(假設是磁碟機W:\)的權限,並將程式中所使用到的ACCESS資料庫檔案放至該處(W:\)下.在此情況下,本人於本機執行程式時沒有問題(可擷取到ACCESS資料庫中的資料).

問題一:若一個無存取W:\碟的人到intranet來執行該程式,則會出現
下列訊息:
　　 "Microsoft Jet 資料庫引擎無法開啟 'W:\..\aa.mdb '檔案.
　　　您需要有檢視資料的權限 ".
　　　　　　　　　　　　　請問該如何解決... ????

問題二：為何其他資料檔（如：word檔）也是放在W:\碟，但無W:\碟
存取權限的人卻仍可以透過intranet網頁中的超連結而讀取到
該資料...?????　而使用VB寫的程式卻無法擷取到程式中所用
到的access檔案...???

請問如何在DataGrid中自動編號(編號：562)

請問我在dataGrid中若刪除一筆資料後,如何讓每筆記錄的序號重新編號.
我將重新編號的程式寫在DataGrid的AfterDelete中,但是會出現"提供者在消費者中由IRowSetNotify呼叫方法,此方法尚未被傳回"的訊息...
請問我應該寫在DataGrid哪個事件下呢?

如何撰寫回覆 E-mail 的功能表?(編號：561)

不知道可不可用vb將文字檔轉成收件人、主旨和內容,並將信件寄出去呢?
感謝大家的幫忙

SQL move to Access(編號：559)

我想從 SQL server 上將資料庫搬到 Local Access
請問有辦法不要使用 DAO 直接下 SQL statment嗎
或者有其他較簡便的方法
因為資料庫的Table, Field必須一一指定
TKS!!

記數器的讀取~~(編號：558)

請問使用VBScript讀取檔案的記數數值時!!
＜%Application("counter")%＞
可以讓它顯示成00001000~~
而不是只顯示1000
因為我在counter.txt裡面是00001000
謝謝~~~~

請問ADO 的 Recordset.Sort?(編號：556)

VB6 的Help 中說 Recordset.Sort 屬性
遞增或遞減排序只要在欄位後加空白及ASCENDING or DESCENDING
可是我怎麼試都無法將 DESCENDING 關鍵字加上去，
Please help me, thanks!

請問vb6中資料欄位為date時,欲填入空值應如何處理(編號：555)

請問vb6中資料欄位為date時,欲填入空值應如何處理,格式為何
例:rs.Fields("日期") = .........

封裝問題一問?(編號：554)

請問vb在封裝時，可加入所需的檔案，但好像只能一個一個加入，不能加入資料夾嗎?請問要如何封裝啊?謝謝!

程式錯在哪?(編號：553)

幫忙看一下這一個程式錯在哪裡?
為什麼執行沒有多久就當機?
試了好久都一樣

Option Explicit
Private Declare Function GetDC Lib "user32" (ByVal hwnd As Long) As Long
Private Declare Function ReleaseDC Lib "user32" (ByVal hwnd As Long, ByVal hdc As Long) As Long
Private Declare Function StretchBlt Lib "gdi32" (ByVal hdc As Long, ByVal x As Long, ByVal y As Long, ByVal nWidth As Long, ByVal nHeight As Long, ByVal hSrcDC As Long, ByVal xSrc As Long, ByVal ySrc As Long, ByVal nSrcWidth As Long, ByVal nSrcHeight As Long, ByVal dwRop As Long) As Long
Private Declare Function GetCursorPos Lib "user32" (lpPoint As POINTAPI) As Long
Private Type POINTAPI
x As Long
　　　　y As Long
End Type
Dim MouseXY As POINTAPI
Dim nX As Single, nY As Single
Dim BackX As Single, BackY As Single
Dim SrcDC As Long
Dim ret As Long
Private Sub Form_Load()
Picture1.ScaleMode = 3
Picture1.AutoRedraw = True
Form1.ScaleMode = 3
Timer1.Interval = 100
End Sub
Private Sub Timer1_Timer()
ret = GetCursorPos(MouseXY)
nX = MouseXY.x - 50
nY = MouseXY.y - 50
SrcDC = GetDC(0)
ret = StretchBlt(Picture1.hdc, 0, 0, Picture1.ScaleWidth, Picture1.ScaleHeight, SrcDC, nX, nY, 100, 100, vbSrcCopy)
Picture1.Refresh
ret = ReleaseDC(0, SrcDC)
End Sub

有關OPEN(編號：550)

請問一下在OPEN FILENAME FOR APPEND AS #FILENUMBER要如何將寫入的資料置於最上一筆呢?謝謝

VB 傳指標入 API(編號：549)

常有 WInAPI 需要傳指標做參數引入
甚至接收以指標型態傳回之值
但在VB call by val,ref,name 所引用的各種參數型態
均不能正確工作
不信的話,讀者可以找個傳指標為參數的試試
沒指標的VB真有些不方便!

VB's ToolBar Control(編號：548)

請問要如何才能改變VB ToolBar Control中,Button的width,height.
因為每次改完值後又會變成原來的值.

ActiveX Component can not create object.(編號：547)

丫~~~怎麼會這樣....
ActiveX Component can not create object.
有沒有人遇過呢?
在查詢SQL Server時(ado)才會發生的
可是只有幾台電腦固定會出現...
其他的都不會的....
help me ...

如何寫一個類似『我的連線』的程式(編號：546)

請問一下，要用什麼方法，可以寫一個網路的登錄程式?
要用winsock 還是mscomm , 是否有列子可看
謝謝!!

如何去抓取檔案路徑???(編號：545)

如題??如何去抓取檔案的路徑呢??
在image中放了一張圖，我該如何去抓取圖檔的路徑呢???
並將路徑存進資料庫中呢?????

多層次物件的規劃(編號：543)

我想使用一個Class連接至SQL Server, 其他的Class共用此Class的Connection下載RecordSet, 而不必每個Class都自己連至SQL, 這樣可將Connection的耗用資源降低
這樣的Class階層要如何規劃, 請各位先進指點一二
-＞給我一點靈感吧　please (⊙o⊙)

請問如何將表單最小化,於右下角之工作列?(編號：542)

請問如何將表單最小化,於右下角之工作列?
煩請費心!

製作 ActiveX Control Property 的問題(編號：541)

用 VB 製作 ActiveX Control 時, 如何才能讓某些 Property 動態
產生特定的選項? 如何做到這種 ComboBox 選擇的功能? 但是我所要
動態產生的選擇和 DataSource or DB 類的東西無關, 僅是幾個必須
動態產生的字串. 不想用 Property Page 來做, 因為蠻累贅的.
類似於在用 DataControl 時, 必須先有了 DataControl 後, 才可以在某些有 DataBinding 的元件中選擇 DataSource & DataField (這時, 這兩個屬性的 ComboBox選項才會有東西顯示出來...)

有沒有列印條碼的元件(編號：540)

請問如何列印條碼......

多人同時列印動態報表(編號：539)

我遇一個困難是多人同時列印動態報表
解釋起來是一台Server多個Client
有二人以上几乎在同一時間下select法語加上where不同的條件
我列表的方法是先Insert資料到一個TempTable,
再refresh crystal report中已經事先連好的TempTable
將資料印出,
可是單人列印時沒有問題,
兩個人以上可能會去搶TempTable印出的值
也可能印出是兩人select之後交錯的結果,我該怎麼辦??
請問你們都是如何列出動態報表??
謝謝您的回答!!

何謂Windows API???(編號：538)

越學VB就覺得自己學藝不精
或許是當初在學這門課時太混了....
誰可以教教我ㄋ....我想更了解

何如在TaskBar加入TrayIcon(編號：535)

請問何如在TaskBar加入TrayIcon
也許我的表達能力不怎麼好，我的意思是如何加入一個像ICQ icon的東西在時間的左邊。

VB於網路之問題?(編號：534)

VB用WINSOCK元件可否在對方傳訊息或檔案時測得對方的IP位址呢?
請高手們幫忙!

請問小吳..您站上的四個換頁按鈕.是怎麼做的?(編號：533)

我有專題須要用大量資料.(ADO+RDS)
但我希望有換頁的方式.
請問.
如何做到貴站的換頁法

如何用vb捉取檔案的修改時間?(編號：531)

如題，請各位高手幫忙!謝謝

Command Button's Event (如何持續的產生事件)(編號：530)

各位先進:
我用了一個Command Button 去累計某一個數值,
例如按一下button, 則某數加一. 問題是如果user按住button,
則理論上該持續的累加, 其實不然, 它只會加一次.
如果想要可以持續的累加, 直到user放掉button,該如何做 ?
(使用滑鼠)

Thanks

教一下......(編號：529)

我是出學者
如何用DIM/SORT/LIST/隨機檔
做成績排序
TKS

請問 MMCcontrol 如何能播放 .mpg 檔 ?(編號：528)

請問大家 MMCcontrol 要如何設定才能播放 .mpg 檔 ?
一般都聽說avi轉成mpg,請問如何才能將mpg轉成avi呢?
謝謝大家的幫忙!!

Beep(編號：526)

現在我在VB下用 "Beep" ，結果 PCSpeaker .. 就是沒反應
然後
For N = 1 To 1000
Beep
Next
結果PCSpeaker還是沒反應，但開機時PCSpeaker有"Beep"一聲，所以是正常
記得Windows下可以用API把PCSpeaker關閉
因為我沒有MSDN..總是要用試誤法來試驗API..可能在測試某個API後把它給關閉了
請問各位前輩，我要如何把 PCSpeaker的聲音再開起

有人可以教我如何用VB寫image capture的程式嗎?(編號：525)

請問要如何控制影像補捉程式呢
有人可以幫我嗎
我須要一個程式將影像補捉
然後自動編輯存檔起來

如何把變數送給crystal report做select篩選資料??(編號：523)

請問我如何把變數送給crystal report???
謝謝指導！！

不想受制於人(編號：521)

我正在使用一個program, 它可以自動移動mouse和自動瀏覽幾個網頁, http://www.alladvantage.com, 是模擬在上網的程式, 但是這個program有很多的限制和缺點, 一是此程式一定要強迫我加入它們的組織 , 二是它們一定要我輸入個人的資料, 三是此程式不能uninstall的, 要洗的時候卻要format 硬碟一次,煩!
所以我想用vb寫個更好的程式來代替它.
我想請問各位高手, 我應該用什麼方法來設計昵?
或者請問各位曾經看過哪一本書有有關的題材?我會立刻就買來看　謝謝各位

如何動態設定text box 的dataformat 屬性 ?(編號：520)

小弟撰寫程式的時候碰到如下的問題
今天我有一個textbox 物件, 是供user 填註金額的地方
另外有一個combobox 可以讓user 選擇幣別
問題在於
當user 幣別選擇 USD 的時候
　　　　 textbox 必須顯示到小數點第三位
　　　　當user 幣別選擇 YN 的時候
　　　　 textbox 必須顯示到整數(無小數)
我知道應該要動態的設定textbox 的 dataformat 屬性
但是我查詢 MSDN 的資料都找不到該怎麼去做設定
不知道有沒有人能告訴我該怎麼解決這一個問題 ?
小弟在此先謝過各位的幫忙

tree view, 如何移除children(編號：519)

請高手指教,
在treeview控件中, 當click Node時候,如何把Node下的所有child移除.　是不是用treeviews.nodes.remove?
這只可以移除一項. 不知道全部移除要怎樣做.
Altman

Patch 了VB6 SP3的慘劇(編號：518)

有沒有人也發生了這種問題？？
我Patch了SP3之後，不但當機率上升不少，甚至出現用ActionQuery篩選的資料會錯誤
就是本來不該被篩選進去的資料也被篩選進去，最可怕的是還有時會有時不會......
把整個VB移除後再重灌就不藥而愈了，所以不是程式碼的問題......

如何在listbox的每個item左邊加上icon(編號：517)

請問如何在listbox的每個item左邊加上icon

SqlServer's DTS Job Schedule(編號：515)

在SQL Server7.0上產生之DTS Package可直接執行，但以DTS產生之JOB卻會產生下述Error Message:Error = -2147008507 (80074005)　　　Error string:　無法指出的錯誤　　　　 Error source:　Microsoft Data Transformation Services (DTS) Package　　　Help file:　sqldts.hlp　　　Help context:　1100　　　Error Detail Records:　　　Error:　-2147008507 (80074005); Provider Error:　0 (0)　　　Error string:　無法指出的錯誤　　　　 Error source:　Microsoft Data Transformation Services (DTS) Package　　　Help file:　sqldts.hlp　　　Help context:　1100　　　　 Error:　-2147467259 (80004005); Provider Error:　0 (0)　　　Error string:　[Microsoft][ODBC Driver Manager] Data source name not found and no default driver specified　　　Error source:　Microsoft OLE DB Provider for ODBC Dri.
請協助解決，謝謝!!!!!!!

該如何播vdio呢??????(編號：513)

請問一下用vb能播vdio嗎??
該如何播呢???

亂數(編號：512)

x = int((20-5)*Rnd)+1
和
x = int(15*Rnd)+1
有何不同?

SQL 7.0如何做到像Access的串接刪除,更新??(編號：511)

我試了好久都不行,
可是Access就輕而易舉,Why??
是我那裡沒有設好??
謝謝!!

ASP 用COM元件傳遞變數(編號：510)

大家好：
最近自己做了一個COM元件，內有sub_name(a,b,c,d)
每次從ASP解譯時，都變成 sub_name{a,b,c,d)
請注意，變成左大刮號！無法呼叫！很慘！
請大家幫忙解答。謝謝。

About Crystal Report(編號：509)

我有三個有關CR的問題想請教各位高手:
1.列印時如何讓使用者可選擇印表機?
2.如何讓每頁的RecordNumber都從1開始?
3.我在程式畫面上有一個列印前 N 筆的textbox, 可讓user決定列印的筆數, 但在CR Design 的時候要怎麼做?

Thanx !

It is been occupied!(DBF)(編號：508)

Dear all:
I wanna open dbf databases, it is ok at the first time. After that, it showed " it had been occupied ... by Microsoft JET...", something like that.　It used to be fine when I use the same way in other projects.　Please tell me if U know my problem. thanks...

如何將純文字檔轉入Access資料庫最快?(編號：507)

Hi:
請問一下,小弟有一個數十萬筆的純文字檔,每筆都等長，且佔
三百多個collum, 今摘要格式如下
(空白有全型,半型,每筆換行是用一般的0x0D 及 0x0A 的換行字元):
1234陳金柱　文化街3號
想轉入Access 的資料庫 Schema 假設如下:
NO　　　: char(4)　(column 1-4)
Name　　: char(8)　(column 5-12)
Address : char(20) (column 13-32)
Tel　　 : char(16) (column 33-48)
因有中英文, 全型半型混合，所以算字串長度很麻煩，致使轉換
時間很.....久，想請問各位高手，用 VB 來設計的話，最快速
的方法???? 謝謝！
George.

如何取得 OCX 物件的認證?!(編號：504)

各位高手
小弟日前用vb 6.0 寫了一個active x 物件，是打算用在網頁上面的。可是日前測試後發現都無法執行。有一次將ie 的安全性調到最低，想不到就可以執行了。看了書上寫說，這是因為ocx 沒有認證，可是認證的話，個人部份又只有美國公民才可以。請問有沒有什麼辦法可以讓ie 使用自行開發的ｏｃｘ　物件而又不用調低安全性等級或是可以自行加入認證。請各位幫幫忙，我想了好久都不知道又如何解決這個問題，請各位知道答案的幫幫小弟的忙。謝謝各位。

各高手請救救我(編號：503)

我現在要做一個進貨的累加(使用data 元件 vb5.0)
譬如說現在有存貨100 個,我進30 個那就變成130 個,我要將它寫進資料庫要如何做
拜託幫幫忙 thanks

crystal report(編號：502)

今天我用crystal report designer 做一個報表,它會產生一個rpt檔
想用vb去呼叫秀出這個報表,應該如何做?謝謝各位

DataGrid值的排序......(編號：501)

請問如何讓datagrid的columns來做排序的動作呢!?

ex: columns(0) columns(1) columns(2)
　　按照大小來排序.......　謝謝指教!!

請問如何在 class 中使用 Winsock Control?(編號：500)

如題, 我在討論中心上看到 "如何做一個有Timer功能的Class?", 現在我有一個類似的問題, 就是在 class 中如何使用 WinSock component?
如果不能直接引用, 是否還有其他的方法?

做不規則的Butten(編號：499)

我先用..
GetCursorPos msPoint
Print CStr(msPoint.X) + "-" + CStr(msPoint.Y)
取得該圖的座標..hRegion
在MouseMove動作中..
用..PtInRegion(hRegion, X, Y) 來判斷是否MouseOver到該位置..
但是...總是不能得到預期的效果..
我想是不是座標上有問題..
我這樣不對嗎..

有可能嗎??????(編號：498)

請問一下利用Image的動態陣列將圖片show出來
如果想在自己喜歡的圖片bookmark起來,請問這
做的到嗎?該如何做呢?之前show圖時，只利用
磁碟機和檔案目錄做出來的。

MDI 表單的問題(編號：497)

我想在 MDI 表單啟動後自動啟動另一個 child form ,它的 style 是沒有 caption的(就是要它撐滿MDI的畫面)
我的問題是如何得知, child form 的 top , left , height, weight 的大小 .

請問如何撰寫一程式使之出現電腦的"系統資源"(編號：496)

請問該如何撰寫一函數於VB得以出現電腦的系統資源??
請告訴我??謝謝.....急急急~~~~

vb可以call Director的檔嗎(編號：495)

請問一下vb可以call Director的檔嗎??

ADO 找不到指定的提供者 Why?(編號：494)

請問各位:vb6+sp3 使用 ADO 連結 SQL7.0 做好安裝程式後大部份之PC 執行皆無問題,但有少數幾台出現 "ADO 找不到指定的提供者 "
使程式無法開啟CONNECTION,請大家告知,謝謝 !!

如何從網路芳鄰上的的電腦的某個子目錄下拷貝檔案(用VB6來寫)(編號：493)

本人想從網路芳鄰上的的電腦的某個子目錄下拷貝某個子目錄的檔案,不知用vb6該如何來寫,不知那位仁兄可告知其程式,應我vb6剛學,還請大家多多幫忙,感激不敬

An interesting FAQ(Find the number of open forms in app)(編號：492)

I see a FAQ like the following description, but I don't understand the second way. Why he uses DoEvents to get Form number?
-------------
Q:What is the easiest way to find the number of open forms in my app?
A:There are two ways - equally easy.　 The first is to retrieve the form collection count...
numFormsOpen = Forms.Count
...and the second is to use the DoEvents function!...
numFormsOpen = DoEvents

About MonthView?(編號：491)

請問有無方法可以直接將MonthView所顯示的年直接倒退20年?

有關Crystal Report的問題(編號：490)

我有資料如下:
A001 30
A001 50
A001 70
A002 30
A002 40
如何讓它印出來時強迫A001為一頁,A002為一頁,亦即分群後強迫它跳頁呢?謝謝

如何用ＶＢ寫繁體字轉簡體字的程式(編號：489)

如何寫繁體字轉簡體字的程式?
請個高手們指點一二

變數?(編號：488)

大家好ㄚ?
因為我還是新手
所以想請教大家一個問題
我再看書練習時
再寫標準體重
就看到變數=InputBox(提示訊息)
InputBox是控制元件嗎
還是工具列裡的　我找不到這個東西ㄝ
有誰能夠告訴我ㄋㄟ? 謝謝!

VB 可否存取網路上的資料庫(編號：487)

我想用VB寫一個可以直接線上存取網路上的資料庫，可以用什麼方法達成??

如何使用印表機的控制碼?(編號：485)

敬啟者:
有些點陣印表機會相容某些控制碼,如Epson的ESC/P2...等等
在PE2裡可以使用這些控制碼,在VB裡要如何才能使用這些控制碼?

Crystal Report 無法執行?(編號：484)

大家好:
我在NT4.0上安裝VB6.0及VB6.0 SP3之後再安裝Crystal Report
依布驟製作報表1.creat new report
2.選Standard
　　　　　　　3.選DataFile
　　　　　　　4.選Fields
　　　　　　　5.選sort....
　　　　　　　6.再按Preview report時出現以下訊息
Title:FaceCombo::select
missing face ;＜System＞
及一個確定按鈕
報表無法顯示
請各位指點迷津!
謝謝
Tom 12/26

3170 DAO.Workspace 找不到可安裝的ISAM(編號：483)

使用 VB6.0 之增益集、資料庫管理員、檔案、開啟Excel檔案時出現下列訊息:
3170 DAO.Workspace找不到可安裝的ISAM
請問應如何解決 ?

vb在區域網路上傳"檔案"，請高手指教?(編號：482)

如題如何用vb在區域網路上傳"檔案"，winsock好像只能傳訊息，試了好久，請各位高手幫忙!

我是新手(編號：481)

VB有哪些指令

怎樣限制視窗最大化的範圍呢?(編號：480)

當我們將一個視窗最大化的時候,它並不會覆蓋住Windows的工作列,應該是被設定了視窗工作區的範圍吧...要怎樣設定呢...

有沒有什麼更好的方法來定時偵測系統時間?(編號：479)

我想寫一個時鐘的程式,我用Timer不停的偵測..來更新時間,但是..有沒有更好的方法(比較省資源)...還是有方法讓Windows每隔60秒就自動通知程式呢?

有Windows API可以顯示ToolTipText嗎???(編號：477)

我寫了一個按鈕,是用了SetCapture的方法來判斷滑鼠的移入移出,但是只要設定了SetCapture,按鈕的"ToolTipText"裡的文字就不會被顯示出來(當滑鼠停在按鈕上的時候)...要怎麼解決ㄚ....我用過一個Form來模擬,但是當它Show的時候又會使其他的視窗變成"非使用中"...有什麼更好的方法嗎?

如何清除 form 之 picture 屬性 ?(編號：476)

設定 form 之 picture 之內容後，僅允許重設其它值(檔)，卻無法清除(恢復原空白狀態)嗎?

vb6中，如何將Data Reporter改成橫式？(編號：473)

你好，初次上貴站，請教一個問題。
我用sql7.0為後端，並用ado連結資料庫，想要製作報表，但發現vb6.0報表預設格式為直式，
有無辦法將之設為「橫式」列印之，謝謝。

*.OCX(編號：472)

我制作了一個OCX元件,但該如何讓別人在我的網頁上秀~~(在我的電腦上可RUN)~~~

有關 compact 數問(編號：471)

1. 有沒有人能告知如何在 ADO 模式下執行 COMPACT 動作 ?
2. 有沒有人發現 COMPACT 對於原始 Access db 並沒有執行壓縮動作 , 而是將壓縮後的資料庫存於指定新檔中 ? (所以目前只能將壓縮後的資料庫取代現有資料庫的方式處理)
3. 對於執行中的系統在使用資料庫時 , 有沒有同時可以進行資料庫壓縮的工具或解決方案 ? (M$ 的 Q158937 範例其實沒有用)
3. 我的 Access 2000 排斥 VB6 的 DAO 方式;即使是用 JET 4.0 及 DAO 3.6 都沒有用 , 只能將資料庫轉換成舊格式 (又不允許變更設計)
這一部份不知有沒有建議呢 ?

VB新手一問!!(編號：470)

請問如何用VB寫 Message Box(訊息方塊) ?

Recursive (stack) problem(編號：469)

When I use vb6 to wrote my TicTacTao program. Stack overflow occur in my recursive function. Please give me advices about how to solve this kind of problem T_T

vb6製成exe錯誤!help~~~~~(編號：468)

將vb6的vbp要製成exe卻發生錯誤如下:
PersonSystem1224.OBJ : error : Internal error during Pass2
ExceptionCode　　　　　　= C0000006
　ExceptionFlags　　　　　 = 00000000
　ExceptionAddress　　　　 = 0040C6D2
　NumberParameters　　　　 = 00000002
　ExceptionInformation[ 0] = 00000001
　ExceptionInformation[ 1] = 85ABE000

CONTEXT:
Eax　　= 0022A400　Esp　　= 006CF4FC
　Ebx　　= 007F0150　Ebp　　= 0022A178
　Ecx　　= 00066F5A　Esi　　= 857A6698
　Edx　　= 0022A178　Edi　　= 85ABE000
　Eip　　= 0040C6D2　EFlags = 00010212
　SegCs　= 00000137　SegDs　= 0000013F
　SegSs　= 0000013F　SegEs　= 0000013F
　SegFs　= 00004117　SegGs　= 00000000
　Dr0　　= 006CF4FC　Dr3　　= 007F0150
　Dr1　　= 0022A178　Dr6　　= 00066F5A
　Dr2　　= 00000000　Dr7　　= 00000000
可是這裡面沒一個訊息我看的懂的呀~~
請告訴我該如何除錯才是~~
謝謝~~~

如何做到每隔一個小時Check一次(編號：465)

我的DB裡預約功能的TABLE,
我的程式必須每隔一段時間去查看預約檔裡有沒有人預約.
我是用Timer控制項寫的,timer1.Interval =1000
它每秒都在Check要不要去查看TABLE
這樣寫會不會很浪費系統資源呢?
有沒有其它更好的方式呢,謝謝!!

什麼是resource檔(編號：464)

請問什麼是resource檔,我們何時會用到??
請問在那裡有呢??
謝謝!!

外掛元件封裝後無法執行(編號：463)

請問各路高手:
我在VB程式使用了一外掛物件Spread, 封裝完成後, 在別台電腦上安裝, 過程中有出原無法註冊該元件的錯誤, 選略過, 在安裝完成後一執行到有用到該元件的地方, 即產生錯誤, 請問該如何解決???

有沒有人用VB寫Game?(編號：462)

我想知有沒有人用VB寫Game?
如果有，他們用什應作圖象處理的SDK?

搬移盤子(編號：461)

請問要如何做下面的…
設有三個可搬移盤子的柱子，
　一次只能搬一個盤子，
　且最小的一定要在最上面，用遞迴法求出來。
　　 _
　　(!)　　　　 ! !
　 (_!_)　　　　!　　　 !
　(__!__)　　　 !　　　 !
(___!___)　　　!　　　 !

(____!____)_____!_______!______

要能輸入盤子的個數n，
還要把「第1個盤子從第1個柱子移到第二個柱子……」
　　在螢幕上表現出來…

麻煩會ㄉ人教一下好嗎?
　　　救救我吧… /_\
　　　　　　　　　　　 Thanks

如何在vb寫ping程式??(編號：460)

請問大家....
如何在vb上寫有關icmp的程式, 像ping
　　 thanks.......

急件..................救命丫(編號：459)

我使用貴站【沒透過Driver的印表】的範例程式，可是
openprinter("LPT1")執行時，VB6.0卻出現錯誤對話方塊，內容為
錯誤的【外部程序】。請各位超級高手，為小弟解決，病樹上簡單的範例程式，感激不盡。

RichText Box with Scroll Bar(編號：457)

大家好:
我目前用 RichText Box 來寫入資料,每一筆資料一列,
由於資料頗多,所以會用到垂直捲軸來觀看資料.
我的問題是當我輸入完資料時(程式自動輸入),它總是從第一筆
開始秀(垂直捲軸再最上方),請問有沒有方法可以看到最後一筆資料,
用不找每次都要去移動垂直捲軸至最下方
謝謝

日期如何累加咧?(編號：456)

For Example:
Dim Date,Date1
　Date="890101"
　Date1=Date加一天--＞請問該如何做咧???
TKS

vb列印套表之問題(編號：454)

如果要使用vb列印套表(好幾聯),而且位置能
列印得很精確,除了crystal report外還有其
它方式?

資料庫結構的問題 !!(編號：452)

各位先進:
請教一個與VB 無直接關係的問題,
會計上有五大類科目(資產, 負債,業主權益 ...)及其子科目.
例如:
01 資產
　　　0101 速動資料
　　　　　　 010101 現金
　　　　　　 010102 銀行存款

上述數字為科目代號, 文字為內容描述
不知道要如何安排如上的檔案結構會讓程式比較容易開發.

錯誤訊息:找不到物件或屬性(編號：451)

最近使用vb封裝精靈,製作setup程式
安裝後部分機器執行時產生錯誤訊息;找不到物件或屬性
請問這是因為ocx未成功註冊所產生的嗎?
或是其他原因.
請幫我解答!
thanks a lot
janet

如何偵測與結束commport(編號：450)

VB如何偵測由其他應用程式控制之commport狀態，若該commport在連線狀態，又該如何強迫使其斷線？

VB6 無 Help檔 ?(編號：449)

VB6 安裝後為何無Help檔呢?

請問是否有Tool可以追蹤某個EXE檔執行時呼叫到這個DLL的那些函式(編號：448)

請問是否有好的Tool可以追蹤某個EXE檔執行時呼叫到這個DLL的那些函式嗎??
謝謝您了

要怎麼知道兩張圖片是一樣的?(編號：446)

如題

WIN98下VB編譯後的EXE不能在WIN95下執行(編號：445)

為什麼WIN98下VB寫的程式編譯後的EXE在WIN95上執行會產生[無法預期的錯誤],好像是COMCTL32.OCX在WIN98版本比較新,在WIN95比較舊,不知是否有解決方法因不想在Client在每台都升級元件太多台了:＜

ado的connection 的execte只能用所謂的ACTION QUERY嗎..(編號：444)

請問大家..
我用 ADO 的 SELECT INTO　A1IN　DB1 FROM　A2
轉換資料庫正常而且快速..
但我用 SELECT * FORM A2 WHERE　A2_ID ='5'
會發現速度比上面一個的要慢..而且容易當掉程式 ..
用CN.EXECUTE 做查詢的正確動作應該怎樣作呢?

用VB5設計TELNET....可能嗎？(編號：443)

請問一下..用VB5能設計出TELNET嗎？
PS：希望可以用來玩MUD..

datareport問題(編號：440)

datareport與dataenvironment
如果table欄位值為(boolean)true/false,報表內要印出男或女
該如何達成?

以 ORACLE 8.0.5 為後端資料庫時遇到的問題和編題320不一樣(編號：439)

各位好，我的問題是：在前端的機器上的ORACLE都灌好了，但用ｖｂ封裝好的程式卻不能執行，在前端機器上ORACLE的連線都可以跑，可是卻又出現請安裝ORACLE 7.33或以後的版本，或抓不到ORACLE的問題

[VB] 到底時間拖在哪裡(編號：436)

[VB] 到底時間拖在哪裡
簡單的來說, 就是物件類別產生後, 時間到底慢在哪?
時間表如下, 由物件類別完成 Value 設定, 但是到 Form_GotFocus 卻越拖越長...
nPoint　　　Form_Load (s)　　Form_GotFocus (s)
-----------------------------------------------
1,000　　　　0　　　　　　　　 0.109375
10,000　　　　0.269513　　　　　5
20,000　　　　0.5507813　　　　32.23828
100,000　　　 25.48252　　　　　不明 (等了四分鐘只好強迫中斷)
-----------------------------------------------
測試環境:
CPU: Pentium II 300, SVGA: S680/4MB, DRAM: 64 MB, OS: Win98c SE, VB5 SP3
測試程式碼如下:
-- cPoint.cls -- 自訂物件類別模組
Public x As Double
Public y As Double
Public z As Double
----------------
-- Form1.frm -- 測試用, Form1 畫面上未佈置任何物件
Private st
Private Sub Form_GotFocus()
Debug.Print Timer - st
End Sub
Private Sub Form_Load()
nPoint = 20000
st = Timer
ReDim cP(1 To nPoint) As New cPoint
For i = 1 To nPoint
With cP(i)
.x = Rnd
.y = Rnd
End With
Next i
Debug.Print Timer - st
st = Timer
End Sub
------------------

resource 資源檔的使用?(編號：435)

請問何處有resource檔的詳細使用介紹，本人手中的VB書中皆無介紹，偶然在一英文網頁中看到一篇resource files的簡介，此資源檔可包含BITMAP,CURSOR,ICON,SOUND or VIDEO，SOUND is a .WAV file，那如要包含.JPG or .MID 時該如何處理及使用呢？謝謝大家。

vb6能使用outlook傳mail出去嗎？(編號：434)

您好:
想請教一個問題，小弟知道vb可以傳送如exchange的mail出去，但是如果想利用outlook呢？

如您知道，請您告訴小弟，謝謝您！

請問,VB6匯入Access2000檔案出現【無法辯識的檔案格式】,該如何(編號：433)

請問,VB6匯入Access2000檔案出現【無法辯識的檔案格式】,該如何解決?

如何做一個有Timer功能的Class?(編號：432)

在form中可以使用Timer control,並有Timer_Timer() event會產生,我想做一個Class,希望在裡面也有相同功能,我試過下面方法但是不行,
Dim Timer1 As Timer
Private Sub Class_Initialize()
Timer1.Enabled = True ' error
Timer1.Interval = 1000
End Sub
Private Sub Timer1_Timer()
....
End Sub
我也試過開一個form,裡面放一個Timer,class裡面用Set Timer1=form.Timer1,可是Timer event不會trigger class裡的Timer1_Timer()...

[VB]如何取得CONNECTtion.execute 所傳回的資料集?(編號：429)

請問大家
我寫了這樣的程式:
dim cn as adodb.connection
dim rsmyqry as adodb.recordset
dim myqry as string
my qry="select * from a1
sub command1_click()
cn.connectstring="dsn=a1"
cn.open
cn.execute myqry
set rsmyqry =cn.execute myqry
do while not rsmyqry.eof
print rsmyqry(0)..'
loop
rsmyqry.close
set rsmyqry=nothing
cn.close
set cn=nothing
end sub
請問為甚麼會出現"語法錯誤"及"必須是陳述的結尾呢?"

小吳大哥請進來看看：(編號：428)

小吳大哥您好！請問您一個與VB無關的問題：
在您的網站更新之前的您的網站是放在公司內嗎？而現是放在家裡的PC上？
(因為想了解一下最近登入時速度較快的原因)，如果是在家裡的PC內的話那您是用那種方式連上網路的，會不會很貴呢？(須不須要小弟每次上網時都幫您在您的贊助廠商上按一下，但是不知道在進入該贊助廠商的網頁後、立刻退出後再次進入時是否會重新計算一次(您的收入)(這點很重要哦！)？
POST上述的問題主要是因為小弟最近在學那該死的NT，有一些事情搞不懂時想到網路上找資料時，竟發現沒有一個像小吳大哥所架設這樣子的網站，有的只是一摻雜了各種廣告的論壇及一些沒有我想要的網頁資料(都沒有可以問的對象，唉！被小吳大哥所建立的網站給寵壞了)，這時候的感觸真的很深，網路雖然很多資料但是卻不一定有能力肯用心的管理者(小吳大哥在網站改版後的出席率幾乎是每天！)，
有感於此所以想報答但是不曉得是否有此須要(不過次數則須視小弟所能負擔的範圍內)
如果可以的話請告訴小弟，讓小弟也長長見識！ THANKS！

VBG(編號：427)

請問您的廣告贊助商中的VBG有何功用?

有關圖形檔(編號：426)

請問一下如何使用vb 畫出圖形後將圖形轉成gif 或
jpg 的檔案

Transform Statement 可以用在查詢SQL Server 嗎(編號：425)

請問
Transform Statement 可以用在查詢SQL Server 嗎
可以直接在 Query Analyzer 或 isql 中使用嗎

MTS的DLL回傳的Recordset變成空的(編號：424)

請問,在我DLL還沒放入MTS裡時,一切正常,但為什麼當我的DLL放在MTS裡時,回傳的Recordset就變成空的(在DLL裡有取得資料),可是前端卻收不到,環境NT sp6,option pack 中文,vb 英文,後來改為中文的vb也不行,使用2.0的ADO.還請高手指教.

這叫 QP 碼嗎?(編號：423)

比如說:
http://search03.kimo.com.tw/cgi-bin/webgn2?Query=%B8%D1%C4%B6%BE%B9%26%A4U%B8%FC&CallBy=1
中
%B8%D1%C4%B6%BE%B9%26%A4U%B8%FC =＞解譯器&下載
是屬於哪種編碼?
我寫了一個轉回函數, 想要放上培基語言網頁, 可是我不知道這叫什麼編碼, 所以我無法寫說明...
不過他的編碼方式跟 QP 碼相同, 是叫 QP 碼嗎? 可是 QP 碼不是以 "=" 分隔嗎?
???

如何得知DLL中有那些函式可用?(編號：422)

Dear 小吳:
謝謝您的回答!!
請問您是否知道我如何透過工具程式來列出一個DLL中的函式 (有哪些提供的函式)
有這樣的工具程式嗎??

請問如何用ADO修改Database欄位的大小！(編號：421)

請問如何用ADO修改Database欄位的大小！
可否用VB寫出已存在的欄位要改變大小！
煩請知道的高手解答！

請問VB有無輸入IP的元件??(編號：420)

請問VB有沒有像windows做TCP/IP設定時
的那種元件?
就是一個input box 有四個欄位
每個欄位的值介於0~255

crystal report(編號：418)

今天我製做好一個報表檔report.rpt
如何在程式中呼叫,參數如何傳入
謝謝!各位大哥,大姐

請問小吳，從EXCEL輸出入資料至VB要如何做？(編號：417)

如果是要輸出入一固定格式，像是EXCEL格式的報表，要怎麼作？？
我試過輸入EXCEL格式的資料，但是似乎畫面不能作處理，像是箭頭、圖片等等的物件都不能插入，甚至連格線都不可以有
否則會發生錯誤

如何確實取得MultiLine的TextBox中每一行的內容？(編號：416)

站長請問一下............
如上所說，如何取得每一行的內容？
我的意思是取得textbox個別一行的內容，因為要做對齊報表欄位的動作，但是如果直接
Printer.print text1.text的話會一直線印下去，而我的欄位有好幾行，試過用插入換行字元，
但是這樣會印到下一行的最左邊，而且一不小心會把中文字切斷變成亂碼...........＞_＜
現在唯一想到的解決方案是每一行印一次，而且還要求USER每一行都要按ENTER
(其實重點就是textbox會自動把超出寬度的字捲到下一行)

請問VB 如何有DOS BASIC 的 CHAIN 功能?(編號：414)

閣位好,小弟目前還是使用VB4.0,但找不到方法先關閉自己的程式後再自動呼叫別人的程式, = 從前的 CHAIN 功能, 請指點指點, 多謝

這個DLL很奇怪耶...??(編號：413)

Dear 小吳:
我拿到了一個DLL檔, 把它放在C:\Winodws\System中
然後用以下的函式呼叫其中的API
Declare Function BrCommInit Lib "BrComm32.dll" (ByVal Port As Long, ByVal sdlen As Long) As Boolean
VB竟然跟我說"Run-time error 48: File Not Found"
我換一個方式將這個BrComm32.dll檔Copy到C:\根目錄,
用強硬指定的方式呼叫
Declare Function BrCommInit Lib "C:\BrComm32.dll" (ByVal Port As Long, ByVal sdlen As Long) As Boolean
竟然還是"File not found"....
不會吧?? 檔案在啊! 檔名也沒錯耶....為什麼會這樣呢??
救救命啊.....

兩個Form之間的問題(編號：412)

大家好:
想請問各位當Form1執行時呼叫Form2希望Form2 unload 後Form1
才可Active不知如何處理.
或者類似msgbox一樣的功能
Thanks
Tom 12/21

安裝程式(編號：411)

你好, 有些問題想請教.
我用 VB5+SP3 封裝了一支程式, 但是最近同樣的又封裝了一支程式,
但是當最新的這支程式安裝完後, 第一支程式竟然執行時跳出錯誤代碼
52 出來, 移除掉第一支程式, 重新再安裝一次, 執行時只透出畫面就
沒有動作了, 這.....是什麼原因呢??
又一支程式原本執行好好的, 不過發現有些 bug 將其修正後, 直接將
編譯好的執行檔覆蓋過去, 執行時竟然會發生錯誤??

關於安裝程式dll問題.......(編號：410)

在製作安裝程式時,能否把vb自己抓到的dll或ocx檔的安裝目錄從它預設的$(WINSYSTEM)都改成$(APPPATH),這樣VB程式在執行時會自動指向程式安裝目錄嗎??
ps:想這樣做的原因是想把應用程式的所有有關檔案都放於同一目錄下.
煩請答之,先謝過~~~

讀進檔案(編號：409)

請問
將檔案讀進成字串時，逗點讀不進來
要如何才能讀進完整的內容呢?
THANKS!

請問如何在Progress Bar上標示文字…(編號：408)

請問如何在Progress Bar上標示文字~~
如VB在載入檔案時，於工具列右方~~
會在ProgressBar上顯示 “載入中...“這種狀態~~~
請問有人知道如何做或想法嗎？謝謝~~~~~

一點建議(編號：407)

小吳您好,新的討論區成立,用起來速度快很多,且同樣的
討論內容可於同頁觀看也很方便,真的感謝您的付出.只是
我有些建議,提供為參考:
1.post的作者名稱無法在目錄下找到(回答問題的)
有點不習慣,如小吳回答了不少問題,但我卻無法直接看到
　您對那些問題做了回答,必須一個一個去找.....
2.對於位於中間頁的post若要觀看,需要按上下頁好幾次,是否可
以提供編號or頁次的查詢?
另,對於第一項,我覺得可以在問題的標題下加一行回應作者的
姓名列,例:
編號標題　　　　總回應數　...　發表人
-----------------------------------------
001　VBQA建議　　　　 1　　　　　大漢堡
回應作者: 小吳
-----------------------------------------
002　??　　　　　　　 2　　　　　 ??
回應作者: 大漢堡,小吳
-----------------------------------------
再次感謝您的付出!

ado在datagrid元件使用?(編號：406)

請教各位仁兄
利用ado取access mdb database 在datagrid元件中,如果不使用屬性datasouce項指定,如何直接在程式中寫?
另外在access 中已設key值, 如何在程式中互換?
以上謝謝!　初學者禹鈞上

請教各位先進幾個問題~~感激不盡~!!(編號：405)

1、請問我要計算程式執行之CPU時間，有這種函數嗎？
Trubo C有 clock()函數~可是VB的時間函數，我知道的
　只能處理到秒數而已，可否得知0.多，小數點以後的秒
　數呢？？
2、我用TextBox作使用者輸入的工具（multi-Line設False），
而我想讓使用者輸入完後按Enter，直接跳到下一個TextBox
　作輸入，我利用偵查鍵盤輸入（keydown）的函數作，成功了
　，但是卻會發生一聲嗶聲（因multi-Line設False，故在textbox
　下按Enter會發生嗶聲），請問如何將嗶聲拿掉呢？
謝謝各位~~~感激不盡~~~~:)

給小吳一個小建議!(編號：404)

進到討論區後無法連結其他功能區(如首頁)

Music CD的遺問(編號：403)

請問一下
現在市面上的音樂CD是不是有一個唯一不重覆的序號
如果有
在VB裡要如何讀取這個序號呢?
因為在windows的CD player會自動將你輸入過的CD資料存起來
等下次放入同一張cd時它就會自動載入你上次輸入的資料了,
我想寫一個有這種功能的程式

字串處理的問題....(編號：401)

vb的mid函數是使用字數的位置來擷取字串，
可是這樣的話就不能正確擷取中英文混合的字串，
如果要正確擷取中英文混合字串，請問該如何做呢？
記得好像有人問過，
不過找了好久找不到，所以再問一次...........:)

How to insert Animated GIF and Sound(編號：400)

I want to create a Christmas Card executed file
Could you tell me how to insert:
1) Animated GIF
2) Sound
to a executed file without sending gif and sound file separately.

sql-server 的master 資料庫無法restore,single user mode 無法(編號：399)

sql-server 的master 資料庫無法restore,message 'must be used in single user mode' 但是我打開其properties ,其選項'single user mode' 卻是反白無法點選.請問如何處理?

VB6.0能否製作程式更新檔？(編號：398)

如題，就是類似所謂的Patch檔，敬請賜教，謝謝。

what is the sytax to pass the parameter to main program(編號：397)

i just want doing something like this ........
c:\test 1 abc 3
then i pass 3 parameter into the program
what is the sytax? Thx!

小吳，請問一下自動安裝程式是不是該更新囉，小阿哥？(無內文)(編號：396)

如題

關於 form 與 form 之間的傳遞(編號：395)

請問大家，
我想讓一個 form1 能夠接收另一 form2 傳來的資料
我的方法是在 form2.show 之前先設定 form2.text1 = "aaa"
然後我再到 form2 中利用 aaa 來做處理
但很奇怪的是我 form2 中的 text1 欄位可以正確顯示 aaa 無誤
但我要抓它的值 (str = text1.text) 時卻抓不到值?
請問是我那裡沒有注意到了呢?
另外關於 form 與 form 之間的傳遞有沒有什麼更好的方法?
我只知道利用控制項來傳資料而已
有沒有方法是可以直接讀取參數就可以了?
先感謝您的回答~~~~~

請問如何控制數個過程(Process)的優先序(Priority)(編號：393)

請問各位vb的高手:
如何用主視窗按一個按鈕就跳出3個能各別作業
　　　　　　　　
　　　　　　　　的子視窗(Process)並同時執行，並在一開始時在
　　　　　　　
　　　　　　　主視窗能選擇這3個子視窗的優先權順序(Priority)

謝謝各位!!

控制項.....(編號：392)

請問各位先進:
在表單中是否可以傳參數到自己設計的控制項,(非屬性值)
　若可以在控制項中須加那種事件.......
　(執行階段中可改變)

　　　　　　　　謝謝 .....

Sorry!再問一個問題-如何讓螢幕閃一下?(編號：390)

Sorry!大家好:
再問一個問題-如何用VB讓螢幕閃一下?
再次謝謝!
Tom 12/19

如何在vb中呼叫螢幕保障程式(編號：389)

大家好:
有兩個問題請教:
1.我想在自己的VB程式中呼叫一支螢幕保障程式,不知如何呼叫?
2.螢幕保護程式製作是否有現成的軟體可使用?
在此先感謝大家!
謝謝! & Merry X'mas!
Tom 12/19

檔案回存至 SQL SERVER 時,變慢了,好像當機似(編號：388)

高手們:
要將檔案存到SQL7.0資料庫時,(例如:123.DAT)
　都要存好久,一個5MB的檔案,將近要30秒
　我用 ADO.APPENDCHUNK 傳入的
　之前資料庫是 ACCESS時,頂多5秒內就好了
　為什麼改為 SQL 為後端時,時間變這麼慢 ?
　以下是一小段程式碼
　 iFileNum = FreeFile
　 Open ArrayFiles(j) For Binary Access Read As iFileNum
　 lLen = LOF(iFileNum)
　 lChunks = lLen \ BLOCK_SIZE
　 lFragment = lLen Mod BLOCK_SIZE
　 ReDim bChunk(lFragment)
　 Get iFileNum, , bChunk
　 TempRS!FileObject.AppendChunk bChunk
　 ReDim bChunk(BLOCK_SIZE)
　 For lCount = 1 To lChunks
　　　 Get iFileNum, , bChunk()
　　　 TempRS!FileObject.AppendChunk bChunk
　 Next
　 Close iFileNum
　請問各位,有可以解決速度的方法嗎??
　煩請各位代為解答, 謝謝 ^_^

所有的form都隱藏時，如何知道鍵盤及滑鼠被動到。(編號：386)

所有的form都隱藏時，如何知道鍵盤及滑鼠被動到。

如何將寫好的單機版程式改為網路(Client-Server)模式?(編號：385)

請問各位
要如何將原本寫好的單機版程式改為
網路(Client-Server)模式
我用的資料庫是mdb資料庫
謝謝各位

vb 如何透過ole 產生 word 報表(編號：382)

我看過一個軟體是以前端vb 3.0 加foxpro 2.5 後端，據說是以
ole 技術產生word 報表，只看見啟動後，word 檔就像套版似一直
填入data,雖然很慢，但是報表格式卻隨心所預般產生，不知如何做
的?誰人告訴我，謝謝。

請推薦介紹Windows API的書...(編號：381)

不知市面上有沒有哪幾本書專門介紹Windows API的書呢？
可否推薦一下...謝謝

請問... 如何判斷使用者電腦上所安裝的Jet Driver版本???(編號：378)

請問各位前輩's:
如何判斷使用者電腦上所安裝的Jet Driver版本???
　我想做到判斷：
　如果使用者電腦上安裝的是OFFICE2000則用Access2000的MDB
　如果使用者電腦上安裝的是OFFICE97則用Access97的MDB

請各位前輩's下指導一下!!謝謝!!!!!

請問...如何讓程式自動產生流水號(編號：377)

請問：
如何在程式中自動產生流水編號(流水編號格式:yymmddxxx;年月日+序號)
我曾想過在加一個Table來存放流水編號
但是... 這樣若是程式在多人使用(網路版)時，好像會有問題耶...
p.s上面只是個人的假設。
不知道是不是有高手能指導一下!
謝謝各位的支援!!!

不知道有沒有人遇到這樣的日期處理問題...(編號：376)

在Table中的欄位型態為日期時間時：
1.新增資料時，若是使用者沒有提供該欄位資料。則在資料庫中如何將該欄位空白？
2.若是在更新的時候，使用者所輸入的日期不是合法的日期格式。則將該欄位空白。
我目前個人的做法是：
1.下達 Insert Into敘述時判斷如何所接收到的資料不是合法的日期格式就跳過該欄位的處理。
2.下達Update 敘述時則與1處理方式相同。
不知道是不是有高手可以指導一下，關於這方面的處理方式。
謝謝大家的支援!!

資料庫更新的問題?(編號：375)

VB6+Access資料庫如何更新?例如table1:code(key),qty
table2:code(key),qty
需求:如table2的code無table1的code時
要完全新增一筆table1的記錄,否則要將tbale1的qty
加到table2的qty上,請協助thanks...

如何在 VB 中下達 DOS 指令(編號：374)

如何在 VB 中下達 DOS 指令,例如 copy test.txt lpt1

有關MSComm控制項(編號：372)

這個控制項可控制RS-232,但使用時必須先指定
連接Port代號,請問我如何取得com1及com2的代號??
多謝指教!

請教我想打開字型連結檔(編號：370)

請教我可否有辦法打開字型連結檔~~(phone.tab)~~~?或有其他辦法可
已查詢到中文的asc code和注音(或羅馬拼音)的對照表?

For 郭弘毅先生(編號：368)

1.你要的編號是51,52的則POST
2.直接設定DataEnvironment的ConnectionString
其實與Adodc的設定相同,只是我不習慣用這個方式

呼叫表單....?(編號：366)

請各先進:
在表單的呼叫可否使用變數來替代表單的名稱,再以變數名稱呼叫
例:
strtemp　為表單name的變數
　 strtemp.show
　換句話說是一種動態呼叫表單
　　　　
　　　　　　　　　謝謝

單元索引(編號：365)

大家好:
我遇的一個問題，我在資料庫中有一欄位做為單元查詢，我利用adodc將欄位內容additem到下拉選單中，可是要不是全出來第一筆的內容，如果利用movenext將紀錄指到下一筆時，卻又說該記錄為bof 或eof或該記錄刪除了，天啊我該如何啊？

HELP(編號：364)

有沒有方法可以一次過DELETE ALL RECORD AT STAFF TABLE

關於textbox上輸入法的問題(編號：363)

如果說我要在textBOX上輸入日文字但有安裝日文版本之輸入法,但是都沒有辨法在vb上顯示日文輸入法,但在IE的textbox或Word上就可以顯示日文輸入法, 如何VB之textbox修改成可以顯示日文輸入法,

再問個笨問題.........(編號：362)

有沒有辦法讓工作列上的"開始"按鈕失效呢??

有個小問題，想請教大家!!(編號：359)

資料庫的日期欄位(opendate) 定義為 smalldatetime
日期區間: TXT ~ TXT1
dim txt,txt1 as string
SQL:select opendate from table where opendate between txt
and txt1

執行結果出現error:"準則運算式的資料類型不符合"
這是為什麼呢??是不是有那邊沒注意到??
謝謝大家.....^_^

請高手指點迷津??(編號：358)

為何編輯好的程式依正常程序安裝,(用於公司內之網路 LAN 共同區), 有些電腦能正常執行, 而有些卻出現下列錯誤訊息(WIN95,及 WIN98)都有此問題, 是否缺少何檔案.
ADO 找不到指定的提供者.
執行階段錯誤 '3706':
應用程式或物件定義上的錯誤.

請問小吳,一直是Module,why?(編號：355)

再請問小吳,我不論在win3.1將vb3的frm存為txt,再從vb6讀出
或是更名為frm再讀出,vb6一律都將它掛在Module,所以表單元
件也就........;mark亦無法存成txt,謝謝您的幫忙!!

Asp 如何使用常數(編號：354)

大家都知道vb有很多內建常數,例如：
Recordset.Open "northwind",conn,adOpenDynamic,adLockReadonly

可是我卻不能直接使用這些常數，必須輸入 2,3,2這些常數值
為什麼？

form.obj(編號：350)

我的專案資料夾中有附檔名為.obj的表單，請問這是甚麼？

大問題!!!!!!!!(編號：349)

假設有3個不同的餅乾,要分給3給小朋友,
每人一個所有可能的分法共有(1,2,3),
(1,3,2),(3,2,1),(3,1,2),(2,1,3),
(2,3,1).....六種.

這個程式的問題出在哪?
Dim a() As Integer, n As Integer, c As Integer
Private Sub Command1_Click()
Form1.Cls
　 c = 0
　 n = InputBox("輸入一個數字", "", "3")
　
　 ReDim a(n)
　 For i = 1 To n
　　 a(i) = i
　 Next
　 Form1.Print
　 Call p(1)
End Sub
Public Sub p(ByVal k As Integer)
Static x As Integer
x = x + 1
If k = n Then
　　 c = c + 1
　　 Form1.Print c; ":　";
　　 Call display
　　 Form1.Print
　 Else
　　 For i = k To n
　　　t = a(k)
　　　a(k) = a(i)
　　　a(i) = t
　　　Call p(k + 1)
　　 Next
　 End If
End Sub
Public Sub display()
For y = 1 To n
　　　 Form1.Print a(y);
　Next
End Sub

有關顯示File Name的方法。(編號：348)

我現在做一個ListBox用來顯示某個Directory的某種檔案(如:*.txt)
我想要在顯示出來filename刪去extension Filename。(即在listbox題示時只顯示FileName而不顯示".txt"。)
有沒有方法?

請問如何知道傳進來的OBJECT原來是什麼TYPE?(編號：347)

例如抓一個FROM的所有Control
要對某些作額外動作
必須知道型別　..............

壓縮程式怎麼做啊？(編號：343)

能不能vb作一個簡單的壓縮呢？

如何用vb製作桌面小程式呢(編號：342)

Dear 站長小吳,
請問一下,我想要用vb開發桌面小程式,我該如何讓圖檔或表單中的影像部份,背景變透明呢?
敬請指教,謝謝了 :)

如何用winsock控制項傳e-mail??(編號：341)

vbpro.net 中的postman範例根本不能用說???
誰有較好的範例??

有此一問，借問各派vb高手(編號：340)

封裝後，在執行安裝程式時出現EXPSRV.DLL無法註冊是什麼原因呢??

請問這樣子的需求 , 該如何下SQL(編號：339)

姓名　項目別(A-G)　　數值
-------+---------------+-----
小明 A 50
小明 E 40
小明 C 66
小明 B 55
王二 B 60
王二 D 55
王二 F 10
大林 C 75
大林 G 55
老王 A 68
老王 B 10
老王 C 40

請問上述一個表格中用什麼方法可以最快得到
姓名　　A　B　C　D　E　F　G
-------+--+--+--+--+--+--+--
老王 60 10 40 0　0　0　0
大林 0　0　75 0　0　0　55
王二 0　60 0　55 0　10 0
小明 50 55 66 0　40 0　0

請高手指點指點

請問有誰知道如何將任何檔案的格式(.xls,.doc.pdf...)存入或讀出(編號：337)

我有試過AppendChunk,GetChunk但試不出來,請問有誰有此方面經驗的,感激不盡

如何刪除一個已執行的vxd檔(編號：336)

我在程式中刪除一個vxd檔,出現Files access的錯誤訊息,請問要用何種方法才能刪除
這個vxd檔,或是將這個vxd檔從記憶體中移除.謝謝.

Form with browser function(編號：335)

敝人想使用vb撰寫一類似browser的表單,但功能不需如此複雜,只要能在此表單中顯示設計好的homepage?該如何下手??

座位表(編號：334)

請問一下例如我用textbox(i)　i=0 to 55 排了一個 7*8 的textbox 來做座位表可是名子放上去後沒辦法印出來你有辦法嗎
還是要先存到excel 在印出來
存到excel 要怎麼設定相對位址
麻煩教一下　由衷感激
leo

請問要怎麼寫工具提示?(編號：333)

請問一下……
當滑鼠移到物件上面一下子時……會出現一段工具提示……
這個要怎麼寫~~~謝謝~~~~

有關Windows APIs.(編號：332)

為什度我在書上和網上看到的Windows API sample時，通常用的變數名稱都是hWnd等怪名，有沒有意思?
另外，有沒有方法可以自己找出API來用?
VB裡面有一個叫API檢視員，有什度用?

請問如何使用modem遠端存取access資料庫?(編號：331)

我使用NT之RAS功能,已能使odbc設定經由數據機與遠端網路磁碟機成功建立聯線,但是運用VB中的EDO/ADO企圖存取ACCESS資料庫均失敗,在連接命令語句均無法執行(但同樣程式在使用HUB/乙太網路聯結環境中執行正確無誤),雖調整TIMEOUT時間,確依然無效,請求高手指點迷津?THK!

有關vb6.0封裝--expsrv.dll發生錯誤(編號：330)

請問使用vb6.0製作安裝程式再執行安裝時出現註冊檔案expsrv.dll發生錯誤,好像找不到此檔案,事實上,再封裝過程中
有見到包含此檔案,是怎麼回事,如何解決,請告知謝謝!

求救！VB 如何設定預設印表機 ???(編號：329)

請問 VB 如何重新設定系統預設印表機 ???
謝謝！
CARY

VB5+SP3 -- 控制項過時(編號：328)

各位先進:
我用 VB5+SP3 封裝精靈包裝程式時,
它告訴我"相關檔案過時"--"MSCOMM32.OCX,COMCTL32.OCX"
請問該如何解決此問題呢 ?
謝謝 !!

如何撰寫錯誤訊息(編號：327)

當程式執行中發生錯誤時,按下確定,程式就自動關閉,是否可設定不管發生任何錯誤,在按下確定時,程式不關閉,只關閉錯誤訊息對話方塊?
謝謝

救命..oleaut32.dll(編號：326)

我用的是6.0版, 終於完成了程式
也用封裝部屬精靈找到了該要的*.dll和stdole2.tlb檔案
並把它們都一起燒成一片光碟
但是有些電腦卻顯示 "oleaut32.dll 檔是舊的版本, 這個程式需要新的版本"
我去microsoft的網頁上找,
它說要找的oleaut32.dll檔大小應是473,872bytes, 版本是2.20.4049
但我電腦裡的版本比microsoft說的版本更新!! 是2.30.4265
又去找了其他同事的oleaut32.dll更新的版本, 也是出現同樣訊息..
為什麼為什麼..為什麼..
救救我吧...　謝謝大家....

請教高手(編號：325)

使用vb6封裝精靈後，會抓source的c:\windows\system\下的oleaut32.dll或其他的*.dll檔，若安裝在原機器時，可正常安裝，但安裝在其他PC時，會出現oleaut32.dll版本是否更新，然後要求重開機，結果在被安裝的PC內的c:\windows\system\oleaut32.dll檔案大小為0，請問要如何解決該問題。如何不安裝不需要的*.dll。

字串比對(編號：324)

vb6中要如何比對一個字串中是否包含某個特定的字元

如何使Form中的圖，執行時在視窗中能顯示透空(編號：322)

圖為滑鼠，因為是四方圖，所以除了滑鼠以外，都為白色空白
所以希望白色空白處，執行時在視窗上能顯示透空(含移動Form
時也能有一樣的效果)

以 ORACLE 8.0.5 為後端資料庫時遇到的問題...(編號：320)

大家好:
我以 VB 6.0 透過 ODBC 的方式存取 ORACLE 8.0.5 資料庫.程式是在 NT 4.0 上發展的.目前程式已寫好,使用 Package & Deployment wizard 做成 setup files. 可是要在前端安裝時卻遇到問題, 因為我是透過 ODBC 的方式存取 ORACLE 8.0.5 資料庫,所以必須在前端設定 ORACLE 8.0.5 的 DSN name.而我的前端都是 Win95,在安裝ORACLE 8.0.5 的 client 端時,每次都似乎無法安裝完成就結束,接著在設定 ORACLE 8.0.5 的 DSN name 時,一按下新增按鈕就跳回 ODBC 的設定畫面.試了好幾台 Win95 都一樣.可是 NT 上都沒問題, Why ??

Storprocedure 使用Cursor作運算之後,無法將結果Show至data Grid(編號：319)

Storprocedure 使用Cursor作運算之後,無法將結果Show至data Gride:
[1] VB6 Use Data environment Call SQL7.0 之Storprocedure
Storprocedure 之內容是select * from Table
　　VB6 執行之後有將Recordset傳回VB6並Show在 Data Gride

[2] Storprocedure 之內容是
select * from Table Where ......
　　use cursor 作運算
　　有用到 #Table (虛擬Table)
　　最後得到一Recordset 將其存在 #Table
　　將其 select * table into AA from #Table
　　執行之後用SQL去查 AA Table 存在且有我要之值
　　但 select * table　from #Table
　　卻無法秀至Datagride

PS:[2]動作皆在SQL 7.0之 Storprocedure 內撰寫

請大家幫幫忙,謝謝您

　　　　

讀取整個文字檔內容(編號：316)

vb6要如何讀取整個文字檔的內容到一個變數呢?

如何將TextBox中的text傳到email application中?(編號：315)

我要寫一個電話簿program，有一個textbox用在紀錄email address。
我可否在textbox旁加一個Comand Buttom，按後會開動預設的email application(如Outlook或Netscape Mail等....)并將該Textbox的文字set做email program的收件者address?
如果可以，要怎樣做?

Chr$()(編號：314)

大家好!
我的問題是,我在用Com送出資料來控制外部系統時,
出現了一個問題:
Comm1.Output=Chr$(A)
　 (A is 0 to 255)
　在 0~128 時正常
　但是在129~255 是Chr$(A)卻傳回零字元 (""),而不是其Ascii
　所以想請問各位要用什麼方式才可以解決這個問題呢?
　　　　　　　　謝謝

請問一下 grid1.zorder 有什麼作用?(無內文)(編號：313)

請問如何讓二台電腦互傳檔案？(編號：312)

請問VB有沒有可以直接以IP跟PORT將檔案傳至另一台電腦或要求下載另一台電腦中的檔案的元件或控制項，請各位高手不吝指教一下，謝謝！

VB模擬搜尋引擎(編號：311)

敝人有一問題,急需高手給一個"概念",我想將txt黨昨為搜尋來源資料,使用類似KIMO或YAHOO的搜尋介面來搜尋txt檔的關鍵字,我該如何著手?

datareport問題(編號：310)

請問Form上的TextBox值如何放入DataReport
的頁面首頁中?

如何用vb啟動"檔案總管"?(編號：309)

麻煩各位先進了
...
如果能再加上直接讀取光碟機目錄就更好了..^_^
謝謝...

如何用 VB 取得 Cookies 的位置?(編號：308)

請問有人知道如何用 VB 取得 Cookies 的位置嗎?
因為 Winnt 與 Win95 的 Cookies 似乎不一樣.....
可以使用 API 的方法嗎?
請告訴我，謝謝......

send Message To all computer(編號：306)

如何发送消息给所有机器?
如何接收这些消息?

救救我吧(編號：305)

請問一下!!
如何傳一個陣列到DLL Function 中.......

[comdlg32] 提供資訊(編號：304)

最近我若在工作上有碰到共用對話盒的部分, 我多會將其包裝, 以減少對 comdlg32.ocx (Common Dialog Box) 的引用!
昨我在閱讀 MSDN Library July 1999 Level 1 時, 意外發現 Microsoft 有將這些函數包裝成一個物件類別模組, 用法同 Comdlg32.ocx , 有興趣的網友可以試試!
我實際試了一下, Default Font 設不進去 (該物件類別漏掉這段程式碼) , 這部分可能要自己加進去.
減少 comdlg32.ocx 引用可使程式更加獨立, 不過大概會使執行檔增大 40 ~ 60 kb.
買 vb 送的 MSDN 請用搜尋功能, 該物件類別模組檔名 comdlg.ocx

About DataEnvironment and Data Report(編號：301)

我想用 Data Environment 和 Data Report 製作報表，但是卻想要自己控制 Data Environment 的資料庫連結屬性，也就是說不想在設計階段就設定死了，請問我是否可以在執行階段才設定 Data Environment 的資料連結屬性，但報表的格式卻在設計階段就設計好了，如此，我可以動態的變動資料庫位置而不需在每次更改資料庫位置後重新設計報表。

模組(編號：299)

在Visual Basic中,模組有幾種型態?
上述的問題是"Visual Basic電腦技能檢定"的題庫
答案是三種,請問有誰知道是那三種,依什麼型態分?

vb資料傳進excel(編號：298)

唉！從來沒碰觸vba 也不知道如何跟excel連結
可是只想要能夠把資料傳進excel的欄位就好
誰能告訴我？有好方法嗎？
能否展示一段程式以及有什麼設定嗎？

ADO透過odbc存取NOVELL SEVER上的dbf(編號：297)

請請大家幫我看看(ADO透過odbc存取NOVELL SEVER上的dbf)
為何以下的成式抓一筆資料要5-7秒鐘?
Sub cmdFindRec_Click()
Dim I As Integer
Dim myQry As String
'SQL敘述
myQry = _
　 " SELECT A1M_ID　,　A1M_NAME ,　A1M_ADRS ,　A1M_AD_A　FROM A1D1000M " _
　　 & " WHERE A1M_ID　=　'" & txtData & "'"
　　
'-------取得資料庫連線----
Set cn = New ADODB.Connection
With cn
.ConnectionString = "DSN=LABOR;timeout=15"
.Open
End With
'--------取得資料集----
If Not Len(txtData.Text) ＞ 0 Then
MsgBox "請輸入事業單位資料"
End If
Set rs = New ADODB.Recordset
rs.Open myQry, cn
If rs.EOF Or rs.BOF Then
MsgBox "找不到資料，請自行輸入！"
For I = 9 To 11
txtInPut(I).BackColor = &H80000005
txtInPut(I) = ""
Next I
Exit Sub
Else
For I = 9 To 11
txtInPut(I).BackColor = &H80000004
Next I
End If
'填入資料
　　For I = 0 To 2
　　If IsNull(rs.Fields(I + 1)) Then
　　txtInPut(I + 9) = " "
　　Else
　　　　txtInPut(I + 9) = rs(I + 1)
　 End If
　　　　Next I
rs.Close
Set rs = Nothing
cn.Close
Set cn = Nothing
End Sub

請問如何讀取大於2GB的硬碟空間(編號：295)

原先我希望用API函數來讀取但是API函數只能抓到2GB的空間大於2GB的話以2GB算,我Email給王國榮先生他告訴我說用API的話無解,請問各位先進是否有其他方法可以用呢?謝謝賜教

使用vb6封裝精靈後，無法安裝至其他PC。(編號：292)

Setup(編號：291)

請問若程式中有引用ado的話,那做成安裝磁片時是否要自行加入其相關檔案(因為我將程式安裝於一個乾淨的win98環境中,均無法正確執行,但在開發環境中卻是正常的)

interface between VB rs232(編號：287)

If i make a project , this will emit 4 LED lights .
How can i design the VB to state the condition(ON or OFF of the LED) of the program ??

有關ADO及SQL一問(編號：283)

請問一下:
在VB6中用ADO(dsn-less)連至SQL 6.5. 現在有一筆資料要
　　insert 至 database ,但此資料(字串)中含有'(單引號)
　　造成SQL無法辦認, 但是如果用""(二個雙引號)將字串包住.
　　在SQL可以,但VB確無法成功.
　　請各位高手幫忙,謝謝.

EMF 與剪貼簿(編號：282)

[Win32] EMF 與剪貼簿
我由程式 Code 送至剪貼簿一個 EMF (Enhanced MetaFile) 等待被貼上,
1.貼上圖形大小問題
程式中設定 EMF大小為 10 cm x 10 cm
用貼上 (選擇性貼上 "圖片") 進 Word 或是 Visio 等軟體都為 10 cm 左右
(10.03 cm x 10.05 cm) , 唯獨貼進 PowerPoint 卻是 0.38 cm x 0.38 cm
這麼小...
若用選擇性貼上 "EMF 圖片" 或插入圖片選擇同樣的 EMF檔案, 則上述三種軟
體貼上大小皆為 10.03 cm x 10.05 cm, 為何唯獨 PowerPoint 貼上的部分有
問題呢?

2.Pie 的問題
Pie 為具有半徑的弧 (Arc), 就是兩個半徑加上弧使其成為封閉的派.
前述中只有 PowerPoint & Visio 可以編修 EMF, 下面問題指的是這兩套軟體
在我的 EMF中用到 Pie與數學座標的部分, 選擇性貼上 "EMF 圖片" 可以得到
我想要的 Pie, 但是貼上 (選擇性貼上 "圖片")卻是反集的 Pie, 也就是我想
要的 Pie被從圓中挖走後所剩下的, 何解?
另不管是貼上圖片或是選擇性貼上 "EMF 圖片" , 在 PowerPoint & Visio 中
解開群組後都會變成 Arc (弧) , 也就是兩條半徑沒了, 但是 FillColor還是
Pie 的範圍, 是 PowerPoint & Visio 均不支援 Pie嗎?
我試過將 Excel Chart 中的 Pie 貼過來, 解開群組後一樣會消失成為 Arc,
不過不會有反集出現! 我想 Chart用的應該是 DC 座標!
ps. Word 97 SR2, PowerPoint SR2, Visio 中文版 5.0

PopMenu 這個指令怎麼用???? ........急用啊...(編號：281)

我想當mouse有list按右鍵時會pop
一個選單but....
If Button = 2 Then
List1.Enabled = False
　 List1.Enabled = True
　 PopupMenu(??????)
這部份要打什麼??? .frm的檔嗎???
執行會出顯"快顯功能表必需要有一個次功能表"

VBA是什麼，有什麼作用?(編號：279)

VBA是什麼，有什麼作用?

如何將listbox中的數字拆成兩個矩陣(編號：277)

如果我有一些數字列在listbox中,如
123,321
456,654
789,987
怎麼才能將逗號前設成X(i)
逗號後設成Y(i)的矩陣呢???

有關表單(編號：276)

請問如何讓表單有捲動的功能呢就是表單裡的元件要放的東東很大有部份看不見要移動表單才行那要如何做呀
謝謝

help!!(編號：275)

請問我要把我在picture box裡所畫的圓移動位置要如何做？
圓如果要改變它的大小要怎麼做呢？

vb vs database(編號：274)

請問一下vb下載檔案要怎麼做ㄚ? 還有我做ㄉ程式沒辦法新增&更新資料庫但是可以刪除(資料庫未建立關聯) 另外如果資料庫有建立關聯是否就不能新增修改ㄚ?

如何在 Filecopy 時，顯示出 "備份檔案進行中，請稍侯..." 這個(編號：273)

如果我想在 Filecopy 時，顯示出 "備份檔案進行中，請稍侯..." 這個訊息，應該用什麼方式昵
e.g. Filecopy "c:\invoice.txt" , "a:\invoice.txt"
我現在書寫的方式是：當我在 Form1 執行 Filecopy 時，Form2 就 Show 出來，"備份檔案進行中，請稍侯..." 這個訊息就在 Form2.label1.caption 顯示出來，但是我只見到 Form2 的外框，而見不到訊息，有什麼辦法可以在 Filecopy 時，而且又可以見到訊息呢？

如何宣告全域變數(編號：272)

如何宣告全域變數,使得textbox中的text在任何程序都可以被呼叫??????

我想寫一個Print的功能(像Wordpad那個)(編號：270)

Wordpad的Print如何寫?
因為我也正在做一個簡單的Word Processor的program，但到印的功能不會寫。
不知有沒有源程式以download來參考或有關的OCX或工具。

請問小吳,vb3-vb6的元件,TKS!(編號：268)

謝謝小吳的幫忙,已將程式碼轉至vb6
但表單的元件要如何處理,重新拉嗎?TKS!

如何消除駐點(編號：267)

想請問一下,如何在from載入時,無駐點停留在控制項上,當用滑鼠點選時才出現????

在SQLAnalyzer下可正常執行的Store procedure,為何透過VB就會不(編號：266)

大家好,小弟這邊有個問題想向大家請教一下,盼望各位高手指點指點!
我在SQL建立一個Store procedure名為sp_check,在sp_check內開了四個cursor去執行許多SQLcommand,但不是巢狀,
是一個Cursor執行完再開一個,
sp_check在SQLAnalyzer下執行都沒問題,
而我在VB內,利用ADO建立connection 名為 cnSQL,
當我執行 cnSQL.execute "EXEC sp_check" 時,卻會出現問題,
根據Profiler Trace的結果,是sp_check執行到一半時就結束,而每次結束的地方也不是在同一個Cursor內,
更令人困惑的是我在VB內有宣告ADO.Error
做ErrorHandle,可是VB這邊並沒有收到任何Error,
程式繼續執行
請問諸位高手這有可能是什麼原因,該如何解決?感激不盡!

如何控制音量的大小...!?(編號：263)

是否有何方法可以控制目前音量的大小!?

想製作字典程式(編號：259)

不知何處可找到英文字的列表
Thanks a lot in advance

請問各位高手！如何建立一個排名表單資料？(請內詳)(編號：258)

前輩們：
請問如果要在一個遊戲中記錄使用者的成積排名，要用什麼方式來儲存那些資料呢？用文字檔又怕被人偷改！謝謝！

小吳，您的版...(編號：257)

小吳：
您的版面更動後第一次來這裡Posting，
我覺得對我唯一的不便是，我常選擇某些人的Posting來看
比如您啦，紀文和兄、璉璉、阿柳、Honey等，可是，現在
就沒有那麼方便了 :( ，而且您有沒有偷懶(指少來這裡回答問題)
也就看不出來了 :)
cww

如何將資料庫中存放圖片的欄位內容顯示於PictureBox(編號：256)

我想利用Adodb.recordset讀出存放圖片的欄位，然後顯示於PictureBox,除了用資料感知功能以外，是否有其他方法，請各位高手賜教感激不盡

請問高手排序的問題(編號：255)

請問如何將一資料庫的
a資料表以數字排序後填寫至b資料表

about VB == Line 效率(編號：254)

VB 的 Line 好像效率很差:
我用他來畫點(一 bolck 為一點),但是效率很差!
如果改用 Windows API 會不會改善呢 ???

VB要如何在任何狀況下,取得SQL statement ......(編號：253)

您們好:
請問您一個問題,
我在寫VB程式時,想在產生error時,紀錄log file,
但我現在遭遇一個問題,
當VB在對DataBase做Action(I,U,D,Q)時,產生error,
在此時我想紀錄當時的SQL statement,
不知道要如何取得此SQL statement?
因我使用三種方式來存取DataBase:
1.SQL statement方式,直接open或execute
2.Field方式,使用update
3.CommandText方式,再傳入參數
這三種的方式我都要可取得SQL statement....
不知道你們是否可以幫我,解答我的疑惑呢?
謝謝您們..........^_^
Janey

如何得知預設印表機所支援最大PaperSize是多少(編號：252)

如何得知預設印表機所支援最大PaperSize是多少

CurrentX and CorrentY可以設定Printer的左and上邊界，那右＆下(編號：251)

CurrentX and CurrentY可以設定Printer的左and上邊界，那右＆下邊界要如何設定
那如果所要列印的文件超過設定的右邊界，要如何得知

PaperSize=9是A4紙張大小，那其他規格紙張所對應的數字為多少(編號：250)

Printer.PaperSize=9是A4紙張大小，那其他規格紙張所對應的數字為多少

讓label中的文字有超連結(編號：249)

如題，之前好像在不知道那一個地方有看過如何做，但現找不到了
有人可以告知要如何做嗎？
萬分感激~~~

VB5程式執行時，無法起始設定的問題(編號：248)

我在windows95的電腦上只安裝VB5.0企業版,撰寫VB程式後,以VB5.0 之應用程式安裝精靈製作之應用程式發行片,在兩台裝有windows98的電腦上執行安裝,皆顯示安裝成功訊息.在執行時,其中一台電腦可以正常執行應用程式,但是另一台電腦
一執行(程式集-＞應用程式)就出現 "執行期錯誤3447"
當呼叫 Jet VBA 檔案 (VBAJET.dll 用在 16 位元版本，VBAJET32.dll用在 32 位元版本) 時，無法起始設定。
請重新安裝傳回錯誤的應用程式
請問為什麼?
如何解決???

DateDiff( )函式，請教參數設定。(編號：247)

Function DateDiff(Interval As String, Date1, Date2, [FirstDayOfWeek As VbDayOfWeek = vbSunday], [FirstWeekOfYear As VbFirstWeekOfYear = vbFirstJan1])
其中Interval As String如何設定。Date1, Date2給的值"88/12/10"
是否正確。

adodc 記錄指標移動的問題(編號：246)

我在同一個 form 上放了兩個 adodc 且連到相同的table
adodc1 的command type 是 adcmdtable
adodc2 的 command type 是 adcmdtext
我的作法是 adodc2 用 SQL 指令讀資料並作排序(供瀏覽)
adodc1 作為 add, edit ,dele 的用途,資料排列順序是
依資料庫中實際的位置.
問題是如何讓這兩個 adodc 同步移動 ?
謝謝　!!

VB5問題(編號：245)

我的程式是用VB5.0專業版寫的,做成安裝精靈後,在別的PC上SETUP,
安裝完成,RUN 時出現以下錯誤:
當呼叫JETVBA檔案(VBAJET.DLL用於16位元版本,VBAJET32.DLL用於32位元版本)時,無法初始化.請重新安裝傳回錯誤的應用程式.
請各位先進幫幫忙.

ASP..Upload的方法..(編號：244)

如題...

adodc 與 datagrid 配合的問題(編號：243)

我使用 adodc 連結到一個 Dbase 的資料庫,配合 datagrid 來顯示
資料.
問題如下:
1. 如何設定 datagrid 的每個欄位的 Title , 而不是自動顯示欄位名稱.
2. 資料庫中的某些欄位希望它不要顯示出來.

請各位幫幫忙...如何存IMAGE 至 MDB的檔案中..T.K.S(編號：242)

rs.AddNew
　rs![工號] = Text1(0)
　rs![姓名] = Text1(1)
　rs![圖片] = Image1　.....ERROR..
　rs.Update

Dynamiclly create menu with multiple submenu levels(編號：241)

How to create a mene with the following structure in run time?
MyMenu
--mnuLevel_1[0]
-----mnuLevel_2
..
--mnuLevel_1[j]
-----mnuLevel_2
..

The first level is OK, which can be acheived by defining an array in design time. The problem is in the second level due to the name conflict.

說明檔的製作(編號：240)

請問各軟體中的說明檔是如何作的呢請各位先進提供方法感激不盡呀

VB vs ACCESS 2000(編號：239)

我是VB 新手, 其中在資料表單精靈中, 我在選ACCESS 中的資料庫時, 出現"無法辨識資料庫格式"...我用的access 2000, 想請教一下vb6 是否不支援access 2000 中的資料庫? 如果是的話, 請問有方法可以解決這個問題嗎? thanks!
P.S.我使用的VB6

請問 VB 中有沒有表示 bit 的方法(編號：237)

I mean :
如何直接存取某一 byte 中的某 bit ?

Thanks very much for your answer !

讓程式 delay(編號：236)

大家好，
想請問大家，如果我想讓程式delay 0.2 ~ 0.5 秒要如何弄呢?
謝謝大家的指導!

如何看別人所寫的 dll 的source code(編號：235)

你好;
因最近在學 vb 想練習寫 dll所以想參考別人的dll 寫法,
不知有無辦法看得到別人所寫的 dll source code,謝謝

有點呆的問題....(編號：234)

使用ADO控制項時,有Refresh的指令更新資料庫
用ADO語法時,則沒有....此一指令
請問是否有其他指令可以更新呢?
找不著...苦惱中

如何將VB中的數字轉為全型??(編號：233)

各位高手:
有個問題想請教一下:　
　　用VB連接SQL,將其資料Select出來,如何將Database中半型
　　的數字轉為全型的方式??
　　　　謝謝

資料庫即時更新(編號：232)

請問：
１該如何用Dataenvironment 達到資料庫即時更新。
２該如何用日期做到流水號功能。

謝謝！！

vb3 - vb5 or vb6(編號：231)

如何將vb3的程式,讓vb5或vb6亦可run,TKS!!

crystal report的問題(編號：230)

請問各位高手先進:
如何於vb程式中,關掉crystal report的預覽畫面,謝謝

有關ADO"錯誤訊息"如何解決.............急(編號：229)

錯誤訊息顯示"ADO找不到指定的提供者"
請問如何解決

Visual Basic 如何讀取,寫入記憶區資料(編號：226)

我製作一片記憶Card,它的解碼位址為 D000:0000 ~ D000:07FF　 2K的空間,用 Debug 測試R/W正常,請問VB
可否讀取???莫非要用 VC寫成 DLL 讓VB Call 嗎,PLS　高手幫忙!!!!

使用ADO載入資料，載入時間過長，畫面宛如當機(編號：224)

如標題，單機作業，請問有何快速載入資料方法，或如何做一顯示資料載入中畫面直到新資料處理表單畫面出現為止，謝謝各位。

怎麼寫一個類似帳號登入ㄉ呢(編號：223)

請問個位大哥：
小第是剛才學vbㄉ初學者，有個問題想請教一下
　就是要寫一個帳號登入ㄉ程式，如輸入id若正確
　則跳至輸入passwd，id若錯則叫你重新輸入..
　最後是ok鍵和cancel鍵...
　如何說按cancel鍵，它會跳到重新輸入idㄉtext呢
　謝謝大家ㄉ幫忙..
　幫我寫寫這程式吧

vb於區域網路上傳送訊息?請各位高手幫忙(編號：222)

如題，我要將一textbox的資料送至另一個電腦，這電腦也用textbox
接收，請問要如何作?謝謝

用InStr( )函數來找字串會自動分大小寫，那不想分大小寫要用啥(編號：221)

我想在TextBox裡，加入尋找字串的功能
用InStr( )函數來找字串會自動分大小寫，那不想分大小寫要用啥?

VB 如何做出可以到處 Dock 的子視窗.....?(編號：220)

VB 要如何作出像 VB的工具箱那樣可以到處 dock 的視窗...?

程式封裝時為何會產生問題(編號：219)

請教各位高手:
為何程式封裝時,使用封裝精靈到磁碟片時,均會產生磁碟空間不足的現象 ( 小弟使用的是新的磁片,且是原版軟體 vb6.0專業版)

請問 vb 語法可不可以做字的光學判斷(編號：217)

請問 vb 語法可不可以做字的光學判斷例如大太犬
這三個字大太犬其中的點在不同位置則產生不同的字
這有點像類神經網路的問題
如果vb 語法可以做到,那麼要用那個控制項
那本書有介紹

有沒有mp3播放程式的元件或API範例...(編號：216)

如題..
目前我用MediaPlayer來播放..
有很多屬性不知是什麼...

CommonDialog有沒有辦法選取目錄??(編號：215)

請問CommonDialog要如何做才能選取目錄??
或是要別的元件才能做到?
那是那個元件?

報表的問題？(編號：214)

請問在crystal report中，中一刀的紙張，在紙張大小中應選那一個？
請各位高手幫幫忙!! 謝謝!!

程式設計相關資訊(編號：212)

＜a href="http://lightning.prohosting.com/~pauljeng/" target="_top"＞Softpro軟體設計工作室＜/a＞
Welcome..

當程式關閉後，用 ctrl+alt+del 看發現程式未完全關閉！(編號：211)

有些sub 如 text1_keypress(ascii) 中，若有 loop 時，雖然我們click form 右上角的x時，程式看起來已關閉，事實上卻無，請問有何方法自動去關閉所有尚未結束的 sub

vb的setup 問題(編號：210)

請教各位先進
我寫好的vb 程式在user的pc上執行setup 時會出現"某些檔案太舊,要重開機後才能繼續安裝", 可是重開後執行 setup 還是一樣的情形而無法完成安裝,我該怎麼辦?

如何用vb來使電腦發出固定頻率的聲響(編號：208)

請問要如何使用vb來控制電腦發出如250Hz 1000Hz　4000Hz 的聲音呢
如有網友能夠解答的話請寄至信箱

Drive 如何寫錯誤訊息(編號：205)

程式執行時,所選取之磁碟,若發現無磁碟片,此程式將會自動關閉,
想請問是否有錯誤訊息之程式撰寫方式。謝謝

請問ASP如何寫程式讓IIS寄EMAIL?(編號：204)

就是USER輸入資訊，ASP傳到SERVER,SERVER寄出郵件，而不是用
USER端的EMAIL程式。回覆時請順便MAIL給我，謝謝！
利用元件，SQL SERVER都可以。

請告知如何在vb中列印EXCEL檔?謝謝!(編號：202)

小弟有個程式其計算結果需要存成excel檔,並將其自動列印出來,
在將計算結果存成excel檔部份已沒有問題了,但如何由vb去執行
列印excel的動作至今仍然無解!
曾經嘗試利用excel中之巨集錄下vba然後再轉貼至vb程式中,藉由
vb來下達列印的動作,可是未能如願.
想請問各位先進是否能幫小弟找出解決方法,謝謝!

設定陣列初值(編號：199)

請問大家,VB可以在陣列宣告的時候順便也給定初值嗎?
像是 Dim iNumber(5) as integer = {1,2,3,4,5}
之類的

nt sp5 無法安裝 vb6.0(編號：198)

Nt 於昇級 sp5 後即無法執行安裝程式 Why?

請問InStr()函數找不到字串，所傳回的值是什麼(編號：197)

請問如果InStr()函數找不到字串，所傳回的值是什麼

SELECT 內容不為所需之值,WHY ?(編號：194)

我下一個SELECT式:
SEARCH1="SELECT * FROM AAA WHERE"
SEARCH = SEARCH1 & " NO1 ＞= '" & Text1.Text & "'" & " And NO1 ＜= '" & Text2.Text & "'"
值為:X199000~X203999區間
結果,TEXT1.TEXT 的值輸入X199 ;TEXT2.TEXT 的值輸入X203 找到的資料只有X199~X203間的值,X203的資枓卻都沒有出現,我有下"＜="應會包含到X203的值,但卻沒出現,這....是什麼問題呢?高手們幫幫忙吧! 謝啦^_^

winsock1.senddata(編號：192)

為何 winsock1.senddata Chr(255) & Chr(251) 以網路工具觀察其第二個資料卻為 0 呢？

如何抓取網路卡號(編號：190)

我想利用硬體來判別出唯一的電腦，目前僅知由網路卡得已判別，但不知該如何去讀取。

如何用VB5.0在 Win98的環境中更改預設印表機(編號：189)

如何用VB5.0在 Win98的環境中更改預設印表機

關於TEXT的一個問題(編號：188)

為何我的text1.text和adodc1作連結後沒有辨法秀出UNICOD 的字型
但是DataGride就可以秀出Unicod的字型,我的FONT都有改成可以顯示的字型啊! 不知Textbox是否有支援Unicod的功能
--------------------------------------------------------------------------------

請問如何在Excel中，定時執行某一段程式(編號：186)

因為在excel中無法找到timer的控制項
所以我採用迴圈的方式處理
不過這樣卻很吃cpu的資源
請問有沒有其他方法可解決....

VB與CLIPPER的NTX問題？(編號：183)

請問
VB如何去讀取CLIPPER的NTX呢？
因為個人的公司希望在不動到原有資料及索引(CLIPPER寫的)的情況下
完成資料庫介面的更新;資料龐大、又天天長大，所以難做:(
又，VB可否CALL CLIPPER 去DO某個PRG呢..
先謝謝您嚕..

SavePicture?(編號：182)

picture box中的事件SavePicture語法如何使用?

井字遊戲(編號：180)

有關井字遊戲, 如果想和電腦對戰(就是有關於人工智慧的部份) ,該
如何寫呢~~?
各位好手!!!!

About ListView(編號：179)

我想使用 ListView 來列示從資料庫中找出的資料，就如同DataGrid一樣，但是卻無法做到：當我選擇其中一筆資料時，那筆資料整行都能被 Mark 起來，在 ListView 中，好像只會 Mark 第一個欄位資料而已，請問有誰知道如何呈現出 Mark 整行的效果？

有問題啦(編號：177)

大家好 : 我想請問你三個問題
第一以下是我連接sql的方法
我想請問你我們如何得知資料庫中的某個表格有那些資料(這些方法要如何知道呀!)
我想把它們加到combo1中
第二個問題是 select
from
　　　　　　 where
這種sql的指令可以直接在vb 中寫嗎?
如果可以要如何作呢 ?
第三個問題請你介紹書給我看好嗎?因為市面上書那麼多不知從何下手
因為我是初學者所以有些問題很笨喔希望你能見諒
　　感謝你撥空看此問題非常謝謝
Dim ws As Workspace
Dim cn As Connection
Dim rs　As Recordset
command1_click()
Dim sql_str As String
On Error GoTo errorexit
　　Set ws = DBEngine.CreateWorkspace("test", "sa", "", dbUseODBC)
　　sql_str = "ODBC;UID=sa;PWD=;DSN=project"　
　　Set cn = ws.OpenConnection("", dbDriverNoPrompt, True, sql_str)
　　Set rs = cn.OpenRecordset("SELECT * FROM test", dbOpenDynaset)
　　End Sub

關於crystal report?(編號：175)

我想用crystale report做套表，但不知如何設定detail section為
固定長度(印一筆和印十筆，detail section 的長度依然一樣)，請各
位高手提供高見，謝謝!!

怎樣建立捷徑(編號：174)

有沒有人知道怎樣將捷徑建立於桌面上?或我的最愛...

站長 , 不好意思, 一個 VB 以外的問題 !(編號：173)

有人用過 Microsoft 的 RegClean.exe 這個登陸程式清潔器嗎!
在Win98第一版的時候是沒有問題的, 但在這二版的時候就遇上問題了,
總是在跑到 "Scanning Class Error ..." 的時候, 這個程式就沒有反應了.
有人知道為什麼嗎!

請問如何控制不讓user去使用Ctrl+ESC 與 Alt+Tab(編號：172)

我知道如果不想讓user去使用Ctrl+Alt+Del時,
可以使用SystemParametersInfo這個API,
將其第一個參數值設為SPI_SCREENSAVERRUNNING即可..
但是我想讓我的系統在執行時,user不可以去執行其他的程式..
像檔案總管,office..等等..
所以我想應該也可以利用這個API去做..
讓user不得使用Ctrl+ESC 與 Alt+Tab即可..
我從MSDN上也找到了可將SystemParametersInfo這個API其第一個參數設為SPI_SETFASTTASKSWITCH或者SPI_SETSWITCHTASKDISABLE即可
但是它的說明中,
第一個值不適用於Win95,98及NT..
第二個值只適用於NT 5.0 or later...
我也先使用了第一個值來進行測試... 這二個組合鍵仍然是有作用的
所以想請問, 有沒有人可以用這個參數值成功引用這個API的??
或者, 有其他的方式可以讓user在執行我所寫的這個AP時,
把整個作業系統給Lock起來不讓使用者去使用???
(我的程式是使用VB5寫的,且該程式必須可以在Win95及Win98上執行)

如何使用 MAPI 的控制項(編號：171)

各位高手:
請問一下,如何使用MAPI 的控制項來發送 email.
　　如何能設定多收信人及多個附件.

使DataCombo顯示多個欄位？(編號：167)

請教一個問題：
個人使用VB 6.0，希望能在DataCombo控制項中，一次顯示兩個(或以上)的欄位值，比如按下滑鼠鍵候，可同時出現ID，名稱，(敘述...)。

如何使用API控制Wave音量?(編號：166)

請問大家如何使用waveOutGetVolume函數以程式控制音量大小?
或者有什麼好辦法能以程式控制音量大小呢?

如何取得 Server 端的系統時間 ...??(編號：165)

請個位高手賜教...:)
如何取得 Server 端的系統時間 ...??
Server 端為 Sybase

救救我(編號：164)

怎麼用VB秀*.TGA的檔案格式
教教我

如何下指令強制user log off sql-server(編號：162)

如果有未經許可的user 進入sql-server,如何下指令強制user log off sql-server ,以維護資料庫的安全?

如何增加VB6中Data Report控件的Width大于120？(編號：161)

最近做报表时有个problem，
because Data Report控件最大只支持120，但是my报表so big
有其他方法没有？？？？？？
救命！！！！！！！！！！

如何加速宣告自訂類別物件?(編號：160)

如何加速宣告自訂類別物件?
我有一組自訂類別
cLayer (圖層)
cPolygon or cPolyline (多邊形或多重折線)
cPoint (點)
其中 cPoint
Public x as Double
...　　y ...
...　　z ...
cLayer, cPolygon 及 cPolyline均用集合物件
當 cPolyline 數量少還沒感覺, 若 cPolyline 到達 30 條以上, 在起始宣告有明顯的延遲...
例如在 Pentium II 300 跑 65 條 cPolyline (每條約有 10 ~ 100 個點)
在讀取時約需 20 sec , 我檢查過了, 檔案處理約佔 6 sec, 但是記憶體配置約佔　14 sec, 在螢幕上重繪約需 0.5 sec, 也就是說, 在起始類別宣告的行為中,
工作項目　　　　　所需時間 (s)
-----------------------------
迴圈　　　　　　　　 1 (0.5 x 2)
讀檔　　　　　　　　 5.5
類別記憶體配置　　　13.5
螢幕繪圖　　　　　　 0.5
-----------------------------
由上簡表可知, 物件記憶體配置拖太多時間, 關於類別記憶體配置是否能再加速呢?
註:
1.若將 cPoint 類別改成型態, 可以陣列型式宣告 cPoint 當然可加速, 我是指純就類別物件的記憶體配置是否可加速!
2.VB類別精靈在 Add動作為宣告一新物件, 再加入新物件; 我已經改成跳過新物件宣告的動作, 直接 Set物件的 Handle , 但是慢就是慢在初始記憶體配置, 這樣加速有限!

關於gif89a的問題(編號：158)

有沒有辦法讓gif89a顯現的gif動畫...
變成透明的呢?
因為只要一載底圖...gif檔就會自動顯示出他自己設的blackcolor
適了好多種方法..還是沒有辦法...
難道真的要有程式的原始碼嗎?

ACCESS 匯入 SQL7 的資料庫的程式(不用DTS)??(編號：157)

如何寫個從ACCESS 匯入 SQL7 的資料庫程式
1.如何得知 ACCESS 資料庫中有多少個TABLE
2.如何用 SELECT * INTO 的指令來將 ACCESS 資料庫所有
　 TABLE 匯入 SQL7 SERVER.......

不用DTS

FTP(編號：155)

VB可否作定時定址的ftp上傳與下載?

請問如何取得螢幕的解析度?(編號：154)

我試過以下程式碼,但是screen.width和screen.height得到的值卻是一樣的!?
還有其他的辦法嗎?
x = Screen.Width / Screen.TwipsPerPixelX
　　y = Screen.Height / Screen.TwipsPerPixelY

ASP 問題(編號：153)

我寫ASP 在自己的電腦上可跑,但是upload 到網站後發生如下錯誤
請問是怎麼一回事呢?
Microsoft OLE DB Provider for ODBC Drivers 錯誤 '80004005'
[Microsoft][ODBC Microsoft Access 驅動程式] Microsoft Jet 資料庫引擎無法開啟 '(未知的)' 檔案。它已經被其他的使用者獨佔地開啟，或者您需要有檢視資料的權限。

讀取資料庫資料出現Null問題......(編號：152)

本人用Excel檔案作資料庫...
然後讀取report.xls資料庫的sheet1資料表的某一欄位的值，
但得到值的是Null，但用Excel開啟卻不是Null值
請問為什麼會這樣呢?
有方法解決這問題嗎?
Thank you very much!

請問有沒有關電腦的指令？(編號：151)

請問有沒有關電腦的指令？

有關列印份數的問題(編號：150)

我在列印功能上的程式是這樣寫的
CommonDialog1.ShowPrinter
Dim I
For I = Commondialog1.Copies To 1
Printer.Print Text1.text
　　　Printer.NewPage
Next I
Printer.EndDoc
可是不管我在列印份數設多少份
我印出來始終都只有一份
我應該如何寫，才能使列印份數的功能正常使用

請問要使TextBox能有自動換行的功能，要如何寫(編號：149)

請問要使TextBox能有自動換行的功能，要如何寫
Textbox無法使用混合字形(就是有些字要用這個字型，有些字要用別的字形)，有沒有什麼方法or技巧能使它可以使用混合字形

MDI Form StatusBar 的問題(編號：148)

請問要如何把 MDIchild form 上的錯誤訊息show到MDI form 的
statusbar panel上呢?
我在child form 上寫
frmMain.sbstatusbar.Panels(1).Text = "Insert successful"
^^^^^^^
MDI form
結果error為
"只能允許一個 MDI 表單 (錯誤代碼 426)"
thanks for your answer

有哪為高手試過ㄋ.....(編號：147)

請問VB有沒有方法像遊戲一樣有（背景音樂和打鬥音效）同時發聲ㄋ...
請問VB可有方法寫出像（快打旋風發氣功），一樣的組合鍵嗎，或是用 C++寫好動態連結檔共VB使用ㄋ.....
我只知道C語言可寫組合鍵不知VB行不行？

如何載動態gif檔(編號：146)

曾有高手叫我使用gif89a的自製元件...
但小弟卻不太會使用....
請前輩們指點一下小弟我吧..*^^*

如何將所有視窗縮到工作列(編號：145)

如何將所有視窗縮到工作列要包含其他非自己程式的表單

這個打開資料庫的方式錯在什麼?(編號：144)

Dim ws As Workspace, dbs As Database, rs As Recordset
Private Sub Form_Load()
Set ws = DBEngine.Workspaces(0)
Set dbs = ws.OpenDatabase("c:\fms2\data\fms2.mdb", False, False)
SQL1 = "select * from class_code"
Set rs = dbs.OpenRecordset(SQL1)
End Sub
上面的程式在Set rs = dbs.OpenRecordset(SQL1)出現錯誤.
"執行階段錯誤424,此處需要物件"
請問是什麼意思?謝謝.

如何將文字存成圖檔?(編號：142)

如何將輸入文字在程式中轉存成圖檔?

DLL如何註冊(編號：141)

如標題，謝謝!

找不到msscript.ocx ScriptControl(編號：139)

在我光碟中找不到msscript.ocx(vb6.0 Script Control)
請問哪一個網站有可以下載的?

Form.Show 問題(編號：134)

執行FrmMain
按鈕 1
FormA.Show VBModeless
FormA.Windowstate=1
按鈕 2
FormA.Show VBModal
點按縮小在工具列之FormA就當住了，請問如何取得協調？

怎么知道Mouse 的位置？(編號：133)

怎么知道Mouse 的位置？

如何寫個從ACCESS 匯入 SQL7 的資料庫程式(編號：132)

如何寫個從ACCESS 匯入 SQL7 的資料庫程式
1.如何得知 ACCESS 資料庫中有多少個TABLE
2.如何用 SELECT * INTO 的指令來將 ACCESS 資料庫所有
　 TABLE 匯入 SQL7 SERVER.......

請教一下!!(編號：131)

一些遺問想要請教一下高手們!!
1.Active X DLL 與一般 DLL有何不同及優缺點
2.ACtive Exe 與一般 Exe 有不同及優缺點
3.我寫了一個帶Form Active X DLL , 用起來也沒什麼問題，但聽說 Active X DLL 最好是不要帶Form !! Why ??

請教小吳.set mrecordset = new adobo.recordset 問題(編號：130)

Private SQLBasicString As String
Private SQLVariableString As String
Dim varBmk As Variant
Private mtimes As Integer, mloop As Integer
Private Sub Command1_Click()
Set AcBankRecordset = New ADODB.Recordset
　　SQLBasicString = "select * from AcBank order by BankNo"
　　SQLVariableString = SQLBasicString
　　With AcBankRecordset
　　　　Set .ActiveConnection = AccountConnection
　　　　.CursorLocation = adUseClient　　　　　　　
　　　　.CursorType = adOpenStatic　　　　　　　　
　　　　.LockType = adLockBatchOptimistic　　　　　
　　　　.Open SQLVariableString
　　End With
　　Set DataGrid1.DataSource = AcBankRecordset
End Sub
這個command我一直按,程式都不會錯誤, 一個recordset在沒有 set 成nothing 或close 的情況下,竟可重複Set AcBankRecordset = New ADODB.Recordset , 是不是意味著我們可以不必管recordset c的close 及nothing..請指教..謝謝

如何將橫印 Data Report 的報表(編號：129)

我在 Data Report 中設計一個橫式的 A4 報表，
執行時出現"報表寬度大於紙張寬度"的錯誤訊息....
然後我改了 printer 物件中的 papersize 及 Orientation 屬性，
將紙張改成 A4 及橫印，
結果還是會出現"報表寬度大於紙張寬度"的錯誤訊息....
請問如何解決呢??

如何將數值放進記憶體的指定位址(編號：127)

我想將4組數值分別放入記憶體中378H,200H,201H,202H這四個位址中,
請問該如何辦到
懇請各方高手支援,不勝感激

VB 可不可以做 linked list(編號：125)

VB 可不可以做 linked list? in C language , we have pointer to point next or previous data object.. How do we archieve linked list in VB ?

取亂數的問題......(編號：124)

如果用RND來取固定的亂數時可是每次從新RUN程式時
所取的亂數都是有一定規擇的亂數.不知道有沒有辦法
每次RUN時候都取不一樣的值.我是想用TIMER來取質
不知行不行..........

用VB來控制步進馬達的問題?(編號：123)

請問一下:VB有沒物件可以用來控制步進馬達!!!!!!!!

想做個類似俄羅斯方塊的game(編號：122)

就如何把第二個圖形放在第一個圖形上面
因為小弟每次做解果兩個圖形都會重疊在一起說.......

如何做到獨佔整個系統??(編號：120)

各位前輩:
有沒有方法可以做到整個系統只能給我的AP使用?其它的程式都不行執行(包括檔案總管之類的程式),除非我close我的AP
謝謝指教~

我的visdata不能以dbgrid增加資料?(編號：119)

如題,
以前是可以的,是否安裝了office2000會這樣?請指教.

MDIForm一問?(編號：117)

請問一下:
要如何將圖片放在MDIForm中央(MDIForm 噢!!)

救救偶,VB如何控制印表機前進後退?(點矩陣)(編號：115)

救救偶,VB如何控制印表機前進後退?(點矩陣)

regsvr32 OCX 註冊問題(編號：114)

有個問題想請教:
我寫了一個 Cell.ocx by VC++
Why ?
98可以成功的註冊Cell.ocx 藉由執行 regsvr32 cell.ocx
為何
95不可以成功的註冊Cell.ocx 藉由執行 regsvr32 cell.ocx
Thanks very much !

有個小問題(編號：113)

如果form上的物件(例如:frame)也要隨著form的大小來變動，
那該如何解決呢??
謝謝.........^_^

請問如何用vb一次讀出SQL資料庫中的資料表名稱(編號：112)

as title

如何將vb的值轉入excel圖表的元件中?(編號：111)

我在VB中要開一個form加入excel圖表元件，秀出統計圖表。
但是我不曉得該如何將值傳入excel圖表元件中?
又何如將傳入excel的值拿來製作圖表分析呢?
(例如，長條圖、圖餅圖，曲線圖....等)
真的很困惑，希望各位武功高強的高手能幫我解決這個問題！
謝謝.....^^

如何做圖片減色(編號：109)

如:全彩---＞256
thx

尋找....可顯示AUTOCAD圖檔格式的控制項........(編號：108)

請問各位網友:
不知何處有可顯示AUTOCAD所存格式(如:*.dwg,*.dwf)的控制項????若需要購買也可........

(希望各位網友能告知,謝謝........)

text之tabindex之順序如何做呢？(編號：106)

text之tabindex之順序如何做呢？
我在text1(0)的tabindex中設為1
text1(1)設為2
text(2)設為3
..
..
以此類推
但是，我還是做不出來

請問VB5.0與VB6.0有何不同之處(編號：105)

目前使用VB5.0開發程式，但VB6.0都已出來一陣子，我卻不敢換，深怕換後原程式無法使用。
請依：
1. VB5.0與VB6.0之特色
　　 2. VB5.0與VB6.0之特性
　　 3. VB5.0與VB6.0的不同處
說明之，本人將感激不盡，謝謝！

Data Report問題(編號：104)

有關於data report的兩個問題：
1. 如何設定報表橫印
2. 我根據查詢所得會秀報表，利用資料環境下sql指令，拉出報表內容，也就是每次資料庫所得資料會根據run time查詢值而有有所不同，但每次執行查詢都只會秀出第一次查詢結果之報表(我猜測是沒有更新報表內容)，不知是否有人得知為何？感激不盡

請問小吳：如何得知新增 Record 之 Identity ?(編號：103)

我用 SQL Server 作後端，用 Int 欄位做 Identity，請問我如何能確實取得新增記錄的 Identity？
OnLine Book 說可以檢查全域變數「@@IDENTITY」，問題是：如果這個變數是全域的，那麼是不是也會因為其它 Connection 的動作而造成取到下一個甚至下幾個新增 Record 的 Identity 呢？
請播冗為我解惑，謝謝！

Data Report 不見了.....(編號：101)

我的 VB6.0 企業版裡的 "專案"/"新增 Data Report" 選項不見了...
請問該如何叫出來呢?要勾選哪個引用項目??

如何播mpg檔(編號：100)

vb要如何播mpg檔呢?教教我吧!

一個關於座標的問題(編號：99)

大家好：
小弟有個問題，我有50萬筆的實驗數據資料要繪圖於表單，
如何將表單中橫座標改成60萬以容納如此多的數據，謝謝。

物體動畫 ( 利用 ImageList)(編號：98)

第一次來, 還望高手指教!
我想秀出連續動畫, 類似動態GIF,
想利用 ImageList 可存放多張圖片的功能,
但我又要有 Overlay(透明) 的功能,
我指定了一個 Image or Picture=ListImage 中的圖來 Show,
而 Overlay 僅對 ImageList 中的 Picture　有用,
有人有解嗎?
(不要跟我說對每一個圖做 Mask !)
謝了!

如何寫出小畫家裡填充色彩的功能(編號：97)

如何寫出小畫家裡填充色彩的功能

如何將Windows的字型名稱放入ComboBox中(編號：96)

如何將Windows的字型名稱放入ComboBox中

用那個方法可以做四捨五入?(見內文)(編號：94)

我要做一個功能，將小數變整數。
e.g.
1.0 = 1
1.01 = 2
1.1 = 2
1.5 = 2
1.6 = 2
即只要有小數點，就不要小數點後數字，曲并將個位數字加一。

急ㄚ....如何在SStab 上建SScommand, SSoption, SScheck.......(編號：92)

As title! 每次我要建這些元件時，都會出現沒有使用權限的問題，我該如何解決‧

請要一個產生tmp table (#table)的問題(編號：91)

這是我寫的一個store procedure 要把資料記錄原來是直的展成橫的方式展現，可是要產生一個tmp table 卻
一直無法順利產生，都會show 出"Invaild object name "#paytmp"......請各位高手耐心看完我的store procedure
CREATE PROCEDURE RptPayDetail_001　@Pay_Ym char(5)　AS
Declare　@sql_string as varchar(300)
Declare @Sql_Modi as varchar(100)
declare @Rpt_String as varchar(200)
Declare @Field_name as Char(6)
Declare @Emp_id char(6),@Subject_no char(6),@Pay_sum int,@Tax_yn char(1),@Add_yn char(1),@Emp_name char(10)
Select @Sql_string = "Declare PayCursor　 Scroll Cursor For select distinct subject_no from Pay"+substring(@Pay_ym,1,4) + " Where　Up_dn = '"+
substring(@Pay_ym,5,1)+"'"
Exec (@Sql_string)
Select @Sql_string = "Create Table #PayTmp (Emp_id char(6),Emp_name Char(10),"
Select @Rpt_String = "Select Emp_id,Emp_name,"
Open PayCursor
Fetch Next From PayCursor Into @Field_name
While (@@Fetch_status ＜＞ -1)
Begin
　　　 Select @Sql_string = @Sql_string + @Field_name + "　Int "
　　　 Select @Rpt_String = @Rpt_String + @Field_name
　　　 Fetch Next From PayCursor Into @Field_name
　　　 If @@fetch_status ＜＞ -1
　　　　　 Begin
　　　　　　　　Select @sql_string = @sql_string +','　
　　　　　　　　Select @Rpt_String = @Rpt_String + ','
　　　　　 End
　 End
Select @Sql_string = @Sql_string + " ) "
Select @Rpt_String = @Rpt_String + "　From #PayTmp"
Exec (@Sql_string)-------------------------------------------------為什麼我都不會產生這一個tmp table 呢？可是我如果
Deallocate PayCursor　　　　　　　　　　　　　　　把這一行指令另外拿出來執行卻可以產生tmp table 呢？救救我吧？

Select @Sql_string = "Declare PayCursor　 Scroll Cursor For Select Distinct A.Emp_id,B.Emp_name　from Pay"+substring(@Pay_ym,1,4) +
" A,Employee B Where A.Up_dn='"+substring(@Pay_ym,5,1)+ "'　and A.emp_id = B.emp_id　order by A.Emp_id"
Exec (@Sql_string)
Open PayCursor
Fetch First From PayCursor Into @Emp_id,@Emp_name
While (@@Fetch_status ＜＞ -1)
Begin
　　　　 Insert Into #PayTmp (Emp_id,Emp_name) Values (@Emp_id,@Emp_name)
　　　　 Fetch First From PayCursor Into @Emp_id,@Emp_name
　　End
Deallocate PayCursor
Select @Sql_string = "Declare PayCursor　 Scroll Cursor For Select Emp_id,Subject_no,Pay_sum,Tax_yn,Add_yn　from Pay"+substring(@Pay_ym,1,4) +
" Where Up_dn='"+substring(@Pay_ym,5,1)+ "'　order by Emp_id"
Exec (@Sql_string)
Open PayCursor
Fetch First From PayCursor Into @Emp_id,@Subject_no,@Pay_sum,@Tax_yn,@Add_yn
While (@@Fetch_status ＜＞ -1)
Begin
　　　　Select @Sql_Modi = "Update into　#PayTmp Set " + rtrim(@Subject_no) + "= " + convert(varchar,@Pay_sum)+"　Where Emp_id='" + @Emp_id + "' "
　　　　Exec (@Sql_Modi)
　　　　Fetch Next From PayCursor Into @Emp_id,@Subject_no,@Pay_sum,@Tax_yn,@Add_yn
　　End
Exec (@Rpt_String)
drop table #payTmp

我還是不會轉換form(編號：90)

andylin高手，我還是做不出來，
目前我有幾個text陣列，text1(0),text1(1),text1(2),text1(3)....我有幾個三個目標要完成
第一，我要在text1(0)按下enter之後可以跳到下一個text1(1)
第二，我要在最後一個text1(x)按下enter後可以跳到第二個form
第三，我要在程式一開始時和第二個form出現時，游標會自動停在第
一個text1(0)上。
以下是我的程式內容，請各位高手幫我看看。
--------------------------
在text1_keypress裡
if keyascii=13 then
sendkeys"{tab}"
keyascii=0
end if
if keycode=vbdeyreturn and index=19 then
form2.show
end if
------------------------
在formload中
text1.setfocus
--------------------------