小弟我在寫一個自動餵資料的程式
目前卡在不知道要如何將產生出來的值
寫到txt檔
例如我將檔案放置在C:\data.txt
請問要如何寫呢?
以下是我的程式碼
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
Dim Num() As String = {0, 1, 2, 3, 4, 5, 6, 7, 8, 9}
Dim i As Integer
Dim a As String
Dim data As FileAttribute
data = FileAttribute.System
Dim b As String
Dim s As String
Dim last As Integer
b = "00000"
For i = 0 To 100
FileOpen(1, "c:\data.txt", OpenMode.Input)
Randomize()
s = (Int(5) * Rnd() + 1)
a = b & Num(s)
FileClose(1)
Next
MsgBox("產生完畢")
End Sub
End Class
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 218.175.189.49