JS formData到服务器的ajax分块上传，所有的分块都上传完毕JS完整代码和 VB 后端完整代码

JavaScript 中，使用 `FormData` 和 AJAX 实现分块上传通常涉及到前端的分片操作和服务器端的接收拼接处理。这里提供一个简化版的前端代码示例（使用 jQuery 和 Axios）：

let xhr, formData, chunkSize = 1024 * 1024; // 每次上传的数据大小

// 开始上传前创建新的 XMLHttpRequest 对象
xhr = new XMLHttpRequest();

// 定义进度回调函数
xhr.upload.onprogress = function(event) {
  if (event.lengthComputable) {
    let percentComplete = Math.round((event.loaded / event.total) * 100);
    console.log(`已上传 ${percentComplete}%`);
  }
};

// 分块上传开始
uploadFile(formData, totalSize);

function uploadFile(formData, totalSize) {
  let start = 0;
  while (start < totalSize) {
    let end = Math.min(start + chunkSize, totalSize);
    xhr.open('POST', '/api/upload', true);
    xhr.setRequestHeader('Content-Type', 'multipart/form-data');
    xhr.send(formData.slice(start, end));
    
    // 当本次请求完成后，继续下一次上传
    xhr.onloadend = () => {
      start += chunkSize;
      if (start < totalSize) {
        uploadFile(formData, totalSize);
      }
    };
  }
}

// 初始化 FormData 和文件信息
formData = new FormData();
formData.append('file', fileInput.files[0]);

VB .NET 后端（使用 ASP.NET Core 的 Web API）接收分块并进行合并的代码示例：

Imports System.IO
Imports Microsoft.AspNetCore.Http
Imports Microsoft.AspNetCore.Mvc

<HttpPost("/api/upload")>
Public Async Function UploadFile(fileStream As FileStream) As Task(Of String)
    Dim buffer(4096 - 1) As Byte
    Dim receivedData As New StringBuilder()
    Dim bytesReceived As Integer = 0
    
    While True
        bytesReceived = Await fileStream.ReadAsync(buffer, 0, buffer.Length)
        
        If bytesReceived <= 0 Then
            ' 已经读完全部数据，结束循环
            Exit While
        End If
        
        receivedData.Append(Encoding.UTF8.GetString(buffer, 0, bytesReceived))
    End While

    ' 这里可以对收到的数据进行处理，比如保存到数据库
    ' 返回确认信息
    Return "Upload successful"
End Function

以上代码假设前端已经正确地拆分了文件，每次请求只发送部分数据。在服务器端，你需要处理每个分块，并在它们到达后将数据累积起来。

注意：实际生产环境中需要考虑错误处理、断点续传等情况，这只是一个基本的演示。