close

FROM: 強力榔頭

如何在 C# 中調用 VB.Net 2005 My 物件及其他函數

 

 

相信玩過 VB 2005 的朋友都知道它內建了個 My 物件,功能強大使用方便。

 

My 物件將特定功能封裝,無需宣告,不用建個體,直接使用,提供 VB 開發者輕鬆建構應用程式。

 

 

 

 

 

  

 

My.Application 物件

 

存取應用程式資訊和服務。

 

My.Computer 物件 

 

存取主機電腦及其資源、服務和資料。

 

My.Forms 物件 

 

存取目前專案中的表單。

 

My.Log 物件 

 

存取應用程式記錄檔。

 

My.Request 物件

 

存取目前的 Web 要求。

 

My.Resources 物件 

 

存取資源項目。

 

My.Response 物件 

 

存取目前的 Web 回應。

 

My.Settings 物件 

 

存取使用者和應用程式層級設定。

 

My.User 物件 

 

存取目前使用者的安全性內容。

 

My.WebServices 物件 

 

存取目前專案所參考的 XML Web Service

 

 

詳細使用請參考 MSDN

 

 

================================================================

 

 

 

 

話說 .Net 上的工具,可跨語言整合使用.. 那要如何在 C# 中來使用 VB My 物件或函數ㄋ ??

 

 

 

 

參考底下 Sample

 

 

注意 :

 

 

請先加入參考 "Microsoft.VisualBasic"

 

 

using Microsoft.VisualBasic;

 

using Microsoft.VisualBasic.ApplicationServices;

 

using Microsoft.VisualBasic.CompilerServices;

 

using Microsoft.VisualBasic.Devices;

 

using Microsoft.VisualBasic.FileIO;

 

using Microsoft.VisualBasic.Logging;

 

using Microsoft.VisualBasic.MyServices;

 

 

 

Sample 1 :

 

C# 調用VB.Net 2005 My 物件Computer.Network.IsAvailable檢查目前網路連線狀態

 

 

C#

 

            if (new Computer().Network.IsAvailable)

 

            {

 

                MessageBox.Show("網路連線正常!!");

 

            }

 

            else

 

            {

 

                MessageBox.Show("無法連線網路!!");

 

            }

 

 

 

 

================================================================

 

 

 

 

Sample 2 :

 

C# 調用VB.Net 2005 My 物件Computer.Network.Ping("168.95.192.1") Ping 某台主機位置

 

 

C#

 

            if (new Computer().Network.Ping("168.95.192.1"))

 

            {

 

                MessageBox.Show("Ping 的到主機!!");

 

            }

 

            else

 

            {

 

                MessageBox.Show("Ping 不到主機!!");

 

            }

 

 

 

 

================================================================

 

 

 

 

Sample 3 :

 

C# 調用VB.Net 2005 StrConv 來進行繁簡字體轉換

 

 

VB.Net

 

            Dim strData As String

 

            strData = StrConv("強力鎯頭的VB部落", VbStrConv.SimplifiedChinese, 2052)

 

            MessageBox.Show (strData) ' 顯示簡體中文字

 

 

C#

 

            string strData;

 

            strData = Strings.StrConv("強力鎯頭的VB部落", VbStrConv.SimplifiedChinese, 2052);

 

            MessageBox.Show (strData); // 顯示簡體中文字

 

 

PS : 簡體中文(GB2312) 系統的 LocaleID (LCID) 2052

 

 

 

================================================================

 

 

其他功能都大同小異! 依此類推即可囉 !

 

==============================

 

另一篇請參考

 

http://www.purecs.net/thread/topic339_1.aspx

arrow
arrow
    全站熱搜
    創作者介紹
    創作者 11 的頭像
    11

    冠霖的部落格

    11 發表在 痞客邦 留言(0) 人氣()