Windows10よりAB4にて数字を文字に変換したいのですが、下記だと0.00になってしまします。
何が悪いのでしょう?
Declare Function sprintf CDECL Lib "crtdll" (lpString As *Byte,lpFormat As *Byte,...) As Long
Dim a As Double
Dim b[10] as Byte
a=12.34
sprintf(b,"%.2f",a)
printf
Re: printf
少しバリエーション増やして実行した結果、
いずれも12.34と表示されました。
ちなみにPC環境はWindows10/20H2(X64)です。
また32ビットモードのみでコンパイル&実行しました。
ご確認願います。
よろしくお願いいたします。
Declare Function sprintf CDECL Lib "crtdll" (lpString As *Byte,lpFormat As *Byte,...) As Long
Dim a As Double
Dim b[10] as Byte
a = 12.34
sprintf(b,"%.2f",a)
MessageBox(NULL,b,"test",MB_OK)
sprintf(b,"%2.2f",a)
MessageBox(NULL,b,"test",MB_OK)
END
いずれも12.34と表示されました。
ちなみにPC環境はWindows10/20H2(X64)です。
また32ビットモードのみでコンパイル&実行しました。
ご確認願います。
よろしくお願いいたします。
Declare Function sprintf CDECL Lib "crtdll" (lpString As *Byte,lpFormat As *Byte,...) As Long
Dim a As Double
Dim b[10] as Byte
a = 12.34
sprintf(b,"%.2f",a)
MessageBox(NULL,b,"test",MB_OK)
sprintf(b,"%2.2f",a)
MessageBox(NULL,b,"test",MB_OK)
END