vb点虐 桌面路径 vb获取桌面路径-成都创新互联网站建设

关于创新互联

多方位宣传企业产品与服务 突出企业形象

公司简介 公司的服务 荣誉资质 新闻动态 联系我们

vb点虐 桌面路径 vb获取桌面路径

急急急!!十万火急!!求VB.NET高手!!!

描述不够清楚,也没有图。你的界面是什么界面,是窗体还是其他的什么。

创新互联建站主营介休网站建设的网络公司,主营网站建设方案,成都App制作,介休h5小程序制作搭建,介休网站营销推广欢迎介休等地区企业咨询

如果是窗体,他会让你导入图片,作为资源存在工程里面。

如果不是,你先要把背景图片放到资源里再调用。

又或者你的界面图片被别的控件挡住了,你需要将别的控件的backcolor属性改为transparent。

总之你想问什么问题,你得描述清楚。

VB 如何获取桌面路径

哈哈 api吧 ,何不用vb点虐 呢 抱着vb6写程序不高效的

下面是 网上copy的(没测过,不通过请不要骂人!)用apiPrivate Declare Function SHGetSpecialFolderLocation Lib "shell32.dll" (ByVal hwndOwner As Long, ByVal nFolder As Long, pidl As ITEMIDLIST) As LongPrivate Declare Function SHGetPathFromIDList Lib "shell32.dll" Alias "SHGetPathFromIDListA" (ByVal pidl As Long, ByVal pszPath As String) As LongPrivate Type SHITEMID cb As Long abID As ByteEnd TypePrivate Type ITEMIDLIST mkid As SHITEMIDEnd TypePrivate Sub Form_Click() Dim R As Long, Path As String Dim IDL As ITEMIDLIST R = SHGetSpecialFolderLocation(100, 0, IDL) If R = 0 Then Path = Space(255) R = SHGetPathFromIDList(ByVal IDL.mkid.cb, ByVal Path) R = InStr(Path, vbNullChar) If R 0 Then Path = Left(Path, R - 1) End If Else Path = "" End If Print PathEnd Sub

VB点虐 关于路径的问题

一种采用绝对路径比如"provider=Microsoft.jet.oledb.4.0;Data source= c:/xxx/AAA.mdb"

第二种采用当前exe所在路径

"provider=Microsoft.jet.oledb.4.0;Data source= “+Application.StartupPath + "\\"+”AAA.mdb"


文章标题:vb点虐 桌面路径 vb获取桌面路径
网站地址:http://kswsj.cn/article/ddspjji.html

其他资讯