这是两个结构体
Private Type CARTICLE
   article As String
   Color1 As String
   Color2 As String
   CoreArea As String
   KANBANID As String
   Side1partpullofflength As String
   Side1seal As String
   Side1strippinglength As String
   Side1terminal As String
   Side2partpullofflength As String
   Side2seal As String
   Side2strippinglength As String
   Side2terminal As String
   WireID As String
   WireLength As String
End Type

Private Type CJOB
   ArticleKey As String
   BatchSize As String
   JobID As String
   TotalPieces As String
End Type
Private Sub Command2_Click()’send data
    Dim s               As String
    Dim FT_hWnd, l        As Long
    Dim ID_Control_hWnd As Long
    Dim pid     As Long
    Dim JOB As CJOB
    JOB.ArticleKey = "3"
    JOB.BatchSize = "4"
    JOB.JobID = "5"
    JOB.TotalPieces = "6"
    s = '???不知道如何把结构体数据给s
    FT_hWnd = 0
   
    hProcess = OpenProcess(PROCESS_TERMINATE, 0, pid)
    FT_hWnd = FindWindow(vbNullString, "1.txt - 记事本")
    If FT_hWnd = 0 Then
        MsgBox "False", vbInformation, "Title"
        End
    End If
    ID_Control_hWnd = GetDlgItem(FT_hWnd, &HF)
    SendMessage ID_Control_hWnd, WM_SETTEXT, 0, ByVal s'????这一句也不知道如何写
End Sub
请高手多指教啊！

则么没人回复啊

结构体是自定义的，程序运行前可修改编辑，运行后还可以定义？好像即使是c里面的函数重载也是有条件提供编译器使用的，编译后就不能变了。我out了。