- ベストアンサー
VBのBooleanはCではどんな方でしょうか？ DLL
元々、VB6のソースをCに書き直している最中ですが、 VBでintegerは Cではshortでよいのですが、VBでBooleanはCではどのように記述したらよいのでしょうか？ 確かCは真が-1で偽が0だったと思いますが、それならば shortで定義して・・・ でうまくいくのでしょうか？ VBから呼び出すCの関数のDLLを書いた事のある方、教えていただけますか？ また、今の時代、DLLは古いでしょうか？ だいぶ前のソースをいじくっております。
- hdkoa
- お礼率0% (1/117)
- Visual Basic
- 回答数2
- ありがとう数0
- みんなの回答 （2）
- 専門家の回答
関連するQ&A
- DLL VBとC++
VBAからVC++2005のDLLを呼び出すプログラムを書いています。 VB側で作成したcpp_proc関数を呼ぶとVBアプリ自体が落ちました。 DLLのreturnの直前に以下のMessageBoxで表示させるとそこまでは表示され、 リターンを押すと、落ちました。 VB側の引数の値 String * 8192が悪いのでしょうか？ return直前まで動作していたので、DLLの戻り値に何か原因があるのでしょうか？ ついでの質問ですが、DEFの @1は無くても動くのでしょうか？ 意味が知りたいです。 // ----- C++ (DLL側) ----- int __stdcall cpp_proc(LPCSTR inp, LPSTR out) { ... 省略 MessageBox(0, "ここまで通過", "debug", MB_OK); return 0; } // ----- DEF ----- LIBRARY "example" DESCRIPTION 'テスト' EXPORTS ; 明示的なエクスポートはここへ記述できます cpp_proc @1 '----- VB側 ----- Public Declare Function cpp_proc Lib "example.dll" _ (ByVal inp As String, ByRef out As String) As Integer Public Sub Test() Dim ret As Integer Dim inp As String Dim out As String * 8192 ret = cpp_proc(inp, out) MsgBox("ret=[" & Cstr(ret) & "]"); End Sub
- ベストアンサー
- C・C++・C#
- Cで作成したDLLをVBで呼出
Cで作成したDLLの関数をVB6.0から呼び出す事ができず、悩んでおります。 ご教授お願いします。 どの様な関数を呼び出そうとしているのかというと、以下の通りです。 <DLL Cで作成(コンパイラVC6）> void WINAPI hoge(BSTR pgname,BSTR fmt,...){ ～処理～ } /* 宣言では頭にDLLExport*/ <呼出側 VB6.0で作成> '宣言 Public Declare Function hoge Lib "hoge" _ (ByRef pgname as String , _ ByRef fmt as String , _ ParamArray args()) '呼出 call hoge("foo","baa","array1",2) この様なコードを書いております。 C側、VB側ともに固定数の引数にしてみたところ、 通ったので「ParamArray args()」の定義が違うのではないか・・・?と思っているのですが、 どの様に宣言したらよい物なのでしょうか？ もしくは、そもそも全然違う箇所を間違っているのでしょうか？ 宜しくお願いします。 ※ 説明の足りない箇所があれば、仰ってください。
- ベストアンサー
- Visual Basic
- VB6.0の関数をC++で使いたい
いまVB6.0のRATE関数をC++で使いたいと考えています。 自分なりに調べてVB6.0でActiveX DLLを作ってみたりしたのですができませんでした。 また、RATE関数と同じ動きをするC++の関数も見当たらず困っています。 どなたかVB6.0の関数をC++で使えるようにする方法か、 RATE関数と同じ動きをするC++の関数をご存知のかたがいましたら教えてください。 宜しくお願いします。
- ベストアンサー
- C・C++・C#
- VB .NetのDLL参照について
名前付パイプの処理をしているのですが、DLLが参照できません。 Public Class ClsJi01 Public Declare Function MakePipe Lib "\DLL\Point.DLL" (ByVal pipe_name As String, ByVal buf_size As Integer, ByVal max_instances As Short, ByVal hpipe As Integer, ByVal err_code As Integer) As Integer Public Sub M_Pipe() Dim r As Integer Dim rpipe As Integer Dim err_code As Integer r = MakePipe("\\.\pipe\RS04", 255, 16, rpipe, err_code) End Sub End Class Point.DLLは以前VB6.0の時に使用していたDLLで自作です。 これで実行すると「オブジェクト参照がオブジェクト インスタンスに設定されていません。」と出ます。 どうしたら良いのでしょうか？
- ベストアンサー
- Visual Basic
- VBで三項演算子
CやPerlで三項演算子がありますが、 ret = (1 == 1) ? "真" : "偽"; VBはIFF関数？で同じようなことができますか？ 注意点など知りたいです。
- ベストアンサー
- Visual Basic
- VB.NETからC++のdll連携(double)
プログラム初心者です。 double型の配列をVB2010とC++で作成したｄｌｌで連携したいのですが、値が正しく渡されません。 値が正しく渡せるにはどうしたら良いでしょうか？ 以下がその内容です。（int型の場合）これをdouble型で渡したいのですが。 C++ではSafeArrayの扱いになるとのことですが、方法が良く分かりません。 VBソース ----------------- ' Arrays.vb Imports System Imports Microsoft.VisualBasic Imports System.Runtime.InteropServices Friend NotInheritable Class NativeMethods Private Sub New() End Sub Declare Function TestArrayOfInts Lib "makedll.dll" ( _ <[In](), Out()> ByVal myArray() As Integer, ByVal size As Integer) As Integer End Class Public NotInheritable Class App Private Sub New() End Sub Public Shared Sub Main() ' *************** array ByVal ************** Dim array1(9) As Integer Console.WriteLine("Integer array passed ByVal before call:") Dim i As Integer For i = 0 To array1.Length - 1 array1(i) = i Console.Write(" " & array1(i)) Next i Dim sum1 As Integer = NativeMethods.TestArrayOfInts(array1, array1.Length) Console.WriteLine(ControlChars.CrLf & "Sum of elements:" & sum1) Console.WriteLine(ControlChars.CrLf & "Integer array passed ByVal after call:") For Each i In array1 Console.Write(" " & i) Next i Console.Read() End Sub End Class //********************************** C++作成ｄｌｌソース(makedll.cpp) extern "C" MAKEDLL_API int TestArrayOfInts( int* pArray, int size ) { int result = 0; for( int i = 0; i < size; i++ ) { result += pArray[ i ]; pArray[ i ] += 100; } return result; } //********************************** C++作成ｄｌｌソース(makedll.h) #ifdef MAKEDLL_EXPORTS #define MAKEDLL_API __declspec(dllexport) #else #define MAKEDLL_API __declspec(dllimport) #endif extern "C" MAKEDLL_API int TestArrayOfInts( int* pArray, int size ); //********************************** C++作成ｄｌｌソース(makedll.def) LIBRARY makedll.dll EXPORTS TestArrayOfInts PRIVATE
- ベストアンサー
- C・C++・C#
- DLLの利用について
現在、ＶＣで作成したＤＬＬをＶＢ使うということを行っています。 概要は、ＶＢの方で定義した配列に1～９の数字を代入し、その和を求めるというものです。 ＤＬＬに値を渡す際は参照による引渡しをし、ＤＬＬで変数の変更を行いたいんです。 しかしその変数の変更がうまくいかないんです。 どこがまずいのでしょうか？ プログラム内容は以下に示します。 よろしくお願いします。 *****ＶＢのプログラム***** Option Explicit Private Declare Sub Sum Lib "test.dll" (aa as Integer, bb as Integer) Private Sub Command1_Click() Dim a(9) As Integer '1～9の値の代入先 Dim b As integer '和 Dim I As Integer For I = 0 To 9 a(I) = I + 1 Next I b = 0 Sum a, b 'DLLでの計算 MsgBox (b) '結果表示 End Sub *****DLLの中身***** _declspec(dllexport) void _stdcall Sum(short *aa, short bb) { int i; for ( i=0; i<=9; i++){ bb=bb+aa[i]; } } *****モジュール定義内容***** EXPORTS Sum
- ベストアンサー
- Visual Basic
- VB.NET デリゲートへのコールバック関数の設定
VB.NET デリゲートへのコールバック関数の設定 VB.NETとネイティブC/C++ DLL間でのコールバックについての質問です。 ネイティブDLLからVOID*で得られるコールバック関数をVB.NETのデリゲートに 登録するには、どのようにコーディングすればよいのでしょうか。 ---------- VB.NETソース ---------- Public Delegate Sub CALLBACK_00(ByVal Arg1 As Integer, ByVal Arg2 As Integer) Declare Function FuncPtrGet Lib "test.dll" () As CALLBACK_00 Dim Func As new CALLBACK_00(FuncPtrGet()); ２行目は、実際にはVOID*が帰るDLL関数です。 ３行目がコンパイルで通りません。AddressOfで関数を指定するようにメッセージが出ます。
- ベストアンサー
- Visual Basic
- VB2005で作成したDLLをExcelVBAで使用したいのですが
VBAで色々定義してもまったく使用できません。 作成したDLLをDependencyWalkerで覗くとFunction名が出ていないので、うまくDLLができていないと思うのですが、何が問題なのでしょうか？ C++等でようなDEFファイルのようなものは定義していません。 (VBでの定義がわかりません)よろしく御願いします。
- 締切済み
- Visual Basic
- VB6からVC6で作成したDLLの関数を呼び出すときに注意すること
VB6からVC6で作成したDLLの関数を呼び出すときに、型について気をつけないといけませんが、VB6でint型のものはVC6ではshortにしないといけないのでしょうか？マシンやOSや開発環境(例えばVS2005やGCC)により違ってくるのでしょうか？ VB6とVC6でやり取りする場合の型について知りたいです。 あと、ActiveXのDLLの場合は関数にアクセスするのではなく、COM（という概念がわかっていないのですが）を使うのですか？
- ベストアンサー
- Visual Basic
