VB.net lineinput

Dim str As String = LineInput(1)

創(chuàng)新互聯(lián)長(zhǎng)期為千余家客戶提供的網(wǎng)站建設(shè)服務(wù)，團(tuán)隊(duì)從業(yè)經(jīng)驗(yàn)10年，關(guān)注不同地域、不同群體，并針對(duì)不同對(duì)象提供差異化的產(chǎn)品和服務(wù)；打造開(kāi)放共贏平臺(tái)，與合作伙伴共同營(yíng)造健康的互聯(lián)網(wǎng)生態(tài)環(huán)境。為石泉企業(yè)提供專業(yè)的成都網(wǎng)站制作、成都做網(wǎng)站，石泉網(wǎng)站改版等技術(shù)服務(wù)。擁有十載豐富建站經(jīng)驗(yàn)和眾多成功案例,為您定制開(kāi)發(fā)。

改為：

Dim str As String = ""

While Not EOF(1)

str += LineInput(1) vbCrLf

End While

vb.net drawline畫(huà)不出線

Form_load事件運(yùn)行的時(shí)候，窗體里面的控件尚未初始化，以下代碼經(jīng)測(cè)試可行：

Private?Sub?PictureBox1_Paint(ByVal?sender?As?Object,?ByVal?e?As?System.Windows.Forms.PaintEventArgs)?Handles?PictureBox1.Paint

e.Graphics.DrawLine(Pens.Blue,?0,?0,?111,?111)

End?Sub

VB.NET 畫(huà)直線 問(wèn)題 怎樣讓直線置頂(就是不被其它控件覆蓋) 100分(希望詳細(xì)些)如較麻煩，會(huì)追加分?jǐn)?shù)

這個(gè)必須用控件的方法解決，VB6有個(gè)Line控件很容易解決這個(gè)問(wèn)題，但是VB.NET沒(méi)有了，幸好微軟也想到了這個(gè)缺陷，提供免費(fèi)的Visual Basic PowerPacks控件箱，其中有Line控件。

Visual Basic PowerPacks下載地址：

使用 LineShape 控件繪制直線：