從零開始學VB6

除大學里面學過些C語言基礎以及工作后用Excel時接觸過些vba外，再無其他編程語言學習。為盡量和現在知悉的vba基礎契合，決定找本書系統的學一下vb6.0，按參考書章節記錄下學習中的代碼片段及認識。
參考書：《Visual Basic范例開發大全》

---

第一篇 VB基礎設計

1.1 基礎設計實例

---

ex1. 制作歡迎界面

窗體標題（窗體的caption屬性顯示于此）

標簽控件（label控件，caption屬性將顯示于此）

文本框控件（textbox控件，text屬性將顯示在文本框內）

如果文本框控件設置passwordchar屬性，則輸入的字符會以被設置的字符代替

命令按鈕控件（commandbutton控件，caption屬性顯示為按鈕上的標題）

Tips： 控件的某些屬性可在代碼中讀寫，某些屬性只能在設計界面中設定，代碼中只能讀取，不可變更

Private Sub Command1_Click() '按鈕點擊后退出程序 End End Sub

---

ex2. 字符轉換程序

文本框控件可以通過設置屬性locked=true來禁止用戶在文本框輸入字符；設置backcolor屬性改變背景色

Private Sub Text1_KeyPress(KeyAscii As Integer) Dim cha As String * 1, str As String, lentext2 As Integer lentext2 = Len(Text2.Text) cha = Chr(KeyAscii) str = Text2.Text Select Case chaCase "a" To "z": str = str + UCase(cha)Case "A" To "Z": str = str + LCase(cha)Case vbBack: If lentext2 > 0 Then str = Left(str, Len(str) - 1)Case Else: str = str + "*" End Select Text2.Text = str End Sub Private Sub Command1_Click() Text1.Text = "" Text2.Text = "" End SubPrivate Sub Command2_Click() End End Sub

Tips： 鍵盤按鍵事件發生時會附帶鍵盤碼參數 KeyAscii，可以在事件響應過程中根據該參數判斷是何按鍵被敲擊

拓展：

• 關于ASCII
• 常用的ASCII字符常數（見下表）

常數等于描述

vbCrLf	Chr(13) + Chr(10)	回車符與換行符結合，同vbNewLine
vbCr	Chr(13)	回車符
vbLf	Chr(10)	換行符
vbTab	Chr(9)	Tab字符
vbBack	Chr(8)	退格字符

---

ex3.創建新窗體

Option Explicit Dim x As Form1 Dim y As Object Private Sub Command1_Click() Set x = New Form1 'x-->新建的窗體,y-->nothing x.Visible = True x.Left = Form1.Left + Form1.Width '讓新建窗體放置在form1窗體右側 x.Top = Form1.Top x.Caption = "新建的窗體" Set y = x 'x和y同時引用新建窗體 Set x = Form1 'x-->初始窗體，y-->新建窗體 x.Caption = "初始窗體" x.Visible = True Set Form1 = y '此時form1引用新建窗體,x-->初始窗體，y-->新建窗體'在下一次點擊任意窗體上的命令按鈕時，新窗體將會出現在'最后一次新建的窗體右側，而不是最初始窗體的右側 Form1.Print "我是新窗體" Set x = Nothing Set y = Nothing End Sub

Tips： 對象變量的賦值與普通變量不同，需用 set語句，在對象變量使用結束后，用 set varName = Nothing來釋放變量對對象的引用，以節省內存開銷

---

ex4.響應窗體或控件事件

---

ex5.用中間變量交換文本

---

ex6.立即窗口的使用

---

1.2 常用屬性實例

---

ex7.Caption屬性的運用

---

ex8.用height、width屬性改變大小

---

ex9.用top、left屬性改變位置

---

ex10.通過Font屬性改變文本外觀

---

ex11.通過enable屬性設置控件有效性

---

總結

以上是生活随笔為你收集整理的从零开始学vb6的全部內容，希望文章能夠幫你解決所遇到的問題。

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