vb中有關文件操作的命令

㈠ VB中運行某個文件的命令是什麼

Shell「L:\實況足球8中超風雲版Ver3.0版\實況8注冊表導入工具.exe」
這里你沒寫空格?
Shell 「L:\實況足球8中超風雲版Ver3.0版\實況8注冊表導入工具.exe」

㈡ VB的文件系統控制項的相關語句如何使用，例如：kill,file,等等命令語句的使用。求大神們幫小弟解決一下

首先，VB是事件驅動的，也就是說一切代碼都要在某種事件發生後才能運行的，比如說程序啟動、點擊了某個按鈕、在文本框輸入了某個字元、到達了某個指定的時刻，等等，這些都是事件，而你的程序代碼就在這些事件發生後才運行，而不是無緣無故突然就自己運行了。因此，程序代碼都是放在一個個事件過程中的，比如當你用滑鼠點擊了按鈕Command1就執行刪除文件"d:123456新建文本文檔.txt"的操作，則代碼如下：

PrivateSubCommand1_Click()
Kill"d:123456新建文本文檔.txt"
EndSub

其次，你要刪除的文件必須是真實存在的，也就是說"d:123456新建文本文檔.txt"這裡麵包含的文件夾"d:123456"以及文件"新建文本文檔.txt"都必須是真實存在的！否則的話，刪除一個子虛烏有的文件，肯定就會提示你「路徑/文件訪問錯誤」了。

最後，VB的文件操作命令除了Dir函數，其他的都是不支持通配符「*」的，所以 Kill "d:123456*.txt" 也肯定會出錯了。要想一次性刪除多個文件，可以通過循環結合Dir函數來進行，比如：

PrivateSubCommand1_Click()
DimdAsString
d=Dir("d:123456*.txt")
DoUntild=""
Kill"d:123456"&d
d=Dir
Loop
MsgBox"已刪除d:123456中的全部文本文件！"
EndSub

㈢ 如何用VB創建文件並對它操作。

VB可用Open 語句操作或建立文件。

Open 語句，能夠對文件輸入/輸出 (I/O)。

TypeRecord'定義用戶自定義數據類型。
IDAsInteger
NameAsString*20
EndType

DimMyRecordAsRecord'聲明變數。
Open"TESTFILE"ForRandomAs#1Len=Len(MyRecord)
'若要以其他方式打開文件，必需先關閉此文件。
Close#1

㈣ vb復制文件夾有幾種方法

