1樓:
看看這兩個函式.應該能解決你的問題了.
val 函式
返回包含於字串內的數字,字串中是一個適當型別的數值。
語法val(string)
必要的 string 引數可以是任何有效的字串表示式.
說明val 函式,在它不能識別為數字的第一個字元上,停止讀入字串。那些被認為是數值的一部分的符號和字元,例如美圓號與逗號,都不能被識別。但是函式可以識別進位制符號 &o(八進位制)和 &h(十六進位制)。
空白、製表符和換行符都從引數中被去掉。
下面的返回值為 1615198:
val(" 1615 198th street n.e.")
在下面的**中,val 為所示的十六進位制數值返回十進位制數值 -1。
val("&hffff")
注意 val 函式只會將句點(.)當成一個可用的小數點分隔符。當使用不同的小數點分隔符時,如在國際版應用程式中,代之以 cdbl 來把字串轉換為數字。
mid 函式
返回 variant (string),其中包含字串中指定數量的字元。
語法mid(string, start[, length])
mid 函式的語法具有下面的命名引數:
部分 說明
string 必要引數。字串表示式,從中返回字元。如果 string 包含 null,將返回 null。
start 必要引數。為 long。string 中被取出部分的字元位置。如果 start 超過 string 的字元數,mid 返回零長度字串 ("")。
length 可選引數;為 variant (long)。要返回的字元數。如果省略或 length 超過文字的字元數(包括 start 處的字元),將返回字串中從 start 到尾端的所有字元。
說明欲知 string 的字元數,可用 len 函式。
注意 midb 函式作用於字串中包含的位元組資料,如同在雙位元組字符集(dbcs)語言中一樣。因此其引數指定的是位元組數,而不是字元數。對於使用 midb的示例**,請參閱示例主題中的第二個
2樓:匿名使用者
vb中如何從一段話的文字中提取數字,需要先對文字中的字進行逐一迴圈判斷,如果是數字,然後返回需要的結果。**如下:
private sub command1_click()dim a as string
a = "我愛你1314,你呢"
for i = 1 to len(a)'對文字中每個字迴圈判斷b = mid(a, i, 1)
if isnumeric(b) then'判斷改字是否是數字,用isnumeric判斷是否是數字
s = val(mid(a, i))'如果是數字,就提取出來,用到val函式
exit for'提取數字後,退出迴圈。
end if
next
msgbox s 's的值就是1314
end sub
vb逐一讀取text1裡面的數字
3樓:網海1書生
這要看到你的資料格式才能決定,能否列出一段資料看看?
4樓:匿名使用者
那些數字是怎麼排列的?使用逗號間隔 還是空格間隔 還是每一行一個數字呢?
VB如何連續讀取串列埠資料,vb怎樣讀取串列埠資料並進行處理?
vb6.0mscomm控制元件可以利用oncomm事件連續獲取來自外設傳送的訊號。基於 1 mscomm控制元件的rthreshold 屬性不為0和恰當的接收 2 使用電腦主機板物理com口或pci多串列埠卡上的com口com,這樣的com口是全雙工的,傳送與接收不會衝突。3 高質量的接收 和符合通...
vb 如何設定讀取密碼在ini文字中
應該這下面合適你的要求了。private sub command1 click if dir f password.ini then open f password.ini for input as 1 line input 1,mima close 1 if text1.text mima the...
VB中的msgbox問題,vb中msgbox的問題
msgbox a b 顯示字串連線的結果 象我這麼寫。就對了!vb中msgbox的問題 a msgbox 必須在工資審批任務完成後才能進行更新記錄操作!請選擇是否進行更新記錄操作 vbyesno,確定更新 少了一個逗號吧,vbyesno前面加個逗號看看看其他是沒錯的 因為你點了確定按鈕這時x才會有值...