『壹』 vb實現顯示和隱藏桌面圖標,怎麼用
打開vb6,新建「標准exe」
在form1的窗口上添加兩個按鈕(CommandButton),自動幫你命名為command1和command2
然後在form1的窗口中
右鍵->查看代碼
接下來把以上代碼復制進去,注意把」隱藏桌面圖標「和」顯示桌面圖標「這兩行字去掉,否則會報錯
按F5,程序即開始運行
效果為:點擊command1,桌面圖標消失
點擊command2,桌面圖標還原
如果想給兩個按鈕改名,就到右邊的屬性欄更改按鈕的"caption"對應的值
『貳』 VB中,怎麼定時把已經隱藏了圖片控制項可顯```
Private Sub Form_Load()
Picture1.Visible = False
Timer1.Interval = 5000'這里設為5秒,你可以根據需要設置
End Sub
Private Sub Timer1_Timer()
Picture1.Visible = True
Timer1.Enabled = False
End Sub
『叄』 如何讓VB控制系統的顯示隱藏文件
改注冊表HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced下
Hidden 設置
1,顯示隱藏文件,
2,不顯示隱藏文件
ShowSuperHidden 設置
1,顯示系統文件
0,不顯示系統文件
設置完成後,向所有窗口廣播一條WM_SETTINGCHANGE消息就行了
使用到的API函數:
操作注冊表用:RegOpenKey,RegSetValueEx,RegCloseKey
發送消息用:SendMessage
『肆』 vb中怎樣使圖像框的圖片單擊一下圖像顯示再單擊一下圖像隱藏
ifpic.visible=truethen
pic.visible=false
else
pic.visibled=true
endif
『伍』 vb如何實現Excel里的圖片顯示和隱藏
找到那個圖片以後
設置下
.visible=false
或者true是隱藏和顯示
『陸』 用VB怎麼做顯示和隱藏呀例如:
點擊顯示標准答案 意思是不是點擊「顯示標准答案 」這個按鈕
然後就出現下面的模塊這里的模塊是什麼意思?是指中一個窗體嗎?
而且顯示標准答案那裡變成了隱藏標准答案是不是說"顯示標准答案"按鈕變成了「隱藏標准答案」按鈕?
改變按鈕標簽:
Private Sub Command1_Click()
If Command1.Caption = "顯示標准答案" Then
Command1.Caption = "隱藏標准答案"
'其它功能:隱藏你說的什麼模塊
Else
Command1.Caption = "顯示標准答案"
'其它功能:顯示你說的什麼模塊
End If
End Sub
『柒』 VB如何單擊按鈕就顯示圖像框,單擊除按鈕和圖相框以外的區域就隱藏圖像框
一個比較挫的辦法,在按鈕單擊事件里設置圖像框的visible為true,
除按鈕和圖相框以外的區域的單擊事件里設置圖像框的visible為false,
缺點:如果窗體上的控制項多了,你會覺得很煩的。
各位高人有什麼好辦法?
有問題請追問,滿意請採納。
『捌』 用VB怎麼做顯示和隱藏呀例如:
點擊顯示標准答案
意思是不是點擊「顯示標准答案
」這個按鈕
然後就出現下面的模塊這里的模塊是什麼意思?是指中一個窗體嗎?
而且顯示標准答案那裡變成了隱藏標准答案是不是說"顯示標准答案"按鈕變成了「隱藏標准答案」按鈕?
改變按鈕標簽:
Private
Sub
Command1_Click()
If
Command1.Caption
=
"顯示標准答案"
Then
Command1.Caption
=
"隱藏標准答案"
'其它功能:隱藏你說的什麼模塊
Else
Command1.Caption
=
"顯示標准答案"
'其它功能:顯示你說的什麼模塊
End
If
End
Sub
『玖』 VB中隱藏的label怎麼顯示
首先切換到窗體編輯模式,在右側屬性窗口選擇你要的label的name,就會選擇到label,然後把label的left屬性設置為0,top屬性設置為0,你就可以在窗體的左上角找到想要找的label了。
這個方法可以用於各種窗體的可見控制項在被其他控制項擋住找不到的情況,我自己寫程序摸索的,呵呵
『拾』 怎麼讓VB的圖片顯示框顯示圖片
假定春夏秋冬四個按鈕分別是Command1、Command2、Command3、Command4,四個圖片框分別是Picture1、Picture2、Picture3、Picture4
PrivateSubCommand1_Click()
Picture1.Picture=LoadPicture("春的圖片路徑放在這")
EndSub
PrivateSubCommand2_Click()
Picture2.Picture=LoadPicture("夏的圖片路徑放在這")
EndSub
PrivateSubCommand3_Click()
Picture3.Picture=LoadPicture("秋的圖片路徑放在這")
EndSub
PrivateSubCommand4_Click()
Picture4.Picture=LoadPicture("冬的圖片路徑放在這")
EndSub
如果按鈕和圖片框弄成控制項數組則程序會更簡單(四個圖片的文件名要改為1.jpg、2.jpg、3.jpg、4.jpg):
PrivateSubCommand1_Click(IndexAsInteger)
Picture1(Index).Picture=LoadPicture(App.Path&""&Index+1&".jpg")
EndSub