Boris 發問時間: 電腦與網際網路程式設計 · 8 年前

VB處理檔案讀取內的資料

我在記事本(.txt)裡寫下1 2 3 4 5 6 7 8 9 0

要如何在VB裡讀取出來並將十個數字分布在不同的textbox內?

1 個解答

評分
  • wei
    Lv 6
    8 年前
    最佳解答

    Public Class Form1

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load

    '將x設定為 "C:\test.txt" 內所有內容 (1234567890)

    Dim x = My.Computer.FileSystem.ReadAllText("C:\test.txt")

    '將x設定為 "C:\test.txt" 內所有內容 (1234567890)

    Dim t(10)

    '新增10個Textbox

    For a = 1 To 10

    t(a) = New TextBox

    t(a).text = Mid(x, a, 1) '第a個Textbox內的內容為 x 的第a個字

    Controls.Add(t(a))

    Next

    '新增10個Textbox

    '整理Textbox位置

    For a = 2 To 10

    t(a).location = New Point(t(a - 1).location.x, t(a - 1).location.y + 25)

    Next

    '整理Textbox位置

    End Sub

    End Class

    有其他需要建議你寄訊息給我

    參考資料:
還有問題?馬上發問,尋求解答。