VB.Net:如何在VB.net中拥有类似java属性文件的属性文件?

时间:2011-07-20 17:14:19

标签: vb.net

我认为我们可以在项目的.vbproj文件中指定或导入我们希望在项目中使用的属性。

这是真的吗?

如果是这样,我将如何在我的VB源代码中使用它们??

我想在属性文件中保留表名,连接字符串等。

任何帮助表示赞赏!!

3 个答案:

答案 0 :(得分:2)

您正在考虑项目设置文件:

您可以在项目属性下创建设置,然后他们可以访问它们

My.Settings.YourSetting = "thing"

答案 1 :(得分:1)

如果你只是想存储字符串,你可以只使用资源文件,并使用Properties.Resources.Whatever检索字符串。

答案 2 :(得分:1)

这个主题很旧,但可能有人会觉得这个答案很有用。当我开始用VB.NET做事时,我非常强烈地错过了java.util.Properties,因此,我创建了一个简单的类来读取与Java非常相似的属性文件(我真的缺少Java:/):

`Imports System.IO

Namespace Util

Public Class Properties

    Private m_Properties As New Hashtable

    Public Sub New()

    End Sub

    Private Sub Add(ByVal key As String, ByVal value As String)
        m_Properties.Add(key, value)
    End Sub

    Public Sub Load(ByRef sr As StreamReader)

        Dim line As String
        Dim key As String
        Dim value As String

        Do While sr.Peek <> -1
            line = sr.ReadLine
            If line = Nothing OrElse line.Length = 0 OrElse line.StartsWith("#") Then
                Continue Do
            End If

            key = line.Split("=")(0)
            value = line.Split("=")(1)

            Add(key, value)

        Loop

    End Sub

    Public Function GetProperty(ByVal key As String)

        Return m_Properties.Item(key)

    End Function

    Public Function GetProperty(ByVal key As String, ByVal defValue As String) As String

        Dim value As String = GetProperty(key)
        If value = Nothing Then
            value = defValue
        End If

        Return value

    End Function

End Class

结束命名空间

`

它的使用方法与java.util.Properties:

相同

Imports Util 'some code Public Shared Sub GetProps(ByVal f As String) Dim props As New Properties() Dim sr As New StreamReader(projFile) props.Load(sr) Dim someProp As String = props.GetProperty("propName") Dim someProp2 As String = props.GetProperty("propName2", "defaultPropValue") sr.Close() End Sub ' some code