dim rtn為整數，i1為整數，i2為整數，i3為整數
I 1 = val(mid(text 1 . text，1，1))+val(mid(text 1 . text，2，1))'百位數+十位數。
I2 = val (mid (text1.text，2，1))+val(mid(text 1 . text，3，1))'十位數+位數。
I3 = val (mid (text1.text，3，1))+val(mid(text 1 . text，1))'位+百位數。
rtn = i1+i2+i3
text2.text=rtn
中間函數
返回壹個變量(字符串),包含字符串中指定數量的字符。
語法
Mid(字符串，起始[，長度])
Mid函數的語法具有以下命名參數:
部分解釋
String必需參數。從中返回字符的字符串表達式。如果字符串包含Null，它將返回Null。
開始所需的參數。很久了。字符串中提取部分的字符位置。如果start超過string的字符數，Mid將返回零長度字符串(" ")。
Length可選參數；是Variant (Long)。要返回的字符數。如果省略或長度超過文本中的字符數(包括開頭的字符)，將返回字符串中從頭到尾的所有字符。
解釋
要知道字符串中的字符數，可以使用Len函數。
註意，MidB函數作用於字符串中包含的字節數據，就像雙字節字符集(DBCS)語言壹樣。所以它的參數指定了字節數，而不是字符數。有關使用MidB的示例代碼，請參見示例主題中的第二個示例。