If Then Else

Private Sub Command1_Click()
Dim harga As Currency
harga = 0
If jeniskamar(0).Value Then
harga = harga + 150000
ElseIf jeniskamar(1).Value Then
harga = harga + 250000
ElseIf jeniskamar(2).Value Then
harga = harga + 450000
End If
If fasilitas(0).Value Then
harga = harga + 50000

Read More

Digital Time

Private Sub Command1_Click()
End
End Sub

Private Sub Command3_Click()
If Command3.Caption = "&stop" Then
Command3.Caption = "&start"
Timer2.Enabled = False
Else
Command3.Caption = "&stop"
Timer2.Enabled = True
End If
End Sub

Read More

Select Case

Dim NilaiTm As Integer
Dim NilaiMid As Integer
Dim NilaiFinal As Integer
Dim NilaiAkhir As Integer
Dim Grade As String

Private Sub Command1_Click()
NilaiTm = Val(Text1.Text)
NilaiMid = Val(Text2.Text)
NilaiFinal = Val(Text3.Text)
NilaiAkhir = NilaiTm * 0.2 + NilaiMid * 0.3 + NilaiFinal * 0.5
Select Case NilaiAkhir

Read More

Form Login VB to Access

Dim con As New ADODB.Connection
Dim rs As New ADODB.Recordset
Dim SQL, Pesan As String

Private Sub Command2_Click(Index As Integer)
    If Text1.Text = "" Then
        MsgBox "Masukkan Username dengan benar", vbInformation
        Text1.SetFocus
        Exit Sub
    End If
    If Text2.Text = "" Then
        MsgBox "Masukkan Password dengan benar", vbInformation
        Text2.SetFocus
        Exit Sub

Read More

GNOME 3.0 Rescheduled for September 2011 Release

April 1, 2011 — BANGALORE, India — The GNOME Release Team met in India this week to discuss the state of GNOME 3. The Release Team came to a consensus opinion that one more cycle will be required before GNOME 3.0 is ready to be released. The decision was communicated to and approved by the GNOME Foundation Board on a conference call. 

The delay of the release comes for a number of reasons. The primary indicator of the unreadiness of the release is the massive number of exceptions that have been requested and granted during the hard code freeze period. There have been several last-minute API changes that have the potential to harm the stability of the release. 

The recent announcement that the Mozilla project would discontinue support for embedding has cast doubts on the technical underpinnings of the new GNOME shell. There are also concerns about the frequently shifting visual design and questions about its performance and portability. The release team is also concerned about the possible near-future release of GTK4 and what that means for GNOME as a development platform. 

Foremost, the GNOME project is committed to only releasing the highest quality software. Dozens of release-critical blocker bugs remain open with little chance of being fixed by the time of the release. 

At this time, there will be no new release in the 2.x series and all developer effort will focus on improvements to GNOME 3.0. The release is being delayed for a full 6 months to avoid scheduling problems for our downstream distributors. During this 6 month period, we will reopen module proposals in the usual way. We are particularly encouraging module proposals from alternate desktop shells, which will be given careful consideration. 

The Release Team would like to thank the developers who continue to put tremendous amounts of work into the GNOME project. The level of the quality of the code is at the highest that it has ever been and there is no doubt that we will easily have the best desktop on the planet by September 2011.

About GNOME and the GNOME Foundation

GNOME is a free-software project whose goal is to develop a complete, accessible and easy to use desktop for Linux and Unix-based operating systems. GNOME also includes a complete development environment to create new applications. It is released twice a year on a regular schedule. 

The GNOME desktop is used by millions of people around the world. GNOME is a standard part of all leading GNU/Linux and Unix distributions, and is popular with both large existing corporate deployments and millions of small business and home users worldwide. 

Composed of hundreds of volunteer developers and industry-leading companies, the GNOME Foundation is an organization committed to supporting the advancement of GNOME. The Foundation is a member directed, non-profit organization that provides financial, organizational and legal support to the GNOME project and helps determine its vision and roadmap.

This news come frome official gnome's site

Read More

Cara Mengetahui Hardware Komputer

Ada beberapa teman yang suka menanyakan pada saya. "Gimana sih cara kita mengetahui hardware yang ada pada komputer dengan sistem ubuntu?" Ada juga yang nulis di kolom komentar tentang hal yang mirip itu. Disini misalnya. Nah gak ada salahnya kita coba untuk mencari solusinya. Betul? hehee..

1. Install Hardware Info - hwinfo

Diterminal ketikkan :

sudo apt-get install hwinfo

Cara menjalankan program tersebut, cukup kita ketikkan :

hwinfo. Atau hwinfo --help untuk mengetahui detil penggunaannya

Eksekusi hwinfo

Dengan hwinfo kita juga bisa mengetahui port mana yang digunakan oleh hardware kita jo.. :)

2. Install gnome-device-manager

gnome-device-manager adalah salah satu aplikasi berbasis grafis yang berguna untuk mengetahui hardware dari komputer kita. Untuk menginstallnya ada dua cara. Kita bisa dengan 

* Text Command

sudo apt-get install gnome-device-manager

* Synaptic

Buka System | Administration | Synaptic Package Manager

Dengan mengetikkan key gnome-device-manager Klick Apply.

Untuk menjalankannya Application | System Tools | Device Manager

gnome-device-manager

Read More