用户登录  |  用户注册
首 页VB文章VB源码VB图书毕业设计 ┆ ┆
当前位置:VB源码下载VB文章VB资料库

自动更换墙纸的小程序

减小字体 增大字体 作者:佚名  来源:本站整理  发布时间:2001-10-26 10:45:00
弹出通用对话框(打开文件)

ComOpen.ShowOpen

如果选择了墙纸图片则把图片的路径添加到列表框中去

Listfile.AddItem ComOpen.FileName
End Sub

当“退出程序”按钮被按下时,退出

Private Sub CmdExit_Click()
Unload Me
End Sub

窗体加载时

Private Sub Form_Load()

共7页。 9 1 2 3 4 5 6 7 :

上一页  [1] [2] [3] [4] [5] [6] [7] [8] [9] [10]  下一页

Tags:

作者:佚名

文章评论评论内容只代表网友观点,与本站立场无关!

   评论摘要(共 0 条,得分 0 分,平均 0 分) 查看完整评论
Copyright © 2009 BlackIceCN.COM. All Rights Reserved .
粤ICP备10029450号
页面执行时间:54,156.25000 毫秒
Powered by: