1樓:匿名使用者
function getnumber(v as string)sz = "0123456789."
for i = 1 to len(v)
c = mid(v, i, 1)
if instr(sz, c) > 0 thengetnumber = getnumber & cend if
next
end function
2樓:
你測試一下下面的**,可能對你有幫助;
sub test()
dim l as long
dim mystr as string
dim i as long
dim mysi as string, si as stringmystr = "fdsaf4.56454dsaf"
l = len(mystr)
for i = 1 to l
mysi = mid(mystr, i, 1)if vba.isnumeric(mysi) = true or mysi = "." then
select case i
case is = 1
si = mysi
case is > 1
si = si & mysi
end select
end if
next i
msgbox "字串「" & mystr & "」中包含有數字" & si
end sub
EXCEL用VBA提取字串
築夢 可以使用函式提取一個字串中的一段字元。mid 用來返回文字字串中從指定位置開始的特定數目的字元,該數目由使用者指定,函式 mid 始終將每個字元。應該用到三個字串函式 left right midleft函式用法 left 要提取字元所在單元格,從左側開始提取的個數 right函式用法 rig...
C語言字元陣列與字串問題,C語言中將字串賦值給字元陣列的問題
渿河 這是在定義時初始化 如果你的右邊花括號內的字元個數少於 陣列元素個數 那麼其餘的陣列元素將會初始化為0 0 的ascii碼的值就是0 如果你不指定陣列元素個數 編譯器會自動幫你計算出元素個數的 char c 10 這個是已經給定了陣列的大小,達不到陣列大小的長度的話會自動添零的 c語言中將字串...
C語言中將字串反轉,執行提示錯誤,求高手指點
樓主你好。include include char reverse char str void main printf intput reverstin characer string gets str printf output reversed character string puts rev...