会社の erp からデコードされる vbscript を使用してバーコードを作成したいと考えています (私の会社では番号を 10000 で割ります。バーコードは次のような外観にする必要があります: 99XXXXXXXXXQQQQQQQPPPPP ここでX、 は私のバーコード、Qは数量、Pは価格です。私が持っている連結：
Result = 99 & [sheet$.BARCODE] & right("00000000" & quantity*10000, 8) & right("00000" & VBScript1*10000,5)
VBScript1 は、プログラムの他の場所で使用されているため、このスタイルになります。
VBScript1 = "PRICE: "& FormatCurrency([sheet$.TIMH SAKOYLAKI]/[sheet$.SAKOYLAKI TWN]*1.3*(Round((40*CDbl(zyg))/CDbl([sheet$.GR/40 TEM]))),2)
の出力VBScript1は次のようになりますPrice: $0,40
今私の質問は、文字列から数値のみを抽出し、それを上記で使用するために10000で乗算する方法ですか?
私の例では、Price:Price: $0,40をバーコードのように使用したいと考えてい04000ます。