首先你說的這幾種方法都可以有相應的實現方法，下面一一列舉：1.vb函數實現復制文件夾。首先要指出，vb有6個基本的關於文件或文件夾操作的函數：(1)建立文件夾的函數MkDir;(2)改變當前文件夾ChDir;(3)刪除文件夾RmDir;(4)刪除文件kill;(5)復制文件FileCopy;(6)文件的改名和移動。但卻沒有直接的文件夾整體復制的基本函數。但用以上這些基本的函數卻可以實現文件夾的任何操作:下面以例子來說明：在D盤根目錄下有一個a文件夾,里邊有很多文件，現在把它復制到"D:\aa"中去，aa是D盤中的一個文件夾.實現過程這樣，(1)先在D:\aa中創建一個文件夾名為a，用函數MkDir;(2)然後把依次把D:\a中的文件復制到D:\aa\a中去。程序實現如下:Private Sub Command1_Click()
Dim fname As String
fname = Dir("d:\a\*.*", 7)
MkDir "d:\aa\a"
Do
If fname = "" Then Exit Do
FileCopy "d:\a\" & fname, "d:\aa\a\" & fname
fname = Dir()
Loop
End Sub2.復制文件夾的API函數:SHFileOperation。他可以很方便的實現文件夾的復制，但要配合一個文件類來實現，還是以例子來說明吧:在D盤根目錄下有一個a文件夾,里邊有很多文件，現在把它復制到"D:\bb"中去,程序實現如下:Private Type SHFILEOPSTRUCT '文件類的定義，固定模式，直接拿來使用，不用管具體構成
hwnd As Long
wFunc As Long
pFrom As String
pTo As String
fFlags As Integer
fAnyOperationsAborted As Long
hNameMappings As Long
lpszProgressTitle As String '只有在 FOF_SIMPLEPROGRESS 時用
End Type
Private Declare Function SHFileOperation Lib _
"shell32.dll" Alias "SHFileOperationA" (lpFileOp _
As SHFILEOPSTRUCT) As Long 'api函數SHFileOperation 的聲明
'wFunc 常數
'FO_COPY 把 pFrom 文件拷貝到 pTo。
Const FO_COPY = &H2'fFlag 常數
'FOF_ALLOWUNDO 允許 Undo 。
Const FOF_ALLOWUNDO = &H40
'FOF_NOCONFIRMATION 不顯示系統確認對話框。
Const FOF_NOCONFIRMATION = &H10
'FOF_NOCONFIRMMKDIR 不提示是否新建目錄。
Const FOF_NOCONFIRMMKDIR = &H200
'FOF_SILENT 不顯示進度對話框
Const FOF_SILENT = &H4'以上皆為SHFileOperation 需要的變數的聲明，固定聲明格式直接拿來使用
Private Sub Command2_Click()
Dim SHFileOp As SHFILEOPSTRUCT
SHFileOp.wFunc = FO_COPY
SHFileOp.pFrom = "d:\a"
SHFileOp.pTo = "d:\bb"
SHFileOp.fFlags = FOF_ALLOWUNDO + FOF_NOCONFIRMMKDIR
Call SHFileOperation(SHFileOp)
End Sub3.FSO方法實現文件夾的復制，它的使用與FileCopy類似，但還不一樣，它只能把一個文件夾里邊的文件完全復制到目標文件夾中，但是不能連同此文件夾一塊復制進去，因此用FSO實現復制也需要兩步，(1)先在目標文件夾中創建一個與復制的文件夾同名的文件夾，然後把文件復制進去。現用例子來說明：在D盤根目錄下有一個a文件夾,里邊有很多文件，現在把它復制到"D:\cc"中去,程序實現如下:"工程"--"引用"--"Microsoft Scripting Runtime"Private Sub Command3_Click()
Dim fso As New FileSystemObject
Dim fldr As Folder
MkDir "D:/cc/a"
fso.CopyFolder "D:/a", "D:/cc/a", True
End Sub好了三種實現方法都能做到復制文件夾，另外再給你提供一種方法，就是用dos命令，利用vb里邊的函數shell來調用cmd.exe執行dos命令，有時候shell也是很不錯的選擇。具體例子如下：Private Sub Command4_Click()Shell "cmd.exe /c x " + Chr(34) + "D:\dd D:\a /q /e" + Chr(34)
end sub好了，關於文件夾復制的方法你可以根據自己的習慣選擇一種來實現你的程序。

㈤ VB中新建文件夾的命令

shell
"cmd
/c
md
c:\1\2\3\4\5\6\7\8\9\",vbhide
可以新建多級目錄。
里邊的c:\1\2\3\4\5\6\7\8\9\改成你要新建的文件夾路徑。

㈥ vb 文本文件操作

1、把文本文件內容寫到TextBox：
Dim TempFile As Long
Dim LoadBytes() As Byte

TempFile=FreeFile
Open 文件名 For Binary As #TempFile
Redim LoadBytes(1 To Lof(TempFile)) As Byte
Get #TempFile,,LoadBytes
Close TempFile

Text1.Text=StrConv(LoadBytes,vbUniCode)

2、把TextBox內容寫入文本文件：
Dim TempFile As Long
Dim SaveBytes() As Byte

SaveBytes=StrConv(Text1.Text,vbFromUniCode)

TempFile=FreeFile
Open 文件名 For Binary As #TempFile
Put #TempFile,,SaveBytes
Close TempFile

3、刪除TXT文件里的內容：
Private Function DelLine(strFile As String, RLine As Long, newFile As String, SameLine As Boolean)
Dim s As String, n As String, i As Long
i = 1

'//打開源文件
Open strFile For Input As #1
Do Until EOF(1)
Line Input #1, s
If RLine = i Then '如果是指定的行數就進行下面的操作

