VB。NET添加代碼

我想在窗體上加幾個(gè)label用來(lái)提示錯(cuò)誤會(huì)更好！！其中用戶名為label1，密碼為label2，確認(rèn)密碼為label3， 提交為button1，重置為button2，事例：其中名稱為Warehouse的SQL數(shù)據(jù)庫(kù)里面有一張Administrator1表有用戶名和密碼兩個(gè)字段。

創(chuàng)新互聯(lián)是一家集網(wǎng)站建設(shè),陽(yáng)高企業(yè)網(wǎng)站建設(shè),陽(yáng)高品牌網(wǎng)站建設(shè),網(wǎng)站定制,陽(yáng)高網(wǎng)站建設(shè)報(bào)價(jià),網(wǎng)絡(luò)營(yíng)銷,網(wǎng)絡(luò)優(yōu)化,陽(yáng)高網(wǎng)站推廣為一體的創(chuàng)新建站企業(yè)，幫助傳統(tǒng)企業(yè)提升企業(yè)形象加強(qiáng)企業(yè)競(jìng)爭(zhēng)力。可充分滿足這一群體相比中小企業(yè)更為豐富、高端、多元的互聯(lián)網(wǎng)需求。同時(shí)我們時(shí)刻保持專業(yè)、時(shí)尚、前沿，時(shí)刻以成就客戶成長(zhǎng)自我，堅(jiān)持不斷學(xué)習(xí)、思考、沉淀、凈化自己，讓我們?yōu)楦嗟钠髽I(yè)打造出實(shí)用型網(wǎng)站。

'這里是添加的引用

Imports System.Data

Imports System.Data.SqlClient

'提交按鈕

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

If TextBox1.Text =

vb代碼翻譯成vb.net代碼

打開(kāi)VS2005及以上版本，新建一個(gè)VB.NET語(yǔ)言的項(xiàng)目，然后點(diǎn)工具-升級(jí)VB6代碼，把代碼粘貼進(jìn)去即可

請(qǐng)問(wèn)Vb.net編程代碼，不要C語(yǔ)言的，我看不懂啊？

Imports System

Module Program

Sub Main()

Dim n As Integer

n=6

Console.WriteLine("{0}!={1}",n,fact(n))

n=10

For i As Integer=1 To n

Console.Write("{0}{1}",fibo(i),IIF(n=i,vbCrLf,","))

Next

Console.Write("按任意鍵繼續(xù)。。。 ")

Console.ReadKey(True)

End Sub

' 遞歸算階乘

Function fact(n As Long) As Long

If 0=n OrElse 1=n Then Return 1

Return n*fact(n-1)

End Function

' 遞歸算斐波那契數(shù)列

Function fibo(n As Long) As Long

If 1=n OrElse 2=n Then Return 1

Return fibo(n-1)+fibo(n-2)

End Function

End Module

當(dāng)前題目：vb和net代碼 vbnet vb區(qū)別
標(biāo)題URL：http://chinadenli.net/article36/dogcgpg.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供定制網(wǎng)站、網(wǎng)站設(shè)計(jì)、網(wǎng)站改版、移動(dòng)網(wǎng)站建設(shè)、軟件開(kāi)發(fā)、網(wǎng)站策劃

廣告

聲明：本網(wǎng)站發(fā)布的內(nèi)容（圖片、視頻和文字）以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主，如果涉及侵權(quán)請(qǐng)盡快告知，我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng)，如需處理請(qǐng)聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載，或轉(zhuǎn)載時(shí)需注明來(lái)源： 創(chuàng)新互聯(lián)