1樓：我的王是金閃閃
這樣可否？不是很清楚你的要求。
private sub commandbutton1_click()textbox2.text = "" '清空文字框2dim txt1len as integerdim str1 as string, str2 as stringtxt1len = len(textbox1.value) '定義變數提取文字框1的字元長度
str2 = "\x"
for x = 1 to txt1len
str1 = mid(textbox1.value, x, 1) '提示424錯誤要求物件
str2 = str2 & hex(asc(str1)) '提示下表越界
next x
textbox2.value = str2 '提示下表越界end sub
2樓：匿名使用者
private sub commandbutton1_click()
『這裡最好不用動態陣列。如果你要記錄每次輸入輸出的內容 可以在sheet.cell中記錄過程
dim str1 as string'定義字元陣列1用於儲存文字框1的內容
dim str2 as string'定義字元陣列2用於儲存文字框2的內容
dim txt1len as integer
dim n,x as long
n=1textbox2.text = "'清空文字框2
txt1len = len(textbox1.text)'定義變數提取文字框1的字元長度
for x = 1 to txt1len
str1= mid(textbox1.text, x, 1)'提示424錯誤要求物件
str2 = "\x" & hex(asc(str1))'提示下表越界 (前面那個\x不太清楚什麼意思。)
sheets(1).cells(n,"a")=str1
sheets(1).cells(n,"b")=str2
next x
textbox2.text = arr2(x)'提示下表越界
end sub
3樓：弗爾佈雷斯
你這個的
arr1(x) = mid(textbox.text, x, 1)'提示424錯誤要求物件
你整個程式中並沒有textbox名稱的控制元件，所以肯定會出錯，還有你的陣列只宣告瞭，並沒有給定範圍並且你
textbox2.text = arr2(x)'提示下表越界
這句在for迴圈外，此時 x 的值已經是 txt1len+1的值了，而你陣列arr2()只給到了txt1len肯定會提示越界的。
由於不太清楚你的意圖，你看看下邊這個更改後的**是否符合你的要求吧。
private sub commandbutton1_click()
textbox2.text = "" '清空文字框2
dim txt1len as integer
dim arr1() as string '定義字元陣列1用於儲存文字框1的內容
dim arr2() as string '定義字元陣列2用於儲存文字框2的內容
txt1len = len(textbox1.text) '定義變數提取文字框1的字元長度
redim arr1(txt1len) '給定陣列1的範圍
redim arr2(txt1len) '給定陣列2的範圍
for x = 1 to txt1len
arr1(x) = mid(textbox1.text, x, 1)
arr2(x) = "\x" & hex(asc(arr1(x)))
textbox2.text = textbox2.text & arr2(x)
next x
'textbox2.text = arr2(x) '由於不太清楚你的意圖是什麼所以這句你自己看看應該放到**吧 _
總之放到這裡肯定不對，會提示越界,我暫時已經給註解掉了,並把這句改為 _
textbox2.text = textbox2.text & arr2(x)放到迴圈裡了,你看看是不是你要的結果吧
end sub
excel VBA總是提示錯誤9下標越界
你這段 寫得不簡潔，是錄製巨集改的吧。workbooks.open thisworkbook.path i xls 這句應該有問題，反向了。但不應該是 下標越界 的問題，具體哪句出現的問題呢？sheets w select 這句如果迴圈開啟的某個檔案沒有工作表 w 會出現下標越界 vba執行時錯誤9...
python提示錯誤python提示錯誤invalidsyntax
python提示錯誤 baiinvalid syntax時因為 python 2.x升級到python 3.x，duprint函式的語zhi法變化了,所以用daopython 2.x的print函式的 放在python 3.x中執行版，結權 果就出現了print函式的 syntaxerror inv...
電腦開啟軟體提示系統錯誤，電腦開啟軟體提示系統檔案錯誤
我也出現同樣的問題，請問你最後是怎麼解決的？急！感激不盡！保護檔案，你有裝防毒軟體或者安全衛士這些麼？如果沒裝建議重灌下系統然後安裝一個，以後就不會出現這個問題了 病毒非常多了 安裝瑞星防毒 有些檔案是不允許你動的ok特別是系統的 裝的神馬防毒?解除安裝試試 控制面板 系統和安全 使用者控制賬戶設定...