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 如...
請幫忙翻譯成白話文,請幫忙翻譯成白話文,謝謝
夫前世之主,能使人人異心不為朋,莫如紂 能禁絕善人為朋,莫如漢獻帝 能誅戮清流之朋,莫如唐昭宗之世 然皆亂亡其國。釋義 前代的君主,能使人人異心不結為朋黨的,誰也不及商紂王 能禁絕好人結為朋黨的,誰也不及漢獻帝 能殺害 清流 們的朋黨的,誰也不及唐昭宗之時 但是都由此而使他們的國家招來混亂以至滅亡。...