1樓：匿名使用者
vb6.0需要使用windows api函式實現隱藏和顯示工作列。
findwindow函式檢索控制代碼到頂層視窗的類名和視窗名稱匹配指定的字串。此功能不搜尋子視窗。該功能不執行區分大小寫的搜尋。
iswindowvisible函式檢索指定視窗的可見性狀態。
showwindow函式設定指定視窗的顯示狀態。
實現**：
option explicit
private declare function findwindow lib "user32" alias "findwindowa" (byval lpclassname as string, byval lpwindowname as string) as long
private declare function iswindowvisible lib "user32" (byval hwnd as long) as long
private declare function showwindow lib "user32" (byval hwnd as long, byval ncmdshow as long) as long
private sub command1_click()
dim hwnd as long
hwnd = findwindow("shell_traywnd", "") '取工作列視窗控制代碼
if iswindowvisible(hwnd) <> 0 then '如果工作列是可視狀態
showwindow hwnd, 0 '隱藏工作列
else
showwindow hwnd, 1 '顯示工作列
end if
end sub效果：
2樓：匿名使用者
隱藏工作列是什麼意思呢？
把窗體的borderstyle屬性設為3，是不是這個效果啊
3樓：
private declare function findwindow lib "user32" alias "findwindowa" (byval lpclassname as string, byval lpwindowname as string) as long
private declare function iswindowvisible lib "user32" (byval hwnd as long) as long
private declare function showwindow lib "user32" (byval hwnd as long, byval ncmdshow as long) as long
private sub command1_click()
dim hwnd as long
hwnd = findwindow("shell_traywnd", "") '取工作列視窗控制代碼
if iswindowvisible(hwnd) <> 0 then '如果工作列是可視狀態
showwindow hwnd, 0 '隱藏工作列
else '否則
showwindow hwnd, 1 '顯示工作列
end if
end sub
這個比一樓的簡單一點
4樓：匿名使用者
網上有很多例子，用api實現的比較多，比如下面這個：
private declare function findwindow lib "user32" alias "findwindowa" (byval lpclassname as string, byval lpwindowname as string) as long
private declare function findwindowex lib "user32" alias "findwindowexa" (byval hwnd1 as long, byval hwnd2 as long, byval lpsz1 as string, byval lpsz2 as string) as long
private declare function enablewindow lib "user32" (byval hwnd as long, byval fenable as long) as long
private declare function showwindow lib "user32" (byval hwnd as long, byval ncmdshow as long) as long
private const sw_hide = 0
private const sw_show = 5
private sub cmd_showbar_click()
dim wnd as long
wnd = findwindow("shell_traywnd", vbnullstring)
showwindow wnd, sw_show
end sub
private sub cmd_hidebar_click()
dim wnd as long
wnd = findwindow("shell_traywnd", vbnullstring)
showwindow wnd, sw_hide
end sub
vb呼叫其它程式，如何隱藏工作列，只顯示內容
5樓：
樓上的全屏顯示其實沒有用處，因為按一下esc鍵就退出全屏了，然後就可以編輯了。
你的要求超出vb的能力，我給你支個招，事先把你想要展示的word文件、excel**、pdf文件、cad圖轉換成**，然後就簡單了，在vb中顯示**有很多方法。
轉換**，也有簡單方法，即採用列印驅動的方式將文件「列印」成**，這樣就看不到軟體的外觀邊框選單這些。安裝microsoft office時會同時安裝microsoft office document image writer，這個就是office帶的虛擬印表機。列印時選擇這個虛擬印表機，輸入一個檔名儲存即可。
儲存的**格式是tif。
6樓：匿名使用者
這個只是隱藏工具條而已，vb應該可以做到
第一種方法是用api抓到工具條的控制代碼並隱藏或關閉
第二種是呼叫vba的方法，可以記錄巨集後呼叫
7樓：匿名使用者
如果你需要讓vb調出的程式全屏，那麼
能否成功取決於被呼叫程式本身的性質。
如果它支援用命令列引數開啟全屏，那麼只需要新增命令列引數就可以了。
如果不支援，那就沒辦法了
怎樣隱藏工作列中的圖示?
8樓：春風何處去
可以在工作列右鍵屬性中隱藏圖示。
1、在工作列任意位置右鍵，在彈出選單選擇屬性。
2、如果是想隱藏不活**標，勾選隱藏不活**標。點選自定義則是具體設定某個圖示。
3、點選自定義，找到你要設定的某個圖示，有滑鼠點選它的狀態。
4、在狀態裡選擇完全隱藏，即可達到隱藏圖示的效果
9樓：upupoo動態桌面
桌面美化大作戰第二彈
vb程式如何隱藏標題欄，請仔細看補充說明
10樓：vb妮可
應該可以的,你可以新建個工程,單獨測試這個功能, 如果不能正常的話,問題就在vb本身了, 如果新建工程能, 說明你設計的程式,有些地方影響了這個..具體要看窗體屬性設定,以及**部分了.
補充:private sub form_load()me.borderstyle = 0
me.caption = ""
end sub
如果是有選單的窗體,可以參考vb吧裡cbm666老師的方法,將選單放到另個窗體中,在本窗體呼叫,這樣你這個窗體才能不顯示標題欄的.
參考內容:http://post.
11樓：匿名使用者
vb程式隱藏標題欄**如下：
private declare function setwindowtext lib "user32" alias "setwindowtexta" (byval hwnd as long, byval lpstring as string) as long
borderstyle = 0
showintaskbar = true
private sub form_load()setwindowtext me.hwnd, "工作列名稱"
end sub
12樓：老牛帶你看奇聞
你的主窗體上有選單吧？？那你試試吧，把主窗體的這兩屬性設一下
caption=""
controlbox=false
13樓：tom星
把窗體的controlbox屬性設定成false就沒有最小化最大化和關閉這3個選單控制元件了
把caption屬性弄個空格就只有一個空的標題了
電腦的工作列隱藏不了怎麼回事，電腦的工作列老是自動隱藏怎麼辦
韓冷 應該是工作列置頂導致的，解決方法如下 1，右鍵工作列取消鎖定工作列狀態，2，取消鎖定後使用滑鼠拖拽工作列到螢幕下方3，滑鼠右鍵工作列，再次鎖定工作列 遊方向 你可以嘗試使用360安全衛士的人工服務的方案來查詢方案修復它。電腦的工作列老是自動隱藏怎麼辦? 倪榮庫蘭澤 右擊工作列 屬性 自動隱藏工...
如何把工作列的某個任務隱藏
請看下面 在工作列右擊點屬性後，在 隱藏不活 標 後面有個 自定義 按鈕，你點 自定義 在當前專案中點一下滑鼠左鍵選中想要隱藏的，然後選擇 總是隱藏 即可。如何隱藏工作列圖示小結。a 徹底隱藏所有上圖中已執行程式的小圖示？開啟執行對話方塊 輸入命令，如下 然後確定 彈出組策略視窗，依次選擇 使用者配置 ...
如何把電腦工作列一直隱藏，電腦的工作列怎麼自動隱藏
1 以win7為例，在電腦桌面的左下角找到windows圖示，右鍵單擊這個圖示，在彈出來的選項中點選設定。2 接著在裡面找到個性化選項，並點選開啟它。3 進入個性化介面之後，在左側的選項裡面點選工作列。4 開啟了工作列的設定視窗之後，在工作列裡面找到在桌面模式下自動隱藏工作列選項。5 找到了之後，將...