If SameLine = True Then '是否保持源文件行數不變(以空白字元替換這一行內容)的提示,True保持源文件的行數,False為直接刪除這一行的內容
s = ""
n = n & s & vbCrLf '將空字元串賦給變數n,以保持源文件的行數
' MsgBox strFile & " 文件中,第 " & RLine & " 行內容" & vbCrLf & s & vbCrLf & "已經刪除", vbInformation, "消息提示"
End If
' s="也可以把這一行的內容改成自己需要的"

Else '如果不是指定的行數,就將s的內容賦給變數n 以存儲數據
n = n & s & vbCrLf '將s的內容賦給n 並以一個回車符號結束....
End If
i = i + 1
Loop
Close #1

'//寫入新文件,如果和源文件同名則會覆蓋源文件
Open newFile For Output As #2
Print #2, n '將n變數里的數據寫入新文件
Close #2

End Function

'調用方法:
'比如要把c:\1.txt 刪除其中的第5行內容,並保留源文件總行數(刪除的這行插入一空字元串)
'DelLine "C:\1.txt", 5, "C:\2.txt", True
'刪除C:\1.txt 刪除裡面的第一行,且不保留文件的總行數
DelLine "C:\1.txt", 1, "C:\1.txt", False

㈦ vb怎樣進行文件操作 代碼

Private Sub Command1_Click()
'創建並寫入TXT文件
Open "D:/1.txt" For Append As #1
Print #1, "Hello Wolrd!"
Close #1
'打開並讀取數據
Open "D:/1.txt" For Input As #1
Dim a As String
Line Input #1, a
MsgBox "這個文件中儲存的數據是:" & vbCrLf & " " & a, 48, "提示"
Close #1
End Sub

㈧ 求vb所有基本文本操作命令

vb對文件操作功能很強大的，不過總結來說可以簡單用也可以復雜用。第一段代碼就是一個寫文件的例子。後面的都是對文本文件添加和讀取的方法，耐心試驗一下就會用了。

Print # 語句示例
本示例使用 Print # 語句將數據寫入一個文件。

Open "TESTFILE" For Output As #1 ' 打開輸出文件。
Print #1, "This is a test" ' 將文本數據寫入文件。
Print #1, ' 將空白行寫入文件。
Print #1, "Zone 1"； Tab ； "Zone 2" ' 數據寫入兩個區（print zones）。
Print #1, "Hello" ； " " ； "World" ' 以空格隔開兩個字元串。
Print #1, Spc(5) ； "5 leading spaces " ' 在字元串之前寫入五個空格。
Print #1, Tab(10) ； "Hello" ' 將數據寫在第十列。

' 賦值 Boolean、Date、Null 及 Error 等。
Dim MyBool, MyDate, MyNull, MyError
MyBool = False : MyDate = #February 12, 1969# : MyNull = Null
MyError = CVErr(32767)
' True、False、Null 及 Error 會根據系統的地區設置自動轉換格式。
' 日期將以標準的短式日期的格式顯示。
Print #1, MyBool ； " is a Boolean value"
Print #1, MyDate ； " is a date"
Print #1, MyNull ； " is a null value"
Print #1, MyError ； " is an error value"
Close #1 ' 關閉文件。

使用順序文件訪問

推薦您使用 File System Objects 來創建文本文件，但該信息只在需要使用舊文本文件創建方法時才提供。

當要處理只包含文本的文件時，比如由典型文本編輯器所創 建的文件－也就是說，其中的數據沒有分成記錄的文件，使用順序型訪問最好。順序型訪問不太適於存儲很多數字，因為每個數字都要按字元串存儲。一個四位數將需要 4 個位元組的存儲空間，而不是作為一個整數來存儲時只需的 2 個位元組。

打開順序訪問文件
當以順序型訪問打開一個文件時，可執行以下操作：

從文件輸入字元 (Input)

向文件輸出字元 (Output)

把字元加到文件 (Append)
要順序型訪問打開一個文件，Open 語句使用以下語法：

Open pathname For [Input | Output | Append] As filenumber [Len = buffersize]

