1樓:不懂裝明白
新增乙個filelistbox,乙個listbox,乙個command1。
private sub command1_click()const sdestdir as string = c:\b" '在這裡修改目標資料夾。
將檔名新增到list1中。
複製檔案 filecopy & sdestdir &重新整理檔案框。
end sub
name 原含檔名路徑 as 目的含檔名路徑意思是將原來的檔案移動到指定目錄。
複製的話用另乙個語句方便一點:
filecopy 原檔名, 目的檔名。
當然可以定義……鑑於這個情況,建議先好好弄明白基礎……新增乙個filelistbox,乙個listbox。
private sub file1_dblclick()const sdestdir as string = c:\b" '在這裡修改目標資料夾。
將檔名新增到list1中。
移動檔案 name & as sdestdir &重新整理檔案框。
end sub
一道關於電腦vb程式設計的問題
2樓:網友
應該是 \ 而不是 / 吧?\ 是vb的整數除法,/ 則只是普通除法1 \
被除數都是小數,應先轉為整數再作除法,轉換規則是:四捨六入五取雙(雙指的是偶數),四捨六入不必說了,「五取雙」指的是:如果進位後是奇數則不進位,如果進位後是偶數則進位。
如進位後是2,是偶數,所以1 \ 實際上是 1 \ 2 ,結果是,整數除法結果也是整數,且不進位,所以最終結果是0,再如,進位後是3,是奇數,所以不進位,因而 2 \ 實際上是 2 \ 2,當然結果是1了。
3樓:網友
首先,vb會對除數按四捨五入取整。
但vb的四捨五入與我們平時用的四捨五入是不同的vb的四捨五入是,當小數為 時會捨去,當0只有大於了 例如。
才會進一。所以 5\ 意思為 整除 結果為0
5/5. 25 意思為 除以 結果為1
關於VB程式設計的問題 高手請進,急求一個VB的問題!高手請進。
加一個文字框text1,一個按鈕command1private sub command1 click if trim text1.text thenmsgbox 請輸入數字 text1.setfocus else msgbox val trim text1.text 100 米 left cstr ...
vb的簡單的問題,vb的一個簡單的問題
private i as integer private sub command1 click i 10 timer1.interval 1000 每秒執行一次timer事件 end sub private sub timer1 timer i i 1 command1.caption i if i...
關於VB的問題,一個關於VB的問題?
這個實現方法非常簡單,甚至談不上技術。但程式設計師也要講道德,所以不鼓勵你那樣做!給別人找麻煩,自己麻煩會更大.這是要給病毒嗎 沒學過vb,不知道怎麼彈出視窗,用一個for的死迴圈,沒有終止的,for裡面用彈出視窗的命令就好了 ps 程式設計不是用來惡搞的 而且要禁用工作管理員 那隻要呼叫外部命令不...