1樓:網友
如果你的字串是特定的話,不用那麼麻煩。
a="123456789"
a=replace(replace(a,"3","3,")6","6,")
如果不是特定的。
comma("19234236570")
function comma(str)
if not(isnumeric(str)) or str = 0 then
result = 0
elseif len(fix(str)) 4 then
result = str
else pos = instr(1,str,".
if pos > 0 then
dec = mid(str,pos)
end if
res = strreverse(fix(str))
loopcount = 1
while loopcount <=len(res)
tempresult = tempresult + mid(res,loopcount,3)
loopcount = loopcount + 3
if loopcount <=len(res) then
tempresult = tempresult +
end if
wend result = strreverse(tempresult) +dec
end if
comma = result
end function
2樓:dl_會飛的青蛙
vb裡是format(123456789,"#
asp裡就不知道怎麼寫了。
用vb把圓分割成16份,且每個分割點標記數字
3樓:
重新修改下,剛才把題理解錯了,更正如下:
private sub command1_click()const pi =
const a = 1 / 8
dim i as integer
10, 0)-(10, 0), vbred' (0, 0), 8, vbblue, 0, 2 * pi, 1(0, 10)-(0, -10), vbred= 2
for i = 1 to 16
0, 0), 8, qbcolor(i - 1), i - 1) *a * pi, i * a * pi, 1
8 * cos(i * a * pi), 8 * sin(i * a * pi)),qbcolor(i - 1)
inext i
end sub
vb 數字分割
4樓:網友
贊同一樓,樓主自己把簡單問題搞複雜了,把數字取出來除以100就解決了。
5樓:網友
存數值的話除100就ok了。
6樓:網友
這麼簡單的問題寫這麼複雜做什麼。
如果你要賦給text 文件,要注意用format 函式保留幾位小數,不然你前面的0顯示不出來。
數字與數字之間的分割用什麼符號
7樓:網友
例如(1,2)表示區間1到2 之間用逗號。
asp 數字分割
8樓:捌零老陳
『**是根據你24位數字進行編寫的。
getstr("660012345214654163211233") &""
dim arrnumber
arrnumber = split(getstr("660012345214654163211233"),",")
for i = 0 to ubound(arrnumber)
arrnumber(i) &"
next取得拆分字串結果:6600,1234,5214,6541,6321,1233
迴圈陣列輸出結果:
function getstr(byval numberstr)
dim tempstr
for i = 1 to len(numberstr)
if i mod 4 = 0 then
tempstr = tempstr & mid(numberstr,(i / 4 - 1) *4 + 1,4) &","
end if
nextgetstr = left(tempstr,len(tempstr)-1)
end function
asp 如何分割數字串
9樓:網友
前提是你已經連線好了資料庫,然後:
set rs="")
sql="select * from 你的表名"
sql,conn,1,3
str="32694"
dim num(5)
for i=1 to 5
num(i)=cint(mid(str,i,1))你可以取消這句和下句註釋,看執行結果。
rs("欄位1")=num(1)
rs("欄位2")=num(2)
rs("欄位3")=num(3)
rs("欄位4")=num(4)
rs("欄位5")=num(5)
set rs=nothong
10樓:網友
先用cstr(32694)化為字串。
然後用mid(string, start[, length])函式得到每乙個字元。
11樓:網友
這個很容易。
用乙個迴圈語句將這串字元分別存入就ok了。哈哈。
asp問題。分割數字。
12樓:網友
用替換函式就行了,語法如下:
語法。replace(expression, find, replacewith[, compare[, count[, start]]]
例子:dim mystring
mystring = replace("xxpxxpxxp", p", y") 二進位比較從字串左端開始。返回 "xxyxxpxxy"。
mystring = replace("xxpxxpxxp", p", y", 文字比較從第三個字元開始。返回 "yxxyxxy"。3,, 1, 1)
13樓:網友
getbig("43210987")
function getbig(str)
if isnumeric(str) thendim strarr:strarr=array("零","壹","貳","叄","肆","伍","陸","柒","捌","玖")
for i=1 to len(str)
a=mid(str,i,1)
getbig=getbig&strarr(a)next else
getbig=str
end if
end function
**少2個零?如果你想在前面補0的話,你可以這樣呼叫嘛。
零零"&getbig("43210987")
用數字和化學符號表示1鐵原子
1 原子的表示方法就是用元素符號來表示乙個原子,表示多個該原子,就在其元素符號前加上相應的數字 所以2個鐵原子,就可表示為 2fe 2 由分子的表示方法,正確書寫物質的化學式,表示多個該分子,就在其化學式前加上相應的數字,則3個五氧化二磷分子可表示為 2o5 3 離子的表示方法 在表示該離子的元素符...
數字萬用表的符號含義萬用表各個符號表示的意思?
電路是很複雜的。當人們需要了解電路裡面的電路元件的好壞,或者元件的一些數值大小的時候可能都會用到萬用表,萬用表的功能是很齊全的,當然了它也比一般的測量儀器複雜,在萬用表上有很多符號,大家知道這些符號它們代表的是什麼意思嗎。其實上面的很多符號數字都和我們生活中的很多符號是一樣的,像上面標示的v它的意思...
用化學符號和數字按要求填空1銅原子
1 元素符號前面加數字表示原子個數,故3個銅原子符號為 3cu 2 氖氣是由氖原子直接構成的,故化學式為 ne 3 汙染空氣的三大主要氣體是二氧化硫 一氧化碳 二氧化氮,化學式分別為 so2 co no2 4 元素的化合價的正確標法是在元素符號或原子團符號的正上方標明化合價的種類和價目,氧化鐵中鐵元...