vb中利用replace替換,如果一行中有多個相同的數,但是不想全部替換怎麼辦

2022-03-12 09:16:01 字數 694 閱讀 6372

1樓:匿名使用者

replace函式的第五參數列示替換次數(第四引數指替換開始處).

private sub form_load()dim stemp as string

stemp = "i am a boy 100 20 100 30"

stemp = replace(stemp, "100", "50", , 1)

stemp = replace(stemp, "100", "60", , 1)

msgbox stemp

end sub

2樓:匿名使用者

str1 = "i am a boy 100 20 100 30"

strx = "100"

dim stry(2)

stry(0) = 50

stry(1) = 60

for i=1 to ubound(stry)str1 = replace(left(str1, instr(str1,strx)+len(strx)),strx,stry(i-1)) & right( str1, len(str1)-instr(str1,strx)-len(strx))

next

wscript.echo str1

3樓:匿名使用者

二樓正解

順便請教第四引數是幹嘛用的?

中如何利用查詢替換刪掉多餘的行和空格

必須是小寫的p,你再試試。你可以把段落前的兩個空格替換為一個字母,替換一個空格為無,再將這個字母替換為兩個空格,就可以了。先用查詢替換掉所有多餘的空格,再把 p p替換成 p就好了。查詢空格,替換視窗什麼也不要填,替換。如何快速刪除word中的空白行和多餘空格 準備bai工具 材料 電腦 word軟...

VB寫入檔案寫入特定一行,vb 如何寫入檔案第一行

1 先建一個變數陣列把 i.txt 裡面的內容都讀出來2 修改你要修改的資料 3 重新新建那個檔案,寫入資料。ok?閒來沒事,幫你寫一個吧,加一個按鈕,把 複製進去,然後去d 檢視一下.也不知道你想幹嘛,是學習呢,還是想做別的東西,嘿嘿 像你這種想讀取某行,某段的資料,最好用隨機檔案進行讀取priv...

如何在EXCEL中每隔一行插入一行相同的標題行急用啊謝謝把公式貼上來,並說明下吧

加入此表在sheet1工作表中,則在sheet2工作表中a1輸入 if mod row 3 0,if mod row 3 1,sheet1 a 2,index sheet1 a m,row 4 3 1,column 然後b1將 a 2 改成 b 2 即可,後面的列以此類推,只改這一個地方 sub t...