我用richtextbox做了個記事本，當用中文輸入時用到空格鍵就會出現以下的錯誤訊息：執行階段錯誤 '380' invalid property value‧
輸入英文沒問題，我試過四種中文輸入法也是出現上面的錯誤訊息，請前輩門指導.Thanks
輸入英文沒問題，我試過四種中文輸入法也是出現上面的錯誤訊息，請前輩門指導.Thanks
文章標籤
全站熱搜
- 12月 19 週五 200312:30
請問~Thanks(編號：32297)
小吳 VBQA 程式設計討論
提供小吳 VBQA 包含VB6,VB 2003,VB 2005,VB 2008,VB 2010,VB.NET,Visual Studio,Visual Basic,程式設計,C#,ASP.NET , Windows From , SQL Server , Crystal Report,VBA,HTML,網頁設計,微軟,98,XP,Lotus Notes,KB .
部落格全站分類：數位生活
文章分類
- Timer (335)
- ODBC (388)
- Print (641)
- DragDrop (9)
- MSComm (336)
- Picture (447)
- ADODC (752)
- 公因數 (20)
- Label (292)
- Datareport (778)
- 封裝 (451)
- RichTextBox (165)
- webcam (5)
- MSFlexGrid (135)
- 進位 (121)
- Office (5)
- 輸入法 (73)
- Datagrid (422)
- Notes (10)
- Mapi (34)
- Outlook (74)
- Run-Time Error (29)
- Jmail (6)
- MP3 (77)
- 信用卡 (8)
- E-Mail (119)
- Base64 (8)
- VBScript (24)
- XML (39)
- FlexGrid (21)
- DIR (41)
- Word (104)
- 文字檔 (376)
- Big5 (18)
- MSN (23)
- MsChart (74)
- DataGrid (33)
- 壓縮 (40)
- 字串 (480)
- MSDN (87)
- ASP (521)
- 陣列 (210)
- From (2,327)
- Shape (71)
- 資源檔 (26)
- Treeview (55)
- 心冷熱情熄 (2)
- VB.NET (51)
- 小吳 (51)
- MySQL (5)
- DirListBox (5)
- Flash (7)
- FileListBox (23)
- 網路安全 (5)
- Web services (1)
- ADODB (35)
- Line (15)
- HTML (34)
- Win32 (1)
- 繪圖 (5)
- ASCII (70)
- COM Port (2)
- ComboBox (11)
- IE (267)
- FoxPro (1)
- ListView (88)
- ActiveX (79)
- PictureBox (185)
- Shell (118)
- Image (60)
- Error (63)
- ADO (642)
- 亂碼 (23)
- IIS (11)
- RS232 (158)
- USB (72)
- WebBrowser (5)
- 滑鼠 (241)
- 鍵盤 (59)
- 資料庫 (1,304)
- Unicode (8)
- Recordset (36)
- Winsock (511)
- 安裝 (5)
- DLL (615)
- OCX (195)
- HTML (74)
- TextBox (1,057)
- MDI (152)
- API (445)
- 倚天 (2)
- Crystal Report (710)
- ListBox (115)
- 列印 (525)
- SQL (1,400)
- 程式設計 (12)
- VB (5,631)
- Access (285)
- VBA (16)
- Excel (189)
- 未分類文章 (1)
就算是執行階段錯誤 你也會知道是當在哪一行吧 把那一段的程式貼出來 大家也才好幫你指出錯誤 應該是你程式有寫錯才對^^
首先謝謝 BRL 的回應，我在有安裝 VB6 的機台上是沒問題，沒安裝 VB 的機台就有上面的錯誤訊息‧我是初(剛)學 VB ，我要怎麼樣才能找出有問題的那一段‧謝謝！
請問你安裝程式到"沒安裝 VB 的機台"時 你有使用封裝程式去Setup嗎?? 如果沒有的話可能是部份的元件有問題(用封裝部署程式去做安裝程式) 如果有的話 就有點難猜了 你就要多寫點LOG(也可以用MsgBox)去看可能錯在哪一段程式中了
謝謝 brl ，我把以下的這段停掉就沒問題了，要用以下這段該怎麼做？ '防止在切換輸入法時字體自變 'Private Sub RichTextBox1_KeyUp(KeyCode As Integer, Shift As Integer) 'If KeyCode = vbKeySpace Then RichTextBox1.SelFontName = CommonDialog1.FontName 'End Sub 另外一個問題是 我在存新檔的時候沒有popup save視窗？ '儲存檔案 Private Sub mnuSave_Click() CommonDialog1.Filter = "文字文檔(*.txt)!*.txt!RTF文檔(*.rtf)!*.rtf!所有檔案(*.*)!*.*" FileType = CommonDialog1.FileTitle FiType = LCase(Right(FileType, 3)) FileName = CommonDialog1.FileName Select Case FiType Case "txt" RichTextBox1.SaveFile FileName, rtfText Case "rtf" RichTextBox1.SaveFile FileName, rtfRTF Case "*.*" RichTextBox1.SaveFile FileName End Select Me.Caption = "我的記事本：" & FileName MsgBox "檔案已經存在，是否要覆蓋？", vbYesNo End Sub