次の例では、CSByte関数を使用して、数値をSByteに変換しています。 VB DimaDoubleAsDoubleDimanSByteAsSByteaDouble =39.501' The following line of code sets anSByte to 40.anSByte =CSByte(aDouble) CShort の例 次の例では、CShort関数を使用して、数値をShortに変換しています。