當打開順序文件作為 Input 時，該文件必須已經存在，否則，會產生一個錯誤。然而，當打開一個不存在的文件作為 Output 或 Append 時，Open 語句首先創建該文件，然後再打開它。

當在文件與程序之間拷貝數據時，選項 Len 參數指定緩沖區的字元數。

在打開一個文件 Input、Output 或 Append 以後，在為其它類型的操作重新打開它之前必須先使用 Close 語句關閉它。

編輯為順序訪問打開的文件
如果要編輯一個文件，先把它的內容讀入到程序變數，然後改變這些變數，最後再把這些變數寫回到該文件。以下各節討論如何編輯以順序型訪問打開的各記錄。

從文件中讀取字元串
要檢索文本文件的內容，應以順序 Input 方式打開該文件。然後使用 Line Input#，Input( )，或者 Input# 語句將文件拷貝到程序變數中。

Visual Basic 提供了一次讀寫順序文件一個字元或一行的語句和功能。

例如，以下代碼段逐行讀取一個文件：

Dim LinesFromFile, NextLine As String

Do Until EOF(FileNum)
Line Input #FileNum, NextLine
LinesFromFile = LinesFromFile + NextLine + Chr(13) + Chr(10)
Loop

盡管 Line Input # 到達回車換行時它會識別行尾，但是，當它把該行讀入變數時，不包括回車換行。如果要保留該回車換行，代碼必須添加。

也可以使用 Input # 語句，它讀取文件中所寫的一列的數字和/或字元串表達式。例如，要從一個郵件列表文件中讀取一行，可使用以下語句：

Input #FileNum, name, street, city, state, zip

可以使用 Input 函數來從文件向變數拷貝任意數量的字元，所給的變數大小應足夠大。例如，以下的代碼使用 Input 把指定數目的字元復制到變數。

LinesFromFile = Input(n, FileNum)

要將整個文件復制到變數，請使用 InputB 函數將位元組從文件復制到變數。因為InputB 函數返回一個 ANSI 字元串，您必須使用 StrConv 函數將 ANSI 字元串轉換為一個如下的 UNICODE 字元串：

LinesFromFile = StrConv(InputB(LOF(FileNum), FileNum), vbUnicode)
把字元串寫入文件
要在順序文件中存儲變數的內容，應以順序 Output 或 Append 打開它，然後使用 Print # 語句。例如，文本編輯器可以使用以下代碼行來把一個文本框的內容拷貝到文件。

Print #FileNum, TheBox.Text

Visual Basic 也支持 Write # 語句，它把一列數字和/或字元串表達式寫入文件。它自動地用逗號分開每個表達式，並且在字元串表達式端放置引號。

Dim AnyString As String, AnyNumber As Integer

AnyString = "AnyCharacters"
AnyNumber = 23445
Write #FileNum AnyString, AnyNumber

這個代碼段把兩個表達式寫入由 FileNum 指定的文件。第一個表達式包含一個字元串而第二個包含數字 23445。因而，Visual Basic 把以下的字元（包括所有標點符號）寫入到文件中：

"AnyCharacters",23445

注意 如果正在用順序型訪問的 Write # 與 Input # 語句，可考慮換用隨機型 或二進制型訪問，因為它們更適合面向於記錄的數據。

詳細信息 有關順序文件訪問的其它信息，請參閱「Open 語句」。

Open 語句示例
本示例示範 Open 語句的不同用法來做到文件的輸出與輸入。

下列代碼以順序輸入模式打開 TESTFILE 文件。

Open "TESTFILE" For Input As #1
' 若要以其他方式打開文件，必需先關閉此文件。
Close #1

下列代碼以只允許寫操作的二進制方式打開文件。

Open "TESTFILE" For Binary Access Write As #1
' 若要以其他方式打開文件，必需先關閉此文件。
Close #1

下列代碼以隨機方式打開文件，文件中含有用戶自定義數據類型 Record 的記錄。

Type Record ' 定義用戶自定義數據類型。
ID As Integer
Name As String * 20
End Type

Dim MyRecord As Record ' 聲明變數。
Open "TESTFILE" For Random As #1 Len = Len(MyRecord)
' 若要以其他方式打開文件，必需先關閉此文件。
Close #1

