vb6文字對應數字

2022-10-10 19:21:23 字數 856 閱讀 8204

1樓:左右來風

你是不是想用一串數字表示文字框中的文字?首先知道asc("文字")只對文字第一個字元取ascii碼的。

dim dy as string

for i=1 to len(text1.text)dy=asc(left(text1.text,i)) & " " & dy

next

這就得到了一個用空格分開的由數字組成的字串。

2樓:

你說的數字應該是指編碼,也就是ascii碼。vb的ascii碼較老式的ascii碼有其區別。老式的ascii碼是正整數,1-255之間。

可以用來表示大、小寫英文字母,數字,標點符號,和一些小圖示,例如(#$%)。vb的ascii碼則是根據多語言的特性進行了增強的。

在vb中,中文的ascii碼是負整數。

在vb中,得到字元的ascii碼的語句是:asc(字元)例如求大寫「a」的ascii碼可以利用如下語句:

asc("a")

求「我」 的ascii碼,可以:

asc("我")

3樓:

private sub command1_click()dim ax as string

for i = 1 to len(text1.text)ax = ax & cstr(asc(right(left(text1.text, i), 1))) & " "

next i

text2.text = ax

end sub

private sub form_load()text1.text = ""

text2.text = ""

end sub

VB6程式條怎麼實現,VB6如何讓程式只執行一個程式例項

實現方法很多呀。如果自帶進度條。可以用自帶的做。太久不用vb6了。放了是否自帶了。這種做法就是設定一個總值。比如100,然後把你程式要做的工作分成若干個任務,比如10個。這樣每次一個任務執行完,更新進度條的值。10,20,30.還有更靈活的。不如利用picture box。在flash裡面做一個動畫...

如何學習好VB6,如何學習好VB

把vb當成一門新的語言學習 不要放過任何一個看上去很簡單的小程式設計問題 他們往往並不那麼簡單,或者可以引伸出很多知識點 學vb並不難,長期堅持上機實踐和不遺餘力的博覽群書 如果不是天才的話,想學程式設計就不要想玩遊戲 浮躁的人容易說 xx語言不行了,應該學yy 是你自己不行了吧!浮躁的人容易問 我...

VB6 陣列,VB中陣列是什麼意思

for i 2 to 15 金額 2 next這個迴圈沒有實際意義,直接 金額 2 即可。非要用指令碼執行外部 嗎?為什麼不直接 for i 2 to 15 if 2 15 金額 50 end if next 以上兩點僅僅是根據提供的 進行表面分析。第一,你傳送的不是陣列。第二,我試了一下你的 沒有...