Mengenal Bahasa BASIC dan Sejarahanya

Bahasa BASIC adalah bahasa pemroragraman Tingkat Tinggi yang diseain khusus untuk pemula. Di kelompokan ke dalam bahasa Tingkat Tinggi karena penerpan bahasa pemrograman BASIC menggunakan kata - kata yang biasa dipakai manusia.

BASIC adalah singkatan dari Beginners’ All-purpose Symbolic Instruction Code atau dalam bahasa indonesia diartikan  sebagai  "kode instruksi simbolis semua tujuan yang dapat digunakan oleh para pemula"

Read More

Form Vb.Net dengan DotNetBar

DotNetBar adalah kumpulan ToolBox tambahan untuk desain Form Vb.Net dari DevComponents

dengan DotNetBar  tampilan form vb.net kita, kelihatan lebih cantik. Beberapa contohnya.


Gbr. Model2 Button

Read More

Tips Install Gambas3 Ubuntu

Gambas adalah software pemrograman visual bahasa basic di Linux, Gambas dibuat terinspirasi dari Visual Basic di windows dan Java.

Versi terbaru sekarang Gambas3, tentunya dengan peningkatan - peningkatan dari versi sebelumnya.

Read More

Install Gambas Ubuntu

Gambas adalah pemrograman bahasa basic berbasis GUI yang jalan ubuntu

untuk menginstallnya ketikan pada terminal

$sudo apt-get install gambas2

kemudian ubah kepemilikan direktory examples di /usr/share/gambas2, agar kita bisa menggunakan program - program contoh yg sudah disediakan

$cd /usr/share/gambas2
$sudo chown -R user:user examples

Ganti user dengan user name ubuntu kamu.

 Jalankan gambas -> klik Contoh -> kemudia klik nama project di daftar. . . .

Read More

Cara Mudah Mengetahui Spesifikasi Komputer dengan Vb 6.0

Tambahkan Form About Dialog, caranya Klik Project -> Add From -> Pilih About Dialog -> Klik Open



Coba Run form About kemudian Klik Sys Info . . bingo MSinfo nya kebuka

Klo butuh codingnya tinggal copy procedure Public Sub StartSysInfo() isi nya spt dibawah ini

 

Public Sub StartSysInfo()
On Error GoTo SysInfoErr

Dim rc As Long
Dim SysInfoPath As String

' Try To Get System Info Program Path\Name From Registry...
If GetKeyValue(HKEY_LOCAL_MACHINE, gREGKEYSYSINFO, gREGVALSYSINFO, SysInfoPath) Then
' Try To Get System Info Program Path Only From Registry...
ElseIf GetKeyValue(HKEY_LOCAL_MACHINE, gREGKEYSYSINFOLOC, gREGVALSYSINFOLOC, SysInfoPath) Then
' Validate Existance Of Known 32 Bit File Version
If (Dir(SysInfoPath & "\MSINFO32.EXE") <> "") Then
SysInfoPath = SysInfoPath & "\MSINFO32.EXE"

' Error - File Can Not Be Found...
Else
GoTo SysInfoErr
End If
' Error - Registry Entry Can Not Be Found...
Else
GoTo SysInfoErr
End If

Call Shell(SysInfoPath, vbNormalFocus)

Exit Sub
SysInfoErr:
MsgBox "System Information Is Unavailable At This Time", vbOKOnly
End Sub

Read More