thanks atas penjelasannya fren, nah sekarang klo iterasi bisa ga ya ??..
contohnya gini, ada rangkaian huruf A sampe F misalnya.seperti ini
A
B
C
D
E
F
nah 3 baris kebawah secara kontinyu berpindah keatas, seperti ini
D
E
F
A
B
C
sampe kondisi menjadi semula seperti ini :
A
B
C
D
E
F
smoga jelas ya fren pertanyaanku ini, mohon bantuan ya ...
salam,
Lukman.
harisiswoyo <[EMAIL PROTECTED]> wrote:
Vb gak nyediain fungsi langsung utk mencari bilangan prima.
Utk mencari bilangan prima logikanya :
Bilangan prima = bilangan ganjil dimulai dari 2 dan bilangan itu hanya
habis dibagi oleh dirinya sendiri. artinya, ketika dapat 2 itu
bilangan prima, maka semua bilangan kelipatan 2 adalah bukan bilangan
prima.
Private Sub Command1_Click()
Form1.AutoRedraw = True
Dim a(20) As String
Dim Hasil(20) As Long
Dim b As Long
Dim c As Long
Dim d As Long
Dim tampung As Long
For b = 2 To 20
If a(b) <> "#" Then
d = d + 1
Hasil(d) = b
End If
tampung = b * 2
For c = tampung To 20 Step b
a(c) = "#"
Next
Next
For b = 1 To UBound(Hasil)
If Hasil(b) <> 0 Then
Form1.Print Str(Hasil(b)) + " "
End If
Next
End Sub
Regards.
--- In [email protected], Achmad lukman <[EMAIL PROTECTED]> wrote:
>
> dear all,
>
> ada ga yang pernah buat rumus bilangan prima di VB ??
> mohon bantuannya ya...
>
> salam,
> Lukman
>
>
> ---------------------------------
> Yahoo! Toolbar kini dilengkapi dengan Search Assist. Download
sekarang juga.
>
> [Non-text portions of this message have been removed]
>
---------------------------------
Yahoo! Toolbar kini dilengkapi dengan Search Assist. Download sekarang juga.
[Non-text portions of this message have been removed]
