我想创建一个类构建器,它将从指定的数据库中获取表并构建我的 [className].vb 文件 - 只需按一下按钮!
例如:
Dim strBuilder As New StringBuilder
strBuilder.Append("Public class clsExample" & vbCrLf)
'Create variables
strBuilder.Append("Private _ID As String")
strBuilder.Append(vbCrLf)
'Create properties
strBuilder.Append("Public Property _ID() As Integer" & vbCrLf)
strBuilder.Append("Get" & vbCrLf)
strBuilder.Append("return _ID" & vbCrLf)
strBuilder.Append("end Get" & vbCrLf)
strBuilder.Append("Set(ByVal Value As Integer)" & vbCrLf)
strBuilder.Append("_ID = Value" & vbCrLf)
strBuilder.Append("End Set" & vbCrLf)
strBuilder.Append("End Property " & vbCrLf)
strBuilder.Append(vbCrLf)
strBuilder.Append(vbCrLf & "End Class")
Console.Write(strBuilder.ToString())
在使用前面的代码创建的 clsExample.vb 文件中获得此结果
Public Class clsExample
Private _ID As String
Public Property _ID() As Integer
Get
Return _ID
End Get
Set(ByVal Value As Integer)
_ID = Value
End Set
End Property
End Class
我不确定如何告诉程序创建 [className].vb 文件并将我的 strBuilder 作为代码包含在文件中。希望这是有道理的...