㈠ VS6.0中怎么打开.vbp或.frm的VB编程文件
改名是不可以的。
VBP是VB的返前工程文件，双击可以打开。
FRM是窗体文件，一般是在VB中打开的。
如果打不开，应该检查VB安装的正确与否。不行可以修复安装一次。
----------------- 第二次答复的分漏姿清割线 ----------------------------
我没看到你的问题中提到VS2010啊？VB6就是VS6.0的组件之一。
.net 环境在册咐打开VB6的工程时，会问你是否要转化升级。
让它自动转化就行。最后生成的代码中凡是无法直接替换的部分都会有注释标出来。
㈡ vs2010中引用了一个vb写的dll，过两天再编译的时候就报错了，这个怎么解决
这种情况不是没添加DLL到引用，就是没引用命名空间。
㈢ 怎么运行VB源代码
首先你要有VB 这个软件,注意你还的注意版本的问题,是否与你现有的源代码是否一致,一般来讲VB6.0的大多数.
然后打开你的VB程序,点击文件--打开工程--选择你保存源程序的代码的文件夹,选择工程文件(VBP\VBG文件) ,确定.
现在可以先按F5来试运行,没问题,点击文件---生成XXXXX.EXE --一路下去就OK啦!
㈣ VB6.0的工程如何转换到VS2010下使用
不可能转换 只有自己重握链新编写。但是如果同时安装了VB6.0和2005，可以用晌亮2005中的升级向导对VB6.0的工程进行升级。重新编写时会宴皮宽省事一些。我不知2010中是否有升级向导。
㈤ vscode运行vb本地代码步骤
vscode运行代码的方法：
1.打开一个脚本文件，然后打开命令面板，点击“在活动终端中运行活动文件”即可；
2.选中编辑器中的某段代码，然后打开命令面板，运行“在活动终端中运行所选文本”即可。
3.后续调试工作。
调试方式一般有两种
第一种：可以直接编辑你要输入的代码，然后点击“文件”进行“保存”。在你所保存的地方可以看到下图，这个保存的是一个纯文本，直接打开（如用浏览器）可以看到自己所编译的代码语句。从上图的右下角可以看到纯文本三个字。然后对此文件夹修改扩展名，例如html和JS，一般生成html，则扩展名为html，就可以看到此文件自动变成了网页文件，用浏览器打开可以看到不再是之前的代码，而是运行的结果。在VS Code 中修改语句进行保存，再刷新网页则出来新的结果。
第二种：点击右下角的纯文本，顶部则会出现语言让你选择，选择之后进行编译你的代码，然后保存。再用浏览器打开你所保存的文件，则出现运行结果。修改代码，保存后对网页进行刷新，则出现修改后的结果。
㈥ VB程序源码如何使用
需要安装vb6.0开发软件
如果安装了，就可以直接打开源码测试了，后缀名是vbp，（就是vb的工程文件）
如果没有安装vb6.0，还想打开源码看程序，那就右击 用记事本 打开后缀名为frm的文件，他是vb的窗口文件，源码都在他里面
一般得源码是没有生成exe可执行文件的，那样文件太多，太大，浪费空间
如果你自己想生成exe可执行文件，那就vb6.0得文件菜单中把文件保存成exe可执行文件就可以了，
㈦ vs2019如何运行嵌入的项目（vb.net）
Private Sub Button1_click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Shell("cmd.exe", AppWinStyle.NormalFocus)
End Sub
㈧ vs2005中 c++怎样调用vb.net生成的dll
1、先引用你的dll（不要说你不知道怎么引用）
2、using你dll的命名空间
3、在代码中声明dll中的类（如：Lyric * l = new Lyric();）
4、接着开始编程
假如你的dll中的Lyric类有GetLyric（FileName）的方法，就直接写上去就可以了（如：String * s = l.GetLyric("C:\\1.lrc");）
如果你是要在C++中编辑这个已经生成的DLL，谈局桥那是腊郑不可能的
我不是含猛很会c++，有无法错误自己改
㈨ 宽带连接源代码（vs2008 的vb）
直接把sEntryName = "宽带陵世连接3" sUsername = "用户名" sPassword = "密码" 比尺悄肢如说~~TEXT1.TEXT=sEntryName 一次类推~~这样不就出来拉~也就可以实现查宽带有能连接宽带~~监听你可以在加上一个运塌API函数来监听~ Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (Destination As Any, Source As Any, ByVal Length As Long) Private Type GUID Data1 As Long Data2 As Integer Data3 As Integer Data4(7) As Byte End Type Private Type RASIPADDR a As Byte b As Byte c As Byte d As Byte End Type Private Type RASENTRY dwSize As Long dwfOptions As Long dwCountryID As Long dwCountryCode As Long szAreaCode(10) As Byte szLocalPhoneNumber(128) As Byte dwAlternateOffset As Long ipaddr As RASIPADDR ipaddrDns As RASIPADDR ipaddrDnsAlt As RASIPADDR ipaddrWins As RASIPADDR ipaddrWinsAlt As RASIPADDR dwFrameSize As Long dwfNetProtocols As Long dwFramingProtocol As Long szScript(259) As Byte szAutodialDll(259) As Byte szAutodialFunc(259) As Byte szDeviceType(16) As Byte szDeviceName(128) As Byte szX25PadType(32) As Byte szX25Address(200) As Byte szX25Facilities(200) As Byte szX25UserData(200) As Byte dwChannels As Long dwReserved1 As Long dwReserved2 As Long dwSubEntries As Long dwDialMode As Long dwDialExtraPercent As Long dwDialExtraSampleSeconds As Long dwHangUpExtraPercent As Long dwHangUpExtraSampleSeconds As Long dwIdleDisconnectSeconds As Long dwType As Long dwEncryptionType As Long dwCustomAuthKey As Long guidId As GUID szCustomDialDll(259) As Byte dwVpnStrategy As Long dwfOptions2 As Long dwfOptions3 As Long szDnsSuffix(255) As Byte dwTcpWindowSize As Long szPrerequisitePbk(259) As Byte szPrerequisiteEntry(256) As Byte dwRedialCount As Long dwRedialPause As Long End Type Private Type RASCREDENTIALS dwSize As Long dwMask As Long szUserName(256) As Byte szPassword(256) As Byte szDomain(15) As Byte End Type Private Declare Function RasSetEntryProperties Lib "rasapi32" Alias "RasSetEntryPropertiesA" (ByVal lpszPhonebook As String, ByVal lpszEntry As String, lpRasEntry As RASENTRY, ByVal dwEntryInfoSize As Long, ByVal lpbDeviceInfo As Long, ByVal dwDeviceInfoSize As Long) As Long Private Declare Function RasSetCredentials Lib "rasapi32" Alias "RasSetCredentialsA" (ByVal lpszPhonebook As String, ByVal lpszEntry As String, lpCredentials As RASCREDENTIALS, ByVal fClearCredentials As Long) As Long Private Sub Form_Load() Dim sEntryName As String, sUsername As String, sPassword As String sEntryName = "宽带连接3" sUsername = "用户名" sPassword = "密码" If Create_PPPoE_Connection(sEntryName, sUsername, sPassword) Then MsgBox "连接建立成功！" Else MsgBox "连接建立失败！" End If End Sub Function Create_PPPoE_Connection(ByVal sEntryName As String, ByVal sUsername As String, ByVal sPassword As String) As Boolean Create_PPPoE_Connection = False Dim re As RASENTRY Dim sDeviceName As String, sDeviceType As String sDeviceName = "WAN 微型端口 (PPPOE)" sDeviceType = "PPPoE" With re .dwSize = LenB(re) .dwCountryCode = 86 .dwCountryID = 86 .dwDialExtraPercent = 75 .dwDialExtraSampleSeconds = 120 .dwDialMode = 1 .dwEncryptionType = 3 .dwfNetProtocols = 4 .dwfOptions = 1024262928 .dwfOptions2 = 367 .dwFramingProtocol = 1 .dwHangUpExtraPercent = 10 .dwHangUpExtraSampleSeconds = 120 .dwRedialCount = 3 .dwRedialPause = 60 .dwType = 5 CopyMemory .szDeviceName(0), ByVal sDeviceName, Len(sDeviceName) CopyMemory .szDeviceType(0), ByVal sDeviceType, Len(sDeviceType) End With Dim rc As RASCREDENTIALS With rc .dwSize = LenB(rc) .dwMask = 11 CopyMemory .szUserName(0), ByVal sUsername, Len(sUsername) CopyMemory .szPassword(0), ByVal sPassword, Len(sPassword) End With Dim rtn As Long If RasSetEntryProperties(vbNullString, sEntryName, re, LenB(re), 0, 0) = 0 Then If RasSetCredentials(vbNullString, sEntryName, rc, 0) = 0 Then Create_PPPoE_Connection = True End If End If End Function
㈩ VS能够调试VB脚本吗
在用Vs2013打开VB6编辑的工程之前，请将所有工程文件备份一下。
以我用使用握碧VS2012的经验来看，打开工程的时候，会自动检段拦举测，并将旧版本的一些语衡历句进行升级，但遇到太复杂的问题时，程序也会无能为力，需要手动修改代码。
另外VB6使用的一些控件在VS中也将不能继续使用，需要自己另辟蹊径。
总之，很麻烦的。