請幫忙寫VB程式,去掉檔案裡中括號間的內容

2022-09-17 07:11:56 字數 624 閱讀 2056

1樓:匿名使用者

.net確實不會……不好意思……

給個vb6的吧

dim s() as byte

dim e() as byte

dim f as boolean

open "原始檔地址" for binary as #1redim s(lof(1)-1)

get #1,1,s

close #1

redim e(0)

for i = 0 to ubound(s)if s(i)=asc("[") thenf=true

elseif s(i)=asc("]") thenf=false

else

if not f then

e(ubound(e))=s(i)

redim preserve e(ubound(e)+1)end if

end if

next

redim preserve e(ubound(e)-1)open "目標檔案" for output as #1close #1

open "目標檔案" for binary as #1put #1,1,e

close #1

完了~這個是二進位制算的啊……

哥哥姐姐幫幫忙吧幫忙寫個vb猜字謎程式求求

遺忘vb好多年。誒 dim shu private sub command1 click m 0123456789 for i 1 to 4 randomize temp mid m,int rnd len m 1 left m,1 1,1 shu shu temp m replace m,temp...

VB程式如何隱藏標題欄,請仔細看補充說明

應該可以的,你可以新建個工程,單獨測試這個功能,如果不能正常的話,問題就在vb本身了,如果新建工程能,說明你設計的程式,有些地方影響了這個.具體要看窗體屬性設定,以及 部分了.補充 private sub form load me.borderstyle 0 me.caption end sub 如...

請幫忙翻譯成白話文,請幫忙翻譯成白話文,謝謝

夫前世之主,能使人人異心不為朋,莫如紂 能禁絕善人為朋,莫如漢獻帝 能誅戮清流之朋,莫如唐昭宗之世 然皆亂亡其國。釋義 前代的君主,能使人人異心不結為朋黨的,誰也不及商紂王 能禁絕好人結為朋黨的,誰也不及漢獻帝 能殺害 清流 們的朋黨的,誰也不及唐昭宗之時 但是都由此而使他們的國家招來混亂以至滅亡。...