欧美性猛交黑人xxxx,成人毛片一区二区三区,久久综合九色综合精品,男的把j放进女人下面视频免费

VB調用由C#開發的com組件

  • 發布于:2024-02-21
  • 193 人圍觀

1:建立c# 項目 (注意項目必須含有接口,其他類應該實現該接口,才可以在其他語言中用該com組件)

2:將 AssemblyInfo.cs 里的 [assembly: ComVisible(false)] 改為 true

3:項目-屬性-生成里將:為com erop 注冊 選種

4:生成后就可以在其他語言中引用或該組件。

一般代碼

using System;

using System.Collections.Generic;

using System.Text;

namespace UseMethod

{

public erface IField

{

void SetField(UseMethod.Fields f);

UseMethod.Fields GetField();

UseMethod.Fields GetSetField(UseMethod.Fields f);

Add( i,j);

}

public class FieldAction:IField

{

public FieldAction()

{

//如果使用設計的組件,請取消注釋以下行
//InitializeComponent();

}

public void SetField(UseMethod.Fields f)
{

Fields f1 = new Fields();

f1.city = city;

f1.country = country;

f1.myCity = nycity;

f1.myName = myName;

}

public UseMethod.Fields GetField()

{

Fields f1 = new Fields();

f1.city = city;

f1.country = country;

f1.myCity = nycity;

f1.myName = myName;

return f1;

}

public UseMethod.Fields GetSetField(UseMethod.Fields f)

{

return f;
}

publicAdd( i,j)

{

return i + j;

}

}

public class Fields

{

public string city;

public string country;

public string myName;

public string myCity;

}

} 當然可以有其他復雜的類,但是在操作時,最好用強類型,以便于識別!

將生成的UseMethod.tlb 即.tlb文件引用到vb的項目中,然后

在vb6中調用:

Private Sub cmdObject_Click()

Dim meth As UseMethod.IField

Dim met As UseMethod.FieldAction

Dim result As UseMethod.Fields

Dim fi As UseMethod.Fields

Set fi = New UseMethod.Fields

Set met = New UseMethod.FieldAction

With fi

.city = city

.country = country

.myName = myName

.myCity = MYcITR

End With

Set meth = met

txtStr.Text = meth.Add(8, 9)

Set result = meth.GetSetField(fi)

txtInOut.Text = result.city result.country //注意這里的屬性應和c#里定義的一樣

MsgBox soapClient3.AddressName, vbDefaultButton1, 提示

End Sub

萬企互聯
標簽: