16,552
社区成员
发帖
与我相关
我的任务
分享vb.net的自定义组件怎么编译？
组件很简单，是msdn中的例子，代码如下，错误提示：在“StringComponent”中未找到“Sub Main”。可是代码中没有sub main 啊。
应该怎么编译成dll ？ 谢谢，我真的没分了。
Option Explicit On
Option Strict On
Imports System
Namespace CompVB
Public Class StringComponent
Private StringSet(3) As String
Public Sub New()
MyBase.New()
StringSet(0) = "Visual Basic String 0"
StringSet(1) = "Visual Basic String 1"
StringSet(2) = "Visual Basic String 2"
StringSet(3) = "Visual Basic String 3"
End Sub
Public Function GetString(ByVal index As Integer) As String
If ((index < 0) Or (index >= Count)) Then
Throw New IndexOutOfRangeException
End If
GetString = StringSet(index)
End Function
ReadOnly Property Count() As Long
Get
Count = StringSet.Length
End Get
End Property
End Class
End Namespace
应该怎么编译成dll ？ 谢谢，我真的没分了。
Option Explicit On
Option Strict On
Imports System
Namespace CompVB
Public Class StringComponent
Private StringSet(3) As String
Public Sub New()
MyBase.New()
StringSet(0) = "Visual Basic String 0"
StringSet(1) = "Visual Basic String 1"
StringSet(2) = "Visual Basic String 2"
StringSet(3) = "Visual Basic String 3"
End Sub
Public Function GetString(ByVal index As Integer) As String
If ((index < 0) Or (index >= Count)) Then
Throw New IndexOutOfRangeException
End If
GetString = StringSet(index)
End Function
ReadOnly Property Count() As Long
Get
Count = StringSet.Length
End Get
End Property
End Class
End Namespace
...全文
请发表友善的回复…
发表回复
joyozz 2003-08-31
- 打赏
- 举报
继续关注
yxyy17 2003-08-30
- 打赏
- 举报
楼上的，你的方法应该是对的。
我试了，可是说找不到CompVB.vb 这个文件。
我应该把它放到哪里？
我试了，可是说找不到CompVB.vb 这个文件。
我应该把它放到哪里？
benlee 2003-08-30
- 打赏
- 举报
用vbc直接编译！
打vbc.exe /?可以看参数
打vbc.exe /?可以看参数
yxyy17 2003-08-30
- 打赏
- 举报
代码中没有sub main 啊
yxyy17 2003-08-30
- 打赏
- 举报
请问，把谁设为启动项？
fishermen 2003-08-29
- 打赏
- 举报
如果不行我再给你一个方法
fishermen 2003-08-29
- 打赏
- 举报
你把它设为启动项目试试
