vb中设置对象的属性有几种方法

用属性窗口修改（在编程的时候修改），用代码修改两种方法， *** 作方法如下：

1、首先，在工程菜单按钮下，找到并点击工程属性按钮。

2、然后，就能在这里看到工程属性的窗口。此时，就能在这里使用通用属性设置启动对象。

3、然后在打开的通用页面中，在这里进行设置启动对象。

4、然后鼠标点击这个下拉框，就能在这里Form1为启动对象。

5、最后，设置完成后，点击确定按钮，就完成了进行启动对象的设置。

分类: 电脑/网络 >>程序设计 >>其他编程语言

问题描述:

已知文件路径 As String

需要设置为隐藏+系统属性，最好通过API完成 如果能通过Attrib也可以。

解析:

你可以通过 Scripting.FileSystemObject 对象来设置指定文件的属性，它的 File 对象有一个 Attributes 可以由我们修改，测试代码及说明如下：

Private Sub Command1_Click()

Dim oFileSystem As Object

Dim oFile As Object

' 创建FSO对象

Set oFileSystem = CreateObject("Scripting.FileSystemObject")

' 获取你想要改属性的文件

Set oFile = oFileSystem.GetFile("文件名")

' Normal 0 一般文件。未设置属性。

' ReadOnly 1 只读文件。属性为读/写。

' Hidden 2 隐藏文件。属性为读/写。

' System 4 系统文件。属性为读/写。

' 设置属性（以上列出了所有可更改的属性值）

' 将文件改为：只读+隐藏+系统

oFile.Attributes = 1 + 2 + 4

' 释放对象

Set oFile = Nothing

Set oFileSystem = Nothing

End Sub

---