vb 改vb.net

使用.net的升級(jí)向?qū)?雖然不能完全升級(jí)但大部分代碼都升級(jí)了,再做略微修改

站在用戶的角度思考問題，與客戶深入溝通，找到大同網(wǎng)站設(shè)計(jì)與大同網(wǎng)站推廣的解決方案，憑借多年的經(jīng)驗(yàn)，讓設(shè)計(jì)與互聯(lián)網(wǎng)技術(shù)結(jié)合，創(chuàng)造個(gè)性化、用戶體驗(yàn)好的作品，建站類型包括：網(wǎng)站制作、網(wǎng)站設(shè)計(jì)、企業(yè)官網(wǎng)、英文網(wǎng)站、手機(jī)端網(wǎng)站、網(wǎng)站推廣、空間域名、虛擬空間、企業(yè)郵箱。業(yè)務(wù)覆蓋大同地區(qū)。

從VB轉(zhuǎn)到VB.net的問題

那個(gè)號(hào)回答的問題怎么總是顯示不出來？

換朋友的號(hào)給你回答。

Dim FileName As String = InputBox("輸入文件位置")

Dim yw As String = Nothing

yw = My.Computer.FileSystem.ReadAllText(FileName)

Dim n As Long = Len(yw)

Dim yz As String = Nothing

Dim xz As String = Nothing

Dim xw As String = Nothing

For i = 1 To n

yz = Mid(yw, i, 1)

xz = Chr(Asc(yz) + 10)

xw = xz

Next

My.Computer.FileSystem.WriteAllText(FileName, xw, True)

MsgBox("OK")

代碼倒數(shù)第二行的最后一個(gè)Boolean變量是設(shè)置文件輸出是否為追加模式的，根據(jù)你自己的需要做修改吧。因?yàn)槲乙呀?jīng)不記得VB里的默認(rèn)輸出是追加還是覆蓋了。

希望能夠滿意~

vb6文件可以轉(zhuǎn)成vb.net的嗎？怎么轉(zhuǎn)

能不能轉(zhuǎn)換 主要取決于vb6的源程序是不是使用了第三方控件 如果用了 那這些全部都不能轉(zhuǎn)！~

如果vb6里面有控件數(shù)組vb.net會(huì)自動(dòng)生成出一套東西（vb.net里面已經(jīng)沒有控件數(shù)組）模擬控件數(shù)組

如果vb6的程序很簡(jiǎn)單的話，轉(zhuǎn)成.net之后應(yīng)該改的地方不大！~

絕對(duì)你應(yīng)該先弄清楚以前vb6的程序具體用了什么 然后去微軟查一下vb6升級(jí)到vb.net最大的區(qū)別！~

我們做過好幾個(gè)升級(jí)的程序 有的不用改 有的簡(jiǎn)單修改 有的基本重寫！~

vb的回調(diào)函數(shù)轉(zhuǎn)為vb.NET

先聲明一個(gè)委托：

Public Delegate Function EnumChildProc(hwnd As Integer, iParam As Integer) As Integer

然后才能使用回調(diào)函數(shù)，回調(diào)函數(shù)的參數(shù)要和委托完全一致。

然后那個(gè) API 函數(shù)需要這樣聲明：

Declare Function EnumChildWindows Lib "user32" (hWndParent As Integer, lpEnumFunc As EnumChildProc, lParam As Integer) As Integer