如何在文件中写入十六进制值，直到写入字节？

Question

如何用“ FF”十六进制值填充文件？

我希望我的程序将输入到文本框中的值用作文本框，并使用它创建一个大小为MB的文件，并用FF十六进制值填充。

我使用了这段代码，但是要写10 mb的文件，但是最后一个十六进制值为FF。

Dim hex As String = "FF"
    Using fs As New FileStream("huge_dummy_file", FileMode.Create, FileAccess.Write)
        For Each byteHex As String In hex.Split()
            fs.Seek(TextBox1.Text * 1024 * 1024, SeekOrigin.Begin)
            fs.WriteByte(Convert.ToByte(byteHex, 16))
        Next
    End Using