ソースをさらせます
あと追加事項

接続は「ＯＤＢＣ」でし

ＰＢ側
*************************************
DECLARE get_kensu PROCEDURE FOR
sp_test :hensu1:out_kekka;
EXECUTE get_kekka;
if SQLCA.sqlcode = -1 then
MessageBox("Stored Procedure Error!",SQLCA.sqlerrtext)
end if

FETCH get_kekka INTO :out_kekka;

MessageBox("Got my employee!",out_kekka)
CLOSE Get_kekka;