vb怎麼寫文件

『壹』 VB中如何讀寫文件 謝謝了

用open
open <文件名>[for 打開方式] as [#]<文件號>
打開方式有三種
（1）input：向計算機輸入數據，即從所打開的文件中讀取數據。
(2)output:向文件寫數據，即從計算機向所打開的文件寫數據。如果文件中原來已有數據，則原有數據被抹去，即新寫上的數據覆蓋已有的數據。
（3）append:向文件添加數據，即從計算機向所打開的文件寫數據。不同於output方式的是，append方式把新的數據添加到文件尾部原有數據的後邊，文件中保留原有數據。
AS是一個關鍵字，as引導的短語為打開的文件指定一個文件號。#號是可選項。文件號是一個1~511之間的整數。文件號用來代表所打開的文件。

例如：打開c:\a.txt文件
open "c:\a.txt" for output as #1

向文件寫數據用print和write語句：
print #<文件號>[,輸出表列]
write #<文件號>〔，輸出表列]
例如向上面打開的文件寫數據
print #1,"a";"b";"c"
close #1
文件里顯示為：
abc

『貳』 vb中如何創建文件

假定抄按鈕名為Command1，如下代碼實現。
Private Sub Command1_Click()
Open App.Path & "go.txt" For Output As #1
Print #1, "這是用VB創建的文件。"
Close #1
End Sub

『叄』 如何用VB創建文件並對它操作。

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

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

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

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

『肆』 VB中文件的讀寫方法

Private Sub Command1_Click()
Static StrTxt$, k&, h&, Num() As String
Open "c:\in.txt" For Input As #1
Input #1, StrTxt
Close #1
Num = Split(StrTxt, " ")
For k = 0 To UBound(Num)
If Num(k) Mod 3 = 0 Then
h = h + Val(Num(k))
End If
Next
Label1.Caption = CStr(h)
Open "c:\out.dat" For Output As #1
Print #1, CStr(h)
Close #1
End Sub

『伍』 如何用vb寫文件操作

題主同時開了兩個問題啊：

http://..com/question/578481323.html?oldq=1#answer-1453848518

因為題主給的條件太少，我這里先假設題主的填寫工程名稱的控制項是Combo1，填寫取用人的控制項是Combo2，填寫出入庫的控制項是Option1和Option2，填寫取用數量的控制項是Text1，填寫備注的控制項是Text2，確認按鈕的控制項是Command1，那麼應該在Command1_Click中添加如下代碼：

DimmyInfoAsString
DimmyStrAsString
DimfileNameAsString

IfOption1.Value=TrueThen
myStr="出庫"
Else
myStr="入庫"
EndIf
myInfo="工程名稱："&Combo1.Text&"|取用人："&Combo2.Text&"|出入庫："&myStr&"|數量："&Text1.Text&"|備註："&Text2.Text

fileName=App.Path&"123.txt"
OpenfilenNameForAppendAs#1
Print#1,myInfo
Close#1

『陸』 怎麼用VB編寫一個EXE文件

1）運行VB6.0，新建一個標准EXE工程

6）選擇保存位置，確定執行，VB就完成EXE可執行文件的編寫。