雪糕先生 发布于 2013/04/24 15:16
其实方法很简单:
把WORD文档另存为"网页"就要可以了,当我们把WORD文档另存为网页的时候,就会自动在文件同路径下生成一个如:"文件名.file"的文件夹,把图片这类附件全部放在里面,是不是发现你要的图片了?呵呵.这样生成的图片会跟原来图片的分辨率大小一样.
是不是很简单?好的,你学会了!
把WORD文档另存为"网页"就要可以了,当我们把WORD文档另存为网页的时候,就会自动在文件同路径下生成一个如:"文件名.file"的文件夹,把图片这类附件全部放在里面,是不是发现你要的图片了?呵呵.这样生成的图片会跟原来图片的分辨率大小一样.
是不是很简单?好的,你学会了!
雪糕先生 发布于 2011/01/01 19:36
下面是VB.NET 修改桌面壁纸的方法:
引用
Public Class Form1
'晨彦电脑科技 www.btoss.com
Private Const SPI_SETDESKWALLPAPER As Integer = &H14
Private Const SPIF_UPDATEINIFILE As Integer = &H1
Private Const SPIF_SENDWININICHANGE As Integer = &H2
Private Declare Auto Function SystemParametersInfo Lib "user32.dll" ( _
ByVal uAction As Integer, ByVal uParam As Integer, _
ByVal lpvParam As String, ByVal fuWinIni As Integer) As Integer
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
SystemParametersInfo(SPI_SETDESKWALLPAPER, 0, "图片地址", 1)
End Sub
End Class
'晨彦电脑科技 www.btoss.com
Private Const SPI_SETDESKWALLPAPER As Integer = &H14
Private Const SPIF_UPDATEINIFILE As Integer = &H1
Private Const SPIF_SENDWININICHANGE As Integer = &H2
Private Declare Auto Function SystemParametersInfo Lib "user32.dll" ( _
ByVal uAction As Integer, ByVal uParam As Integer, _
ByVal lpvParam As String, ByVal fuWinIni As Integer) As Integer
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
SystemParametersInfo(SPI_SETDESKWALLPAPER, 0, "图片地址", 1)
End Sub
End Class
雪糕先生 发布于 2009/10/28 17:01
分类
热门文章
- [45706]五种方法安装Windows...
- [29087]您可能需要与该网络的 in...
- [14246]开机自动检测网络状态运行程...
- [14135]2012东埔英歌舞
- [12589]APMServ一键快速搭建...
- [12554]双路由器上网的连接和设置方...
- [12487]Google提供的免费天气...
- [12422]各种BIOS的设置细解
- [12392]EvaPhone - 无需...
- [12126]雪糕乐园小游戏集2.04版...