小吳 VBQA 程式設計討論

我想問個小問題 :
我用三種模式去寫報表
(1)文字檔(.txt)......spc
Print #1, Trim(TEXT1.TEXT);Spc(20 - LenB(StrConv(Trim(TEXT1.TEXT),vbFromUnicode)));Trim(TEXT1.TEXT)
(2)PRINTER物件.......Space

我想直接把文字輸出到 LPT1
我是否需要裝印表機的Driver 呢？
我想寫輸出到三聯式發票機！
但我是這樣寫的 printer.print "測試~~"
就是印不出來！為什麼呢？

請問我在程式中加了錯誤處理,希望程式不要因為發生錯誤而停下來,但是當某些錯誤發生時還是會出現對話方塊要求要按確定才行而且有時只有出現錯誤原因而沒有錯誤碼,請問我該如何做才能把這些錯誤攔下來
1.當adodc連不到資料庫時,出現
[DBNETLIB][ConnectionOpen (connect()).]SQL Server 不存在或拒絕存取
2.資料庫被Admin在a1-unknow機器上設定為防止開啟或鎖定
3.沒有使用權限

我有一ㄍ程式是這樣滴~
word="萬丈高樓平地起"
length=len(word)
for i=1 to length
a=string(length-i,"　") '空格ㄉ地方要用全形ㄉ空格

小弟寫了一個直接將html的code輸出到temp.html的程式 , 但用IE開啟,可在某些位置看到亂碼,使到後面的html code也不能產生原有的效果 , 相信是檔案coding的問題 , 我是用binary 寫入的 , 請問該如何可以制作出正確的ascii value?
程式碼如下:
Private Sub Command1_Click()
Dim ts As Byte
LineNum = 0

我使用VB6.0,我的情況是當我從資料檔中讀取資料後以PRINT,SPC,TAB等指令控制資料於表單上固定位置顯示,但若在另一台電腦上使用卻無法在預期的位置產生(原應在同一行產生之數據卻產生跳行)(PS 螢幕解析度已設為一致)

請問我有一個機器是接在 LPT1 上！
場商說只要直接送到 LPT1 不管是不是中文
都會直接印出來！
我查了一下！用printer 要怎麼設定送到 LPT1
還有我看了很多範例是寫 printer.print "測試"

請教各位前輩:
愚者使用下列程式碼控制列表機可以正確列印
Hand = FreeFile
　 Open "LPT1" For Output As #Hand
　 Print #Hand, "1234567890" & vbCrLf

在vb6.0設計列印格式時,我將A4分成兩等份,FORM的大小設計成A4的一半,請教如何用程式設計,將相同的文件列在同一份A4的格式內,也就是A4分成兩等份,列印時同一份文件上下各一份.

Dim tShell As New Shell
Dim a As Folder
Set a = tShell.BrowseForFolder(0, "Example", 0, "")
以上o既code會彈出瀏覽資料夾的dialog,
但我想知怎樣可以取得user選擇的folder完全路徑呢?