reconstruct（depayloaded）jpeg rtp包

Question

我想编写一个简单的函数来重新组合/重构/ depayload rtp数据包。为了测试，我将只使用一个jpeg图像，在RTP数据包中将其拆分，然后尝试重新组合它们。

问题是，我不太确定如何做到这一点。有人可以给我指点吗？

这是rtp数据包上的snipet代码

Private Sub cboProgrammeName_Change()
Dim ws As Worksheet
Dim x, dict
Dim i As Long
Dim str As String
Set ws = Sheets("XXX")
x = ws.Range("ProgrammeNameList").Value
Set dict = CreateObject("Scripting.Dictionary")
str = Me.cboProgrammeName.Value
If str <> "" Then
    For i = 1 To UBound(x, 1)
        If InStr(LCase(x(i, 1)), LCase(str)) > 0 Then
            dict.Item(x(i, 1)) = ""
        End If
    Next i
    Me.cboProgrammeName.List = dict.keys
Else
    Me.cboProgrammeName.List = x
End If
Me.cboProgrammeName.DropDown
End Sub

struct JPEGdepay就在那里，因为我不知道下一步该做什么。