vb程序如何显示隐藏图片

‘壹’ 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