Question

VBA 长度单位 如何规定？

在CorelDraw 中，自己写了个改变对象大小的小功能。
S_H = Val(HTPQ_String_Filter(ChangeSelect_TextBox_H.Text)) / 25.4
S_W = Val(HTPQ_String_Filter(ChangeSelect_TextBox_W.Text)) / 25.4
但是有时候就可以准确得到输入的值（mm），但是有时候得到的就是小得多的值。例如有时候我输入60mm就可以得到60mm这个值，但是有时候输入60mm，却是得到了2.xxx的值
请问在VBA中，如何规定一个固定单位呢，谢谢

Answer 1

方案一：
使用函数进行数据类型变换。CDbl, CDec, CInt, CLng, CSng, Fix, Int等
方案二：
设置数据类型变量。Byte, Currency, Double, Integer, Long, Single等
方案三：
使用类型符进行强制约定。如，% (整型)、# (双精度浮点型)、& (长整型)