引用4楼详细内容：

我听劝

代码如下：

FUNCTION "SizeOf" : UDInt

{ S7_Optimized_Access := 'TRUE' }

VERSION : 0.1

   VAR_INPUT

      Data : Variant;

   END_VAR

   VAR_IN_OUT

      BUFFER : Array[*] of Byte;

   END_VAR

   VAR_TEMP

      Pos : DInt;

      ret : Int;

   END_VAR

BEGIN

       #Pos := 0;

       #ret := Serialize(SRC_VARIABLE := #Data, DEST_ARRAY => #BUFFER, POS := #Pos);

       IF #ret = 0 THEN

           #SizeOf := #Pos;

       ELSE

           #SizeOf := 0;

       END_IF;       

END_FUNCTION

除了上述代码外，还需要一个数据块的辅助

引用2楼详细内容：

你不分享代码，说明实现原理，别人怎么会觉得有帮助呢？ 老是玩这种犹抱琵琶半遮面的把戏，无非就是让别人求着你呗。 做技术的还是真诚一点的好，愿意分享就大大方方一些。