1樓：匿名使用者
我知道最笨的方法
遍歷所有字元。
**如下：
private sub command1_click()
dim checkstr as string
dim stra() as double '定義陣列用於儲存數字
dim tempstr as string
dim numstr as string
dim i, j as integer
checkstr = trim(text1.text)
i = 1
j = 1
numstr = ""
do while i <= len(checkstr)
tempstr = mid(checkstr, i, 1) '提取乙個字元
select case tempstr
case "1", "2", "3", "4", "5", "6", "7", "8", "9", "0", "." '判斷是否為數字或小數點"."
numstr = numstr & tempstr
if i = len(checkstr) then
numstr = trim(numstr)
if len(numstr) > 0 then
redim preserve stra(j) as double '重定義陣列， preserve 意思是：保留原有陣列的數值
if right(numstr, 1) = "." then numstr = left(numstr, len(numstr) - 1) '若該小數點為全文本最後乙個字元，則去除該小數點
stra(j - 1) = val(numstr) '用陣列儲存數字
numstr = ""
j = j + 1
else
numstr = ""
end if
else
if left(numstr, 1) = "." then numstr = "" '若該小數點為在數字前面，則去除該小數點
end if
case else
numstr = trim(numstr)
if len(numstr) > 0 then
redim preserve stra(j) as double
if right(numstr, 1) = "." then numstr = left(numstr, len(numstr) - 1)
stra(j - 1) = val(numstr)
j = j + 1
end if
numstr = ""
end select
i = i + 1
loop
text2.text = "整個文字含有 " & i - 1 & " 個字元，其中有：" & j - 1 & " 個數字，分別為：" & vbcrlf
for i = 0 to j - 2
text2.text = text2.text & stra(i) & vbcrlf
next
end sub
2樓：匿名使用者
私人小組form_load（）
「開啟」c：\ 1.txt檔案「，輸出為1'print＃1，text1.text
關閉＃1
/>開啟「c：\ 1.txt」輸入為＃1
做，而不是eof（1）
線路輸入＃1，溫度
str1 = str1＆溫度與vbcrlf />迴圈text1.text = str1
end sub
3樓：匿名使用者
你把文字的內容發出來看下
vb裡如何提取文字檔案指定數字
4樓：閃星
額。。。用split函式，以「=」作為分割符
vb怎樣寫才能每次讀取乙個txt文字裡的數字？
c語言裡如何讀取檔案中用空格分隔的整數，我想把他們讀出來存在乙個陣列裡
5樓：銷
直接fopen
然後用fscanf讀取，fscanf就跟scanf一樣，除了多乙個檔案指標
你可以把fopen想象成自動把檔案的內容輸入到黑框裡
6樓：匿名使用者
fscanf(fp,"%d",&a[i]);
7樓：依稀紅顏落
if (temp<0x40&&temp>0x29) a[i]=temp-0x30
8樓：匿名使用者
主要思想：把它當做乙個字元陣列來讀取，乙個字元乙個字元的讀取，當讀取到空格時，就判定這是乙個斷點，；；；；
方法：從第乙個字元開始，設定乙個變數temp=0，讀取下乙個字元，當讀取到的字元不是空格時，說明還沒讀取完，如果讀取到空格時，就判斷temp的值，如果temp=0說明是新的數的開始，再讀取下乙個，如果不是空格說明沒讀取完，就繼續讀取，直到讀取到空格，把temp置為1、、、、、就這樣迴圈下去，直到全部讀取完
如何使用vb把txt檔案中的數字乙個個讀取出來
VB如何連續讀取串列埠資料，vb怎樣讀取串列埠資料並進行處理？
vb6.0mscomm控制元件可以利用oncomm事件連續獲取來自外設傳送的訊號。基於 1 mscomm控制元件的rthreshold 屬性不為0和恰當的接收 2 使用電腦主機板物理com口或pci多串列埠卡上的com口com，這樣的com口是全雙工的，傳送與接收不會衝突。3 高質量的接收 和符合通...
vb怎樣讀取串列埠資料並進行處理，VB如何連續讀取串列埠資料
萍水e相逢 你這個 不難 吧 2方約定好 傳送 4次，前2次是整數部分，後2次是小數部分那麼以後 不管傳送什麼資料 都 沒有問題了，如 3145 個數 就是 31.45 串列埠通訊的 重點 就是 傳送方 和 接收方 要 協商好資料如何傳送，如何接收 識別 等等 vb 裡字元處理等函式很多 關鍵是 靈...
vb6 0編寫程式讀取excel檔案 在電腦沒有裝excel軟體的情況下
用ado開啟excel的 關鍵在於連線字串 dim cnxl as new adodb.connection dim rsxl as new adodb.recordset cnxl.connectionstring provider microsoft.jet.oledb.4.0 data sou...