㈠ 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中也將不能繼續使用，需要自己另闢蹊徑。
總之，很麻煩的。