疑難解答

• VB.NET入門——Visual Studio使用問題的解答
• VB.NET基本語法常見問題的解答
• VB.NET異常處理與調試常見問題的解答
• VB.NET窗體與控件問題的解答
• VB.NET面向對象技術問題的解答
• VB.NET文件問題的解答
• VB.NET數據庫技術問題的解答

學習筆記

• VB.NET基本數據類型

測試題

• 測驗1

小練習

• VB.NET字符串數組排序
• VB.NET窗體方法示例
• VB.NET星座判斷程序實例

Private Sub Form4_Load(sender As Object, e As EventArgs) Handles MyBase.LoadDim month(11) As ObjectDim day(30) As ObjectFor i = 0 To 30If i < 12 Thenmonth(i) = i + 1End Ifday(i) = i + 1NextComboBox1.Items.AddRange(month)ComboBox2.Items.AddRange(day)End SubPrivate Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.ClickDim a As IntegerDim b As Integera = ComboBox1.SelectedItemb = ComboBox2.SelectedItemIf a = 1 ThenIf b > 0 & b <= 20 ThenLabel1.Text = "魔蝎"ElseLabel1.Text = "水瓶"End IfEnd IfIf a = 2 ThenIf b > 0 & b <= 19 ThenLabel1.Text = "水瓶"ElseLabel1.Text = "雙魚"End IfEnd IfIf a = 3 ThenIf b > 0 & b <= 20 ThenLabel1.Text = "雙魚"ElseLabel1.Text = "白羊"End IfEnd IfIf a = 4 ThenIf b > 0 & b <= 20 ThenLabel1.Text = "白羊"ElseLabel1.Text = "金牛"End IfEnd IfIf a = 5 ThenIf b > 0 & b <= 21 ThenLabel1.Text = "金牛"ElseLabel1.Text = "雙子"End IfEnd IfIf a = 6 ThenIf b > 0 & b <= 21 ThenLabel1.Text = "雙子"ElseLabel1.Text = "巨蟹"End IfEnd IfIf a = 7 ThenIf b > 0 & b <= 22 ThenLabel1.Text = "魔蝎"ElseLabel1.Text = "水瓶"End IfEnd IfIf a = 8 ThenIf b > 0 & b <= 23 ThenLabel1.Text = "獅子"ElseLabel1.Text = "處女"End IfEnd IfIf a = 9 ThenIf b > 0 & b <= 23 ThenLabel1.Text = "處女"ElseLabel1.Text = "天秤"End IfEnd IfIf a = 10 ThenIf b > 0 & b <= 23 ThenLabel1.Text = "天秤"ElseLabel1.Text = "天蝎"End IfEnd IfIf a = 11 ThenIf b > 0 & b <= 23 ThenLabel1.Text = "天蝎"ElseLabel1.Text = "射手"End IfEnd IfIf a = 12 ThenIf b > 0 & b <= 23 ThenLabel1.Text = "射手"ElseLabel1.Text = "水瓶"End IfEnd IfEnd Sub

慕課

• TONGJI -《VisualBasic.NET程序設計入門》
• TONGJI -《VisualBasic.NET程序設計進階》

實驗

• VB.NET控件綜合運用
• VB.NET編寫個人信息管理系統

復習資料

• .NET復習總結

總結

以上是生活随笔為你收集整理的【VB.NET】VB.NET程序设计学习指南的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。