用vb.net編寫程序 修改和界面設(shè)計

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

讓客戶滿意是我們工作的目標(biāo)，不斷超越客戶的期望值來自于我們對這個行業(yè)的熱愛。我們立志把好的技術(shù)通過有效、簡單的方式提供給客戶，將通過不懈努力成為客戶在信息化領(lǐng)域值得信任、有價值的長期合作伙伴，公司提供的服務(wù)項目有：域名申請、網(wǎng)站空間、營銷軟件、網(wǎng)站建設(shè)、輝南網(wǎng)站維護、網(wǎng)站推廣。

Dim?aa?As?Integer?=?Val(TextBox1.Text)

Dim?i?As?Integer

For?i?=?2?To?aa

If?aa?Mod?i?=?0?Then

TextBox2.Text?+=?i.ToString?+?"??"

aa?=?aa?/?i

i?=?2

End?If

Next

End?Sub

Form1_Load(ByVal?sender?As?System.Object,?ByVal?e?As?System.EventArgs)?Handles?MyBase.Load

TextBox1.Text?=?ss()

TextBox2.Text?=?ss()

End?Sub

Function?ss()

Randomize()

Dim?a?As?Integer?=?Int(Rnd()?*?100)

Return?a

End?Function

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

If?Val(TextBox1.Text)?+?Val(TextBox2.Text)?=?Val(TextBox3.Text)?Then

i?+=?1

Label3.Text?=?"正確"

Else

j?+=?1

Label3.Text?=?"錯誤"

End?If

aa?+=?1

End?Sub

Private?Sub?Button2_Click(ByVal?sender?As?System.Object,?ByVal?e?As?System.EventArgs)?Handles?Button2.Click

TextBox1.Text?=?ss()

TextBox2.Text?=?ss()

TextBox3.Text?=?""

Label3.Text?=?""

End?Sub

Private?Sub?Button3_Click(ByVal?sender?As?System.Object,?ByVal?e?As?System.EventArgs)?Handles?Button3.Click

TextBox4.Text?=?"你已經(jīng)答了"?+?aa.ToString?+?"題，答對"?+?i.ToString?+?"題，"?+?"答錯"?+?j.ToString?+?"題。"

End?Sub

VB.NET設(shè)計中窗體大小設(shè)定

從來只有高分辨率下為低分辨率環(huán)境開發(fā)程序的。既然開發(fā)環(huán)境是低分辨率，那就只能利用代碼初始化各個控件的位置和大小了。隨測隨改。

vb.net界面設(shè)計

可以先把外層的目錄新建出來，代碼如下：

Dim path As String

path = "c:\text\text\txt\text1.txt"

System.IO.Directory.CreateDirectory(path.Substring(0, InStrRev(path, "\"))) '建立path這個路徑的所有所需目錄

System.IO.File.WriteAllText(path, "牛年快樂", System.Text.Encoding.Default)

怎樣在vb.net的窗體設(shè)計時，使窗體最大化？

vb.net在窗體設(shè)計時不可以最大化，但可以通過手動調(diào)整Size屬性來模仿最大化，vb.net也沒有像VB6的窗體布局窗口，可以通過更改StartPosition屬性來實現(xiàn)

StartPosition取值范圍：

CenterParent：在父窗口的中心

CenterScreen：在屏幕中心

Manual：Location屬性中定義的坐標(biāo)

WindowsDefaultBounds：Windows默認位置

WindowsDefaultLocation：Windows默認位置，并且包括大小設(shè)置為默認