contoh program penggunaan array dalam VB 6?
1. contoh program penggunaan array dalam VB 6?
' Declare a single-dimension array of 5 numbers. Dim numbers(4) As Integer
'Declare a single-dimension array and set its 4 values. Dim numbers = New Integer() {1, 2, 4, 8}
' Change the size of an existing array to 16 elements and retain the current values.ReDim Preserve numbers(15)
' Redefine the size of an existing array and reset the values.ReDim numbers(15)
' Declare a 6 x 6 multidimensional array.Dim matrix(5, 5) As Double
' Declare a 4 x 3 multidimensional array and set array element values. Dim matrix = New Integer(3, 2) {{1, 2, 3}, {2, 3, 4}, {3, 4, 5}, {4, 5, 6}}
' Declare a jagged array Dim sales()() As Double = New Double(11)() {}
2. 1 keunggulan vb2 fungsi window form dalam vb3 fungsi toolbox dalam vb4 contoh program yang dapat dibuat vbTolong jawab
Keunggulan
- Pengaksesan terhadap beberapa pustaka (library) yang dimiliki oleh sistem Windows.
- Sintaks lebih mudah dipahami.
- Fasilitas lebih lengkap mendukung user friendly dan multiuser.
- Kemampuan pengolahan desai grafis, dengan tampilan yang lebih sempurna dibanding aplikasi berbasis grafis.
- Kecepatan akses data dalam penanganan data yang benar jauh lebih cepat karena menggunakan query.
- Kemudahan dalam perluasan (plug-in) dengan software pendukung, seperti Crystal Report untuk desain laporan.
3. Minta saran buat program vb yang bagus dong, buat tugas saya?
bagaimana kalau Jadwal sholat sementara,, itu kan berisi koding perhiyungan posisi lintang bujur (y) recommendBuat app penjualan aja
4. bbbbbbbbbbbbbbbbbbb vb.
Jawaban:
b. harta bendanya
Penjelasan:
maaf kalo salah;)
5. suatu unsur dalam sistem periodik terletak pada golongan VB periode 4. Tentukan berapa jumlah elektron yang tidak berpasangan!
[Ar]4s² 3d³
kulit "d" punya 5 kotak, maksimal berisi 10 elektron, tp cm berisi 3, jd yg tdk berpasangan 7 elektron
6. cara menambah gambar pada form vb 6 ?
biasanya pada samping kanan terdapat categories/alphabetis,,,
nahh carii aja disitu ada picture,,,disitu kita tinggal masukin gambar yang memang mau kita masukin
samping kanan ada alphabetis, nah disana ada picture, tinggal masukin gambar pilihan mu
7. tugas pts kelas (vb)nanti aku follow ya beneran deh plisss:')jawab yang bener loh
36.Arca
37.SEJARAH
38.BAMBU RUNCING,GOLOK,KERIS,RENCONG
39.
merupakan semangat, kesadaran, dan kesetiaan bahwa suatu bangsa itu adalah suatu keluarga dan atas dasar rasa sebagai suatu keluarga bangsa
40.PAHLAWAN
41.Pekalongan, Solo, dan Semarang.
41.AGAR TIDAK DIAKUI OLEH BANGSA ASING,AGAR TETAP LESTARI DLL
jadi kan jawaban tercerdas ya kak
8. D3:6 PIOK7. Aktivitas di air dilakukan pada air yang ....
Jawaban:
jernih
Penjelasan:
#SEMOGA MEMBANTU$
Jawaban:
jernih dan higienis
Penjelasan:
semoga membantu
9. 18. Misalkan ada beberapa data di sel D3 sampai D12 Maka rumus yang diketikan di Ms. Excel untuk menghitung nilai rata rata adalah...A=SUM(D3:D12)B=MAX (D3:DI2)C. =MIN(D3:D12)D=AVERAGE (D3:D21)
Jawaban:
=AVERAGE(D3:D12)
Penjelasan:
untuk menghitung suatu rata-rata menggunakan average
10. Rumus yang diterapkan pada sel F3 adalah... A. D3*E3 B. D3/D3 C. D3-D3 D. D3+D3
B. D3/D3
maaf kalo salah yaa
11. Berikan contoh pembuatan program integrasi numerik menggunakan VB beserta langkah-
Jawaban:
Buatlah form baru pada VB dan beri nama form tersebut, misalnya "frmIntegrasi".Tambahkan dua textbox untuk menerima input nilai batas bawah (misalnya "txtBatasBawah") dan batas atas (misalnya "txtBatasAtas"), serta sebuah textbox untuk menerima input jumlah partisi (misalnya "txtJumlahPartisi").Tambahkan sebuah button dan beri nama "btnHitung" untuk memulai proses penghitungan.Tambahkan sebuah label untuk menampilkan hasil integrasi numerik (misalnya "lblHasil").Di dalam event handler button "btnHitung", tambahkan kode berikut:Dim batasBawah As Double, batasAtas As Double, jumlahPartisi As Integer
Dim deltaX As Double, x As Double, fX As Double, integral As Double
' Ambil nilai dari textbox
batasBawah = CDbl(txtBatasBawah.Text)
batasAtas = CDbl(txtBatasAtas.Text)
jumlahPartisi = CInt(txtJumlahPartisi.Text)
' Hitung deltaX
deltaX = (batasAtas - batasBawah) / jumlahPartisi
integral = 0
For i = 1 To jumlahPartisi
x = batasBawah + i * deltaX
fX = x ^ 2 + 2 * x + 1 ' Misalnya fungsi f(x) = x^2 + 2x + 1
integral = integral + fX
Next i
integral = (deltaX / 2) * (2 * integral + (batasBawah ^ 2 + 2 * batasBawah + 1) + (batasAtas ^ 2 + 2 * batasAtas + 1))
lblHasil.Caption = "Hasil integrasi: " & CStr(integral)
Di dalam kode tersebut, kita menggunakan variabel "batasBawah" dan "batasAtas" untuk menyimpan nilai batas bawah dan batas atas, "jumlahPartisi" untuk menyimpan jumlah partisi, "deltaX" untuk menyimpan lebar setiap partisi, "x" untuk menyimpan nilai x pada setiap partisi, "fX" untuk menyimpan nilai f(x) pada setiap partisi, dan "integral" untuk menyimpan hasil penjumlahan f(x) pada setiap partisi.Setelah itu, kita mengambil nilai dari textbox "txtBatasBawah", "txtBatasAtas", dan "txtJumlahPartisi" dan menghitung deltaX dengan cara membagi selisih batas atas dan batas bawah dengan jumlah partisi.Selanjutnya, kita menggunakan loop "For" untuk melakukan perulangan sebanyak jumlah partisi. Pada setiap iterasi, kita menghitung nilai x dengan cara menambahkan i dikali deltaX pada batas bawah, dan nilai fX dengan cara menghitung fungsi f(x) pada nilai x tersebut.Kita tambahkan nilai fX ke dalam variabel "integral" untuk menghitung hasil penjumlahan f(x) pada setiap partisi.Setelah loop selesai, kita menghitung hasil integrasi numerik dengan menggunakan rumus metode trapesium dan menampilkan hasilnya pada label12. 27. Gradien dari garis yang melalui titik (0, 0) dan (-2, 6) adalah . A. -3 B. -1/3 c.1/3 d328. Gradien garis yang melalui titik (2. 0) dan (0, -10) adalah ... A.-4. c1/5 b-1/5 d5
Jawaban:
27.Gradien dari garis yang melalui titik (0, 0) dan (-2, 6) adalah.
B.-1/3
28.Gradien garis yang melalui titik (2. 0) dan (0, -10) adalah.
C.1/5
13. Contoh Coding "cari" pada Vb net yang simple?
Dim j As Integer
For j = 0 To y - 1
If x(j) = z Then
Return j
End If
Next
Return -1
Jika ditemukan, maka return index data, selain itu return -1.
NB: kode itu untuk fungsi. jika tidak dalam fungsi, ubah return menjadi kode yang diinginkan.
14. Suatu unsur memiliki elektron terakhir pada n = 3, l = 2, m = 0, dan s = + 1/2. Jika pengisian elektron pada sub kulit d berturut-turut dimulai dari m = -2, -1, 0, +1 dan + 2, maka unsur tersebut berada pada periode dan golongan ...A4, VBB4, IVBC4, IIIBD3, IIIBE3, VB
Jawaban:
Golobgan VB periode 4
Penjelasan:
Terlampir
15. .Untuk merasionalkan bentuk 1/a-Vb,Maka pembilang dan penyebutnyadikalikan dengan .......a. Va-bb. a-Vbc. a+Vbd. Va+be. Va+Vb
Jawaban
[tex]\boxed{a + \sqrt{b} }[/tex] (Opsi C)
.
Langkah penyelesaian
[tex]\frac{1}{a - \sqrt{b} }[/tex]
[tex]= \frac{1}{a - \sqrt{b} } \times \frac{a + \sqrt{b}}{a + \sqrt{b} }[/tex]
[tex]= \frac{a + \sqrt{b}}{a^2 - b }[/tex]
Jawaban:
hasilnya adalah a+√b
jawaban terlampir pada foto terima kasih
16. berikan contoh pengakuan d3 facto dan de jure
de facto = adalah pengakuan berdasarkan fakta contoh : indonesia merdeka pada tanggal 17 agustus 1945
de jure = adalah pengakuan terhadap suatu negara menurut hukum internasional. Dengan pengakuan itu negara baru itu mendapat hak hak dan kewajiban sebagai anggota masyarakat internasional
17. Tentukan beda untuk setiap barisan atitmetika berikut ini a 17,27,37,47,57, b -6,-1,4,9,14,19c48,32,16 ,0,-16 d3,-1,-5,-9,-13 e 0,-2,-4,-6,-8
a. nilai b = 27 - 17 = 10
b. nilai b = -1 - (-6) = 5
c. nilai b = 32 - 48 = -16
d. nilai b = - 1 - 3 = -4
e. nilai b = -2 - 0 = -2
18. 1 Terdapat interpretasi J atas domain D = {0, 1, 2, 3, 4, 5, 6}, sedemikian hingga {b ← 3, y ← 6, z ← 0, f ← fI(d1, d2, d3) = 2(d2 d1) - d3 (mod 7), p ← pI(d1, d2): (d1 d2)
Berdasarkan interpretasi yang saya asumsikan dari pertanyaan tersebut, terdapat sebuah fungsi dengan beberapa variabel dan operasi matematika.
PembahasanSaya akan menjelaskan interpretasi langkah demi langkah:
Variabel:
b = 3
y = 6
z = 0
Fungsi:
fI(d1, d2, d3) = 2(d2 d1) - d3 (mod 7)
Ini adalah sebuah fungsi dengan tiga variabel: d1, d2, dan d3. Notasi "(d2 d1)" mungkin mengindikasikan operasi penggabungan atau penggabungan digit dari d2 dan d1, tetapi tidak ada informasi yang lebih lanjut dalam pertanyaan. Fungsi ini mengembalikan hasil dari ekspresi 2(d2 d1) - d3, diikuti oleh operasi modulo 7.
Variabel lain:
p = pI(d1, d2): (d1 d2)
Ini mungkin merupakan definisi variabel p sebagai hasil dari fungsi pI(d1, d2) yang mengambil dua argumen: d1 dan d2. Ekspresi "(d1 d2)" mungkin mengindikasikan penggabungan atau penggabungan digit dari d1 dan d2.
Pelajari lebih lanjutMateri tentang variabel dan operasi matematika https://brainly.co.id/tugas/45938702
#BelajarBersamaBrainly
#SPJ1
19. Berapakah a dan b jika D3 =180 dan S4=0
Sn=n/2(2a+(n-1)b)
S3=3/2(2a+(3-1)b)=3/2(2a+2b)=180
2a+2b=180x2/3=120..........(1)
s4=4/2(2a+(4-1)b)=2(2a+3b)=0
2a+3b=0..................................(2)
elim pers 1 dan 2
2a+2b=120
2a+3b=0
--------------- -
-b =120
b =-120
2a+3b=0
2a+3(-120)=0
a=360/2
a=180
jadi, nilai a=180 dan b=-120
(maaf kalo salah : ))
20. Dik : Va=0 T=4 detik G=10 m/s² Dit : H? Vb?
JAWAB:
a.)h=V0×t+1/2gt²
=0×4+1/2×10×4²
=0+80
=80M
b.)Vt=Vo+gt
Vt=0+10.4
=40m/s
semoga membantu:)
# sharing is caring #
21. dijawab pake cara5. 0,50 - 25% =ini nomor terakhirkls : VB
Jawaban:
0.50−25%
=0.375
Penjelasan dengan langkah-langkah:
SEMOGA BERMANFAAT
DI JAWAB @UserNameThisBro
SOAL :0,50 - 25% =
JAWAB :[tex]0.50 - 25\% \\ \\ = \frac{50}{100} - \frac{25}{100} \\ \\ = \frac{50 - 25}{100} = \frac{25}{100} = \frac{1}{4} [/tex]
⚡SEMOGA MEMBANTU⚡✌MAAF KALAU SALAH✌
22. perhatikan grafik perpindahan terhadap waktu berikut. berdasarkan grafik tersebut, dapat disimpulkan bahwa... a. VA > VB b. VA < VB c. VA = VB d. VA ≥ VB e. VA ≤ VB
B. VA < VB
SORRY KALAU SALAH YA !!
23. Berikan contoh limbah D3
sampah pabrik, sampah rumah tanggaitu soalnya limbah D3 / B3?
ini B3
a. Pengharum ruangan
b. Pemutih pakaian
c. Deterjen Pakaian
d. Pembersih kamar mandi
e. Pembesih kaca/jendela
f. Pembersih lantai
g. Pengkilat kayu
24. D314. Persamaan garis yang melalui titik (0, 1)dan sejajar dengan garis 4x + 3y = 7adalah ....
// 4x + 3y = 7 melalui (0,1)
4x + 3y = 3
25. hasil dari 10=2(Vb'-50)+Vb'
10 = 2(Vb' - 50) + Vb'
10 = 2Vb' - 100 + Vb'
10 = 3Vb' - 100
110 = 3Vb'
36,66 = Vb'
Semoga membantu yaaa ☺
26. Gerak dua buah benda A dan B dilukiskan dengan grafik seperti pada gambar disamping ini. Kedua benda tersebut masing – masing mempunyai besar kecepatan …. a. vA = 6 m/s dan vB = 10 m/s b. vA = 6 m/s dan vB = 6 m/s c. vA = 10 m/s dan vB = 10 m/s d. vA = 10 m/s dan vB = 6 m/s e. vA = 90 m/s dan vB = 150 m/s
Jawaban:
Kecepatan a
va = s : tva = 30 : 3va = 10 m/sKecepatan b
vb = s : tvb = 30 : 5vb = 6 m/sKecepatan a dan b
va = 10 m/s dan vb = 6 m/s (C) ✔
___________________________________________
Semoga membantu :)
[tex] > - < [/tex]
27. Jika c dan d akar-akar persamaan x2 + cx + d = 0, maka c3 – d3 = …
Jawaban:
9 atau 0
Penjelasan:
28. Program VB dari 2 4 6 8 2 4 6 2 4 2
for x=8 to 2 step -2
for y=2 to x step -2
next
next
29. di bawah ini contoh extensi aplikasi portable adalah ... *.doc.xls.exe.vb.phpdi bawah ini contoh extensi paket software adalah *.xls.doc.exe.php.vb
dua duanya berformat .exe (untuk windows)
.deb (untuk debian dan ubuntu)
.rpm (untuk fedora)
30. Program VB dari 2 4 6 8 2 4 6 2 4 2
20,57,42,80,70 dan 65
31. Jika nilai diskriminan dari 4x² - 11x + 2a = 0 adalah 25, maka nilai a adalah... O a. 6 O b. -3 O c. -11 O d3 m 43
Penjelasan dengan langkah-langkah:
Persamaan kuadrat = 4x² - 11x + 2a = 0
D = b² - 4ac
25 = (-11)² - 4(4)(2a)
25 = 121 - 32a
32a = 121 - 25
32a = 96
a = 3
Maka nilai a adalah 3
Koreksi kalo salah
Kalo benar jadikan jawaban tercerdas ya
32. kata kerja vb+suffix=noun+meaning Masing masing 3 contoh
1. attach + ment = attachment = lampiran
please enclose the attachment when you send the email.
2. decorate + ion = decoration = hiasan
john is setting up the decoration for the party.
3. teach + er = teacher = guru
the teacher is explaining new material now
33. berapakah A dan B jika D3 =180 dan S4 =0
D3=180
dan S4 = 0
D3 = 3/2(S3+S1)
S4 = a+3b
0= a+3b
a= -3b
180= 3/2(a+2b+a)
180x2/3= 2a +2b
360/3 = 2a + 2b
120 = 2a + 2b
subtitusikan
120= 2(-3b) + 2b
120= -4b
b= -30
dan
a= -3(-30)
a= 90
34. Perhatikan data tabel berikut, Jika kamu ingin mengisi kolom LAMA PIJAM MAKA rumus pertama yang harus ditulis di sel F3 adalah.....5 poin=D3+E3=D3-E3=E3-D3=E3+D3
Jawaban:
=E3-D3
Tanggal pada E3 akan dikurangi dengan D3
35. DIKET : mA = 2000 kg mB = 3000 kg VA = 0 m/s VB = 25 m/s VA' = VB' = V' DITANYA : V '=....?
Penjelasan:
DIKET :
mA = 2000 kg
mB = 3000 kg
VA = 0 m/s
VB = 25 m/s
VA' = VB' = V'
DITANYA : V '=....?
JAWAB:
mA .VA + mB. VB = (mA + mB).V'
2000. 0 + 3000. 25 = (2000+3000).V'
0+ 75000 = 5000.V'
V' = 75000/5000
= 15 m/s
36. periode 6 golongan 5 vB Ta 73
tantalum
nomor atom 73
massa atom 180.95
37. nilai predikat 91-100 A 81-90 B 71-80 C 51-70 D31-50 E0-30 FNilai predikat71 CJabarkan rumus axcel IF berikut.IF(D3>90;"A";)IF(D3>80;"B";)IF(D3>70;"C";)IF(D3>50;"D";)IF(D3>30;"E";"F")
Jawaban:
IF(D3>50;"D";)
IF(D3>50;"D";)
IF(D3>50;"D";)
38. Dua bola masing-masing mempunyai massa mA = mB = 5 kg dan bergerak pada suatu garis lurus dalam arah berlawanan dengan kecepatan vA = 4 m/s dan vB = 6 m/s, seperti gambar di bawah, kemudian bertumbukan lenting sempurna.Kecepatan masing-masing benda sesaat setelah tumbukan adalah … .A. vA' = 2 m/s dan vB' = 2 m/s searahB. vA' = 2 m/s dan vB' = 2 m/s berlawanan arahC. vA' = 4 m/s dan vB' = 6 m/s berlawanan arahD. vA' = 6 m/s dan vB' = 4 m/s berlawanan arahE. vA' = 10 m/s dan vB' = 0 m/s searah gerak mula-mulatolong bntu ya dengan cara
Jawaban:
Hukum Kekekalan MomentumM.Va + M.Vb = M.Va' + M.Vb'
4 + 6 = Va' + Vb' (Massa dicoret, Karena Sama)
Va' + Vb' = 10
Koef Restitusi[tex] - \frac{(Va' - Vb') }{va - vb} = 1 \\ \frac{ - Va' + Vb'}{4 - 6} = 1 \\ - Va' + Vb' = - 2 \\ Vb' = - 2 + Va' [/tex]
Va' + Vb' = 10
Va' + (-2+Va') = 10
Va' -2 + Va' = 10
2Va' = 12
Va' = 6 m/s
Substitusi Va'
Va' + Vb' = 10
6 + Vb' = 10
Vb' = 4 m/s
Jawaban : D
39. Pendidikan Terakhir :SDSMPSMAD3S1S2S3Ini Maksudnya apa yh ?
Menanyakan pendidiksn terakhir yg kita tempuh.
Sarjana tertinggi adalah S3
40. TULISKAN RUMUS SEL D3 DAN HASIL SEL D3
Jawaban:
nda tau lh
penjelasan:saat terima gaji
