第一章、VB6變量與聲明

日期：2021年04月22日

作者：Commas

注釋：網絡上沒有一個比較系統的VB6或者VBA的教程，于是打算利用中午休息的時間寫一寫這方面的教程，不喜歡寫得很文绉绉，一切都以常用為前提進行介紹。因為要覆寫更多讀者，是以本系列文章有些地方可能會介紹比較地通俗易懂，當然也會包含一些比較有意思的知識點，不喜勿噴，有問題敬請指出，有疑惑歡迎留言，大家一起讨論，共同進步，謝謝大家(^ _ ^) (^ _ ^)

目錄

文章目錄

• 一、内置資料類型的介紹
• 二、關鍵字之修飾符介紹
• 三、内置資料類型的聲明
• 四、自定義資料類型的定義與聲明

一、内置資料類型的介紹

類型	類别	常用級别	說明
String	字元串	♥♥♥♥♥	預設是 定長字元串 ，當字元超過2^16個時，變為 變長字元串 ，屆時字元拼接效率會變得非常低
Integer	數值（整型）	♥♥♥♥♥	2^16（2個位元組）， 範圍：-32,768 到 32,767
Long	數值（長整型）	♥♥♥♥♥	2^32（4個位元組）， 範圍： -2,147,483,648 到 2,147,483,647
Single	數值（單精度浮點）	♥♥♥♥♥	IEEE 32 位（4 個位元組）浮點數值的形式，單精度浮點數， 負數範圍是從 -3.402823E38 到 -1.401298E-45，正數從1.401298E-45 到 3.402823E38，和 0 。
Double	數值（雙精度浮點）	♥♥♥♥♥	IEEE 64 位（8 個位元組）浮點數值的形式，雙精度浮點數， 負數範圍是從 -1.79769313486232E308 到 -4.94065645841247E-324，正數從 4.94065645841247E-324 到 1.79769313486232E308，和 0 。
Boolean	布爾型	♥♥♥♥♥	16 位（2 個位元組）的數值形式，但隻能是 True 或是 False
Currency	貨币	♥♥	範圍： -922,337,203,685,477.5808 到 922,337,203,685,477.5807
Date	日期	♥♥♥	IEEE 64 位（8 個位元組）浮點數值形式，其可以表示的 日期範圍從 100 年 1 月 1 日到 9999 年 12 月 31 日 ，而 時間可以從 0:00:00 到 23:59:59 。
Object	對象	♥♥♥♥♥	存儲為 32 位（4 個位元組）的位址形式，其為對象的引用。利用 Set 語句，聲明為 Object 的變量可以指派為任何對象的引用。
Variant	變體	♥♥♥	是一種特殊的資料類型，除了定長 String 資料及使用者定義類型外，可以包含任何種類的資料。Variant 也可以包含 Empty、Error、Nothing 及 Null等特殊值。可以用 VarType 函數或 TypeName 函數來決定如何處理 Variant 中的資料。

字元串有兩種：變長與定長的字元串。

①

變長字元串

最多可包含大約 20 億 ( 2^31)個字元。

②

定長字元串

可包含 1 到大約 64K ( 2^16 ) 個字元。

想要了解更多字元串知識，可以翻閱以前寫的一篇文章《淺談VB6字元串拼接效率》

二、關鍵字之修飾符介紹

聲明變量的時候，我們需要使用到修飾符關鍵字，主要是修飾定義變量的作用域，詳細如下表所示：

修飾符	說明
Public	聲明變量并配置設定存儲空間，用于 子產品級别 ，整個工程内全局變量，其它子產品也可以通路到
Private	聲明變量并配置設定存儲空間，用于 子產品級别 ，本部子產品内全局變量，僅限本子產品通路
Dim	聲明變量并配置設定存儲空間，作用域視情況而定，常用于 過程級别 中的變量聲明
Static	在過程級别中使用，用于聲明變量并配置設定存儲空間。在整個代碼運作期間都能保留使用 Static 語句聲明的變量的值。

一、

過程級别

與

子產品級别

的定義：

過程級别

：描述 Function、Property、或 Sub 過程中的語句。通常先列舉聲明，其次是指派和其它可執行的代碼。

子產品級别

：代碼駐留在過程塊之外，有過程級别相對；

二、Dim在不同級别中聲明，作用域不同，如下：

在

子產品級别

中用 Dim 聲明的變量，對該子產品中的所有過程都是可用的。

在

過程級别

中聲明的變量，隻在過程内是可用的。

由此可得，Dim一般用于

過程級别

中的變量聲明，

而在

子產品級别

中，我們一般用Public\Private關鍵字

三、内置資料類型的聲明

變量聲明文法：

修飾符關鍵字 變量名稱 As 變量類型

[Public\Praivete\Dim\Static] varName As varType

Option Explicit

'【子產品級别】：聲明變量
Private gIsDebug As Boolean
Public gOpener As Object

Private Sub Form_Load()
On Error Resume Next
    '【過程級别】：聲明變量
    Dim intX As Integer, intY As Integer
    Dim lngRow As Long, lngCol As Long
    Dim sUserName As String
    
    '變量指派
    intX = 1
    intY = 2
    lngRow = 100
    lngCol = 3
    sUserName = "張三"
End Sub
           

四、自定義資料類型的定義與聲明

自定義資料類型，并不是多麼高深的操作，實際上就是将現有的資料類型，進行一定的排列組合而已，文法如下：

'變量聲明文法：
[Public\Praivete] Type 自定義變量類型名稱
    類型定義過程
End Type
           

自定義資料類型定義與聲明示例如下：

Option Explicit

'自定義資料類型，如：二維坐标（X,Y）
Private Type tPosition
    X As Single
    Y As Single
End Type

Private Sub Form_Load()
On Error Resume Next
    '1）聲明
    Dim p1 As tPosition, p2 As tPosition
    
    '2）指派
    '(0,0)
    p1.X = 0
    p1.Y = 0
    
    '(9,5)
    p2.X = 9
    p2.Y = 5
End Sub

           

版權聲明：本文為部落客原創文章，如需轉載，請給出：

原文連結：https://blog.csdn.net/qq_35844043/article/details/116009499