1. - Barang yang diperjualbelikan berwujud (nyata)
-
Barang yang diperjualbelikan dapat
ditukar atau dikembalikan berdasarkan perjanjian
-
Perusahaan dapat dengan mudah menentukan
harga pokok penjualan
Pernyataan diatas merupakan ciri-ciri
dari …
a.
Perusahaan
dagang
b. Perusahaan manufaktur
c. Perusahaan jasa
d. Perusahaan swasta
2. Timbulnya
piutang dagang karena adanya penjualan barang dagangan secara kredit, penjual
akan menerima pembayaran dari pembeli apabila …
a. Hutang
b. Penjualan kredit
c. Penjualan Tunai
d.
Piutang
telah jatuh tempo
3. Data
perusahaan dagang “Sentosa” pada bulan Desember 2005 sebagai berikut :
·
Persediaan barang dagang
Per
1 Des 2005 Rp 200.000
Per
31 Des 2005 Rp 300.000
·
Pembelian Rp 1.500.000
·
Retur pembelian Rp 100.000
·
Beban angkut pembelian Rp 150.000
·
Pot. Pembelian Rp 50.000
Dari
data diatas besarnya Harga Pokok Penjualan (HPP) adalah ..
a. Rp
1.200.000
b. Rp 1.500.000
c. Rp 1.400.000
d. Rp
1.700.000
4. 17
Juni 2004 diterima pembayaaran piutang dari Tn Abadi sebesar Rp 15.000.000.
Transaksi tersebut di catatat dalam jurnal khusus ..
a. Penjualan
Kas
b. Pembelian
c.
Penerimaan
Kas
d. Pengeluaran
kas
5. Yang
termasuk ke dalam Harta Lancar adalah :
a. Kas, Piutang Dagang, Wesel Tagih, Piutang Bunga
b. Tanah,
Gedung, Peralatan toko, Peralatan kantor
c. Hutang
dagang, Wesel bayar, Hutang pajak penghasilan, Hutang bunga
d. Pembelian,
Pot. Pembelian, Retur pembelian, Beban angkut pembelian
6. Apa
yang dimaksud dengan Data Base pada Visual Basic dan bagaimana cara membuat
Data Base?
a. Suatu record mempunyai bentuk atau format record yang
beranekan ragam, yang bukan merupakan suatu format record.
b. sebuah
kotak dialog yang anda akses dari jendela formulir dengan menekan Tools / Menu
Editor dari menu bar Visual Basic sendiri.
c. Database adalah kumpulan beberapa
data yang saling berhubungan berdasarkan kode-kode tertentu sehingga membentuk
sebuah system.
d. Program yang di tulis untuk mengendalikan dan
mengkoordinasikan kegiatan dari system computer.
7. Tuliskan
codingan untuk menghasilkan output Bold …
a.
Private
sub check1_click ()
Label4.fontBold= True
If Check1.value = 0 Then
Label4.fontBold = False
End
if
End sub
b.
Private sub check1_click ()
Label4.fontBold=
Flse
If
Check1.value = 0 Then
Label4.fontBold
= True
End if
End sub
c.
Private sub Option1_click ()
Label4.fontBold=
True
If
Check1.value = 0 Then
Label4.fontBold
= False
End if
End sub
d.
Private sub check1_click ()
Label4.fontBold=
True
If
Check1.value = 0 Then
Label4.fontBold
= False
End sub
8.
Jika
maenggunakan objek data, untuk koneksi ke database, maka properties yang akan
di ubah adalah :
a.
ConnectingString
dan RecordSource
b.
ConnectingString
dan DataSource
c.
DatabaseName dan DataSource
d.
DatabaseName dan RecordSource
9.
Untuk
mendeklarasikan variable database yang telah dibuka sintaknya adalah :
a.
Set
dbMahasiswa as Database
b.
Set dbMahasiswa = OpenDatabase(App.Path & “\siswa.mdb”)
c.
Set
dbMahasiswa = OpenDatabase.OpenRecordset(App.Path & “\siswa.mdb”)
d.
Set
dbMahasiswa = OpenDatabase.Recordset (App.path & “\siswa.mdb”)
10. Untuk mendeklarasikan variable tabel yang telahdi buka
sintaknya adalah :
a.
Set rssiswa = dbMahasiswa. OpenRecordset (“siswa”)
b.
Set
rssiswa = dbMahasiswa. Recordset (“siswa”)
c.
Set
dbMahasiswa = OpenDatabase.OpenRecordset(App.Path & “\siswa.mdb”)
d.
Set
dbMahasiswa = OpenDatabase.Recordset (App.path & “\siswa.mdb”)
NAMA :
TIKA AGUSTIN MUJAYATI
NPM :
47211113
KELAS :
2 DA 03
DOSEN :
SYATANTRA
MATA KULIAH :
PEMROGRAMAN AKUNTANSI 1 */**
