有3种方法：
在大庆等地区，都构建了全面的区域性战略布局，加强发展的系统性、市场前瞻性、产品创新能力，以专注、极致的服务理念，为客户提供做网站、网站制作 网站设计制作按需制作,公司网站建设,企业网站建设,品牌网站设计,网络营销推广,成都外贸网站制作,大庆网站建设费用合理。
1. 用.NET自己的封装工具封装（不太好用）
2. 网上找InstallShield封装软件（破解的不好找，也不太好用）
3. 最简单的，网上搜SetupFactory 8， 非常好用，我就用他
你得意思是生成一个EXE文件吧？程序运行以后在bin\debug目录下面
''' summary
''' 封装后的方法
''' /summary
''' param name="str"传入参数/param
''' returns/returns
Public Function z(ByVal str As String)
Dim zz As String = Nothing
Dim reg As New Regex("Found valid key:\[ffffffffffff\][\d\D]*?--sector:\s*(\d+)")
Dim m As Match = reg.Match(str)
If m.Success Then
zz = m.Groups(1).ToString
End If
Return zz
End Function
''调用示例
Dim zz As String = z(Form1.prompt.Text)
