構造体の中に構造体宣言するには？ (ID:91830)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文

全く意味がわからない状態だと、使いこなすことは難しいかも。
サンプルをコピーして使うぐらいならばできるでしょうけれども。

> 初心者なものでもう少しわかりやすくしていただけるとありがたいです。
マーシャリング関係は、初心者を明言しているうちは厳しいかも知れません。
API側のメモリ配置と、.NET側の実装の両方を理解する必要があるので…。

> http://madia.world.coocan.jp/cgi-bin/VBBBS2/wwwlng.cgi?print+200208/02080041.txt
> に書かれているソースをVB.netで使用できるよう変換すれば使えるか教えていただければbestなのですが...。
PINGを発行したいだけならば、System.Management.DLLを参照設定しておいて、
Win32_PingStatusクラスを呼び出した方が楽ですよ。

Dim IPAddress As String = "127.0.0.1"

Dim searcher As New System.Management.ManagementObjectSearcher( _
    "SELECT * FROM Win32_PingStatus" _
    & " WHERE ADDRESS='" & IPAddress & "'" _
)

For Each mo As System.Management.ManagementObject In searcher.Get()
    Dim StatusCode As Integer   '元の型は UInt32

StatusCode = System.Convert.ToInt32(mo.Properties("StatusCode").Value)
    Select Case StatusCode
        Case 0
            TextBox1.Text = "成功"
        Case 11010
            TextBox1.Text = "Request Timed Out"
        Case Else
            TextBox1.Text = "その他のエラー:" & CStr(StatusCode)
    End Select
Next

StatusCodeの意味は、下記を参照。
http://msdn.microsoft.com/library/en-us/wmisdk/wmi/win32_pingstatus.asp

←解決時は質問者本人がここをチェックしてください。

戻る