Cara Mendeklarasikan Fungsi Windows API Pada VB.Net

04Feb09

vb.netPada dasarnya kita bisa meniru sintak VB6 untuk menambahkan fungsi windows API pada VB.Net, namun kali ini kita akan mencoba bagaimana cara mendeklarasikan dengan sudut pandang .Net

Sebenarnya pada VB.Net banyak fungsi windows API yang sudah terintegrasi di dalamnya, sehingga dapat meminimalisasi kita  untuk mendeklarasi ulang fungsi windows API tersebut.

Di sini kita akam membuat program sederhana menggunakan VB.Net,dengan menambahkan salah satu fungsi windows API yaitu mengimpor suatu Dynamic Link Libraries (DLL) dalam program kita. Berikut langkah – langkahnya:

1. Buat suatu project baru WindowsApplication, dengan design form sebagai berikut:

form1

tambahkan satu button dan beri nama ButtonOk

2. Setelah itu kita masuk ke source code editor pada form1, dan tambahkan code berikut pada bagian atas source code:

Imports System.Runtime.InteropServices

3. Kemudian tambahkan contoh pendeklarasian DLL berikut dalam form:

<DllImport(“KERNEL32.DLL”, EntryPoint:=”DeleteFileW”, _

SetLastError:=True, CharSet:=CharSet.Unicode, _

ExactSpelling:=True, _

CallingConvention:=CallingConvention.StdCall)> _

Public Shared Function _

DeleteFile(ByVal lpFileName As String) As Boolean

‘Biarkan kosong

End Function

dengan deklarasi fungsi pada vb 6 sebagai berikut:

Public Declare Function DeleteFile Lib “kernel32″ _

Alias “DeleteFileA” _

(ByVal lpFileName As String) As Long

4. Setelah itu tambahkan code berikut pada ButtonOk_Click

Private Sub ButtonOk_Click(ByVal sender As System.Object, _

ByVal e As System.EventArgs) Handles Button2.Click

Dim x As Boolean

x = DeleteFile(“c:\Coba.txt”)

If x = True Then

MsgBox(“File telah dihapus.”)

Else

MsgBox(“Penghapusan file gagal.”)

End If

End Sub

5. Jangan lupa sebelum menjalankan program buat file .txt menggunakan NotePad dan simpan pada (C:\Coba.txt)

6. Lalu jalankan program (tekan F5)

yanuarfandi.wordpress.com



2 Responses to “Cara Mendeklarasikan Fungsi Windows API Pada VB.Net”

  1. pada entry point VB.NET d sna dituliskan DeleteFileW yang digunakan untuk membuang file yang mengandung karakter unicode, sedangkan pada penulisan declare VB.6.0 ditulis DeleteFileA yang hanya digunakan untuk membuang file yang tidak mengandung karekter unicode. apa Vb 6.0 tidak dapat memakai DeleteFileW sehingga diganti dengan DeleteFileA???

  2. 2 Informasi CPNS BUMN

    Dapatkan Informasi lowongan CPNS, Informasi lowongan BUMN, Informasi lowongan kerja Bank, Informasi lowongan kerja terbaru, Lowongan pekerjaan, Lowongan kerja Nasional, Lowongan kerja Dalam Negeri, Lowongan kerja Jakarta, Bandung, Semarang, Jogja, Surabaya dan Seluruh Wilayah Indonesia hanya di http://informasicpns-bumn.blogspot.com/


Tinggalkan Balasan

Fill in your details below or click an icon to log in:

WordPress.com Logo

You are commenting using your WordPress.com account. Log Out / Ubah )

Twitter picture

You are commenting using your Twitter account. Log Out / Ubah )

Facebook photo

You are commenting using your Facebook account. Log Out / Ubah )

Connecting to %s


Ikuti

Get every new post delivered to your Inbox.