下列代碼以順序輸出方式打開文件；任何過程都可以讀寫該文件。

Open "TESTFILE" For Output Shared As #1
' 若要以其他方式打開文件，必需先關閉此文件。
Close #1

下列代碼以只允許讀的二進制方式打開文件；其他過程不可以讀該文件。

Open "TESTFILE" For Binary Access Read Lock Read As #1

能夠對文件輸入/輸出 (I/O)。

語法

Open pathname For mode [Access access] [lock] As [#]filenumber [Len=reclength]

Open 語句的語法具有以下幾個部分：

部分 描述
pathname 必要。字元串表達式，指定文件名，該文件名可能還包括目錄、文件夾及驅動器。
mode 必要。關鍵字，指定文件方式，有 Append、Binary、Input、Output、或 Random 方式。如果未指定方式，則以 Random 訪問方式打開文件。
access 可選。關鍵字，說明打開的文件可以進行的操作，有 Read、Write、或 Read Write 操作。
lock 可選。關鍵字，說明限定於其它進程打開的文件的操作，有 Shared、Lock Read、Lock Write、和 Lock Read Write 操作。
filenumber 必要。一個有效的文件號，范圍在 1 到 511 之間。使用 FreeFile 函數可得到下一個可用的文件號。
reclength 可選。小於或等於 32，767（位元組）的一個數。對於用隨機訪問方式打開的文件，該值就是記錄長度。對於順序文件，該值就是緩沖字元數。

說明

對文件做任何 I/O 操作之前都必須先打開文件。Open 語句分配一個緩沖區供文件進行 I/O 之用，並決定緩沖區所使用的訪問方式。

如果 pathname 指定的文件不存在，那麼，在用 Append、Binary、Output、或 Random 方式打開文件時，可以建立這一文件。

如果文件已由其它進程打開，而且不允許指定的訪問類型，則 Open 操作失敗，而且會有錯誤發生。

如果 mode 是 Binary 方式，則 Len 子句會被忽略掉。

重要 在 Binary、Input 和 Random 方式下可以用不同的文件號打開同一文件，而不必先將該文件關閉。在 Append 和 Output 方式下，如果要用不同的文件號打開同一文件，則必須在打開文件之前先關閉該文件。

㈨ 請問vb里有沒有類似於vc中fread等文本操作命令呢，我想用vb讀取二進制文件

單擊菜單「外接程序」「外接程序管理器...」,選擇「VB
6
資源編輯器」,選中窗口右下部分「載入行為」的「載入/卸載」的復選框,單擊「確定」
(如果找不到「VB
6
資源編輯器」,那麼你的VB軟體可能沒這個功能,最好換一個VB軟體試試)
單擊工具欄上的"VB資源編輯器"按鈕(由一堆綠色方塊組成的那個圖標),這時打開"VB資源編輯器"窗口
單擊"添加自定義資源..."按鈕(從右邊數第二個),選擇a.exe,打開
單擊"保存"按鈕,保存文件後(假設保存為"工程1.RES"),就可以關閉"VB資源編輯器"窗口了,這時工程資源管理器中有一個"相關文檔",展開後就能看到"工程1.RES"
在Form_Load()中添加以下代碼
Dim
arr()
As
Byte
arr
=
LoadResData(101,
"CUSTOM")
Open
App.Path
&
"\a.exe"
For
Binary
As
#1
Put
#1,
,
arr
Close
#1
生成程序c.exe,運行後就在c.exe所在的文件夾中產生文件a.exe
直接運行(不生成exe)也可以產生文件a.exe

㈩ 誰有VB命令大全

命令 Call：調用事件處理器 Close關閉用Open命令所打開文件的輸入輸出。格式：Close #文件號1, #文件號2……。若無文件號，則關閉打開的所有活動文件。 Const：聲明常量,格式:Const常量名[As類型] =常量值 DoEvents：讓應用程序提供少量時間處理等待的任務，然後控制權立即返回應用程序。 Dim聲明變數，格式：Dim變數名As變數類型 Exit sub：中途退出子程序 End：結束程序 Global：聲明全局變數 Load：裝入窗體 MsgBox消息內容：將結果顯示在消息框中 Open打開或保存文件。格式：Open文件全名For模式As #文件號[Len =文件長度]其中，模式有：Append、Binary、Input、Output、Random(預設)；文件號在1到511之間，可用FreeFile函數取得；文件長度在1到32767之間。例：Open CommonDialog1.FileName For Output As #1 Option Base 1：放在聲明部分,強制數組從1開始索引,(如果不習慣從0開始的話) Option Explicit：強制聲明變數(放在窗體或模塊的聲明部分) PopupMenu調出彈出式菜單。格式：PopupMenu彈出式菜單名, flags, x, y, Boldcommand（只有前面兩項為必選）。Flags變元定義彈出菜單的位置和功能（可用邏輯「或」運算符組合）；BoldCommand變元指定黑體顯示的菜單命令名（只能有一個，常用於表示預設值）。Flags變元的值： 常量 位置或功能 VbPopupMenuLeftAlign 指定X位置，確定菜單左邊沿（預設） VbPopupMenuCenterAlign 指定X位置，確定彈出菜單左中點。 VbPopupMenuRightAlign 指定X位置，確定彈出菜單右邊沿。 VbPopupMenuLeftButton 用戶用滑鼠左鍵單擊菜單項目時，彈出菜單觸發Click事件（預設）。 VbPopupMenuRightButton 用戶用左滑鼠鍵或右滑鼠鍵單擊菜單項目時，彈出菜單觸發Click事件 print：顯示 Public：用以代替Dim,聲明變數為公用變數 Public Const：用以代替Const,聲明為公用常量 Set：設置對象變數的值。格式：Set a =控制項名 Static：用以代替Dim,強制局部變數在不同過程調用之間保持其數值 TypeOf求出（或判斷）對象變數的類型值。格式：TypeOf對象名Is對象類型。例：If TypeOf Soource Is Textbox Then … UnLoad：卸出窗體 Write將已打開的文件內容顯示到文本框中，例：Write #FNum, Text1.Text（FNum為打開文件的文件號，前面要加「#」號） 語句 For循環規定循環多少次，例： For I = 1 To 5 …… Next I While循環如果符合某條件則……，否則……。例： While A > 0 …… Wend …… 方法 Add向集合中增加項目，格式如下：（befor為插到前面，after為插到誰的前面或後面）。格式：集合名.Add主題詞,變元名, befor, after例：工資.Add 680, "12月", ,"11月"(或after:="11月") AddItem向列表框中增加項目。格式：列表框名.AddItem "項目名" Clear清除所有內容(列表框、組合框等) Drag使源控制項既可以拖動，又可以響應滑鼠事件（就象拖動時將DragMode屬性暫時設為「1」一樣）。用MouseDown事件調用，常與[CTRL]等功能鍵結合使用。例：If Shift = 2 Then源控制項名.Drag GetFormat()Clipboard對象（剪切板）方法，檢查剪切板中的內容。檢查剪貼板中是否包含文本：If Clipboard.GetFormat(vbCFText) Then GetTextClipboard對象（剪切板）方法，從剪切板中取得數據。格式：變數= Clipboard.GetText Hide隱藏窗口 Item返回集合中的項目值，格式：集合名.Item(項目名或索引號) Move調整窗體或控制項的大小和位置。格式：窗體或控制項名.Move Left,Top,width,Height Parent訪問控制項所在的窗體。例：a = Source.Parent.Name（在拖放操作中訪問源控制項所在窗體的名稱）（拖動操作的目標控制項並不關心源控制項來自何方） Refresh更新顯示。例：form.refresh Remove刪除集合項目，格式：集合名.Remove項目名（項目名可以是索引號） RemoveItem從列表框或組合框中刪除項目。格式：組合框名.RemoveItem, index或組合框名.RemoveItem 「項目名」 SetFocus移動焦點到某一控制項上 SetTextClipboard對象（剪切板）方法，將內容放到剪切板中。格式：Clipboard.SetText變數或常量 Show打開某個窗體。格式：Form.Show ShowColorCommonDialog調用Windows的顏色窗口。例：CommonDialog1.ShowColor ShowFontCommonDialog調用Windows的字體窗口 ShowOpenCommonDialog調用Windows的打開窗口 ShowSaveCommonDialog調用Windows的保存窗口。 事件 Activate活動事件（激活狀態） Click左鍵單擊 Change控制項內容改變時觸發，提示上次save以來改變數據時保存數據。DblClick雙擊左鍵 Deactivate非活動事件（未激活狀態） DragDrop響應被拖動的控制項的放置事件。格式：Sub控制項名_DragDrop(Source As Control, X As Single, Y As Single)。其中Source變元表示被放置的控制項對象。Control項目可以是窗體上的任何控制項。（參見TypeOf關鍵字） DragOver響應拖過的控制項的事件請求。格式：Sub Label1_DragOver(Source As Control, X As Single, Y As Single, State As Integer)。其中State變元對應於被拖動的控制項的瞬時狀態，其值如下：0：源控制項進入目標區域；1：源控制項離開目標區域；2：源控經過目標區域。 GotFocus某控制項接受焦點 KeyDown鍵按下時觸發 KeyUp鍵彈起時觸發 KeyPress敲鍵盤時觸發（常用）。在change事件中設置變數狀態，即可加入該特性 LostFocus某焦點控制項退出焦點 MouseDown按住滑鼠鍵 MouseUp釋放滑鼠鍵 MouseMove滑鼠經過控制項時連續發生 Resize改變窗體大小 屬性 ActiveControl窗體屬性，用於訪問當前活動控制項。例：訪問當前活動控制項名：Form1.ActiveControl.Name Action公用對話框控制項的屬性，賦值後將顯示打開、列印等相應的公用對話框，用showOpen等方法則更直觀，其數值如下： 方法 數值 說明 ShowOpen 1 顯示Open對話框 ShowSave 2 顯示Save As對話框 ShowColor 3 顯示Color對話框 ShowFont 4 顯示Font對話框 ShowPrinter 5 顯示Printer對話框或Print Options對話框。 ShowHelp 6 顯示Windows Help工具 Alignment標簽名左對齊（0）、右對齊（1）、居中對齊（3） Appearance若為0，是平面外觀；若為1，是三維外觀 BackColor背景顏色 BorderStyle三維外觀（1-Fixed single） BorderStyle確定窗體樣式、外觀。若為0-None則無可見邊框和標題條，無法調整大小；若為1則有可見邊框，但無法調大小；為2時，有邊框和標題條，可調大小和位置；為3時，固定對話框；為4時，窗體外觀象工具條，有Close鈕，但無法調大小；為5時，同上，但可調大小。 Caption不接受輸入的控制項的標簽文本 CancelErrorCommonDialog控制項公用屬性，指定單擊Cancel鈕時是否產生錯誤。若取False鈕則單擊Cancel鈕時其FileName或Color屬性值為空。取True（預設）時，返回的錯誤號為32755（可用If Err.Number語句判斷）。 Checked菜單前是否有對鉤，即菜單編輯器中的「復選」屬性（有些菜單命令是觸發式的，通常用選定表示打開，用取消表示關閉）。 Count返回集合中的項目數，格式：集合名.Count ColorCommonDialog控制項屬性，指定選取的顏色。在Font對話框中要使用它，先要將Flags屬性設為cdllFEffects。 DefaultExtCommonDialog屬性，預設的文件類型。例：CommonDialog1.DefaultExt = "YZH" DialogTitleCommonDialog控制項公用屬性，返回或設置對話框標題條中顯示的字元串。 DragMode確定該控制項能否用滑鼠拖動。0-Manual：拖動操作必須在程序中進行（手動）；1-Automatic：可以用滑鼠拖動控制項（自動）。注意：設為True時，不再響應通常的滑鼠事件。 Enabled預設為True，可變為焦點，False則變為灰鍵。 FileNameCommonDialog屬性，打開文件的全名 FilterCommonDialog屬性，文件類型列表中的項目。例：CommonDialog1.Filter = "YZH文件|*.YZH|純文本文件|*.TXT|所有文件|*.*" FlagsCommonDialog屬性，調整每個公用對話框的功能，取值因對話框不同而不同。組合時將數值相加或用or運算符。 Color公用對話框 常量 數值 說明 CdlCCFullOpen &H2 顯示完整對話框，包括Define Custom Colors部分 CdlCChelpButton &H8 在對話框中顯示Help鈕 CdlCCPreventFullOpen &H4 隱藏Define Custom Colors部分（提供用戶自定義顏色） CdlCCRGBInit &H1 設置打開這個對話框時顯示的初始選擇顏色 Font公用對話框 ForeColor前景顏色 Font字體、字元串特性、字型大小 FontBold加粗顯示文字 FontItalic傾斜顯示文字 FontName返回字體名。 FontSize返回字型大小 FontStrikethru文字中間是否帶刪除線 FontUnderline文字下方是否帶下劃線 Height控制項的高 HideSelection 文本框屬性，當文本框失去焦點時是否取消反白顯示所選文本。 Interval時間間隔屬性，1為1/1000秒 ItemDate 類似於List數組的數組。常用於索引。 Left控制項的左上角橫坐標 List(Index)是保存列表框或組合框中項目的數組。應用：If List1.List(Index) = 「」 Then…. ListIndex列表框中的當前項目。如選擇多個項目，則該屬性為最近所選項目的索引號。若未選擇項目，則返回負值。刪除負值的項目會產生運行時錯誤，所以刪除前應先檢查ListIndex屬性值。 Locked True為鎖定（對齊方式） Max只在Print和Font對話框中出現。以確定列印范圍或字型大小的最大值。 MaxButton標題條上是否有最大化按鈕 MaxLength文本框屬性，設定最多可接收的字元數，預設為0（64KB）。要限制用戶輸入的字元數，可修改此值。 Min只在Print和Font對話框中出現。以確定列印范圍或字型大小的最小值。 MinButton標題條上是否有最小化按鈕 MultiLine文本框屬性，預設為False，只接受一行文字。 MultiSelect 列表框控制項只讀屬性，確定能否選擇多個項目和用哪個方法進行多項選擇。其取值如下：0、不允許多項選擇(預設)；1、簡單多選，用滑鼠單擊或按空格鍵來選擇和取消表中的項目，用箭頭鍵可控制焦點項目的移動；2、擴展多項選擇，按Shift並單擊滑鼠或按箭頭鍵即可擴展選項，可以高亮顯示上一選項和當前選項之間的所有項目，按Ctrl並單擊滑鼠選擇或取消表中的項目。 NewIndex 列表框屬性，返回最近加入列表框控制項的項目索引號。常與ItemData屬性一起使用。 PasswordChar文本框只讀屬性，將輸入的字元變成指定的字元。預設為空，若為「*」或其它字元則顯示為該字元，且不能復制或剪切框中文本。粘貼的文本也顯示為設定的字元。 Picture圖形框屬性，選定圖形框的圖片，或在代碼中指定圖形文件全名。 ScrollBars文本框屬性，是否有水平滾動條（1）、垂直滾動條（2）或都有（3）、都無（0）。 SelCount 列表框屬性，若允許多選則該屬性報告所選項目個數。通常與Selected數組一起使用。 Selected(Index) 列表框屬性，是個數組，其值為True和False，判斷項目是否被選中。 SelText文本框屬性，返回或設置文本框中已選中的文字內容。 SelLength文本框屬性，返回或設置所選文本長度。 SelStart文本框屬性，返回或設置所選文本的第一個字元位置，即游標位置。 Sorted(組合框、列表框等)控制項中是否排序True/False Style 控制項外觀 Style 列表框控制項的外觀，取值如下：0、標准形式；1、復選框。 Style 組合框控制項的外觀，取值如下：0、預設形式；1、簡單組合框（清單無法下拉）；2、下拉清單（不能輸入內容） TabIndex焦點移動順序，各控制項按0、1……順序賦值 TabStop設為False將控制項從移動順序中刪除 Tag存儲程序所需的附加數據 Text接受輸入的控制項的文本 Top控制項的左上角縱坐標 Visible使控制項可見（True/False） Value復選框控制項屬性True/false Width控制項的寬