Code:

Public Sub ShuffleArray(ByRef vArray As Variant, Optional startIndex As Variant, _
    Optional endIndex As Variant)
    Dim I As Long
    Dim rndIndex As Long
    Dim Temp As Variant

    If IsMissing(startIndex) Then
        startIndex = LBound(vArray)
    End If

    If IsMissing(endIndex) Then
        endIndex = UBound(vArray)
    End If

    For I = startIndex To endIndex
        rndIndex = Int((endIndex - startIndex + 1) * Rnd() + startIndex)
        Temp = vArray(I)
        vArray(I) = vArray(rndIndex)
        vArray(rndIndex) = Temp
    Next I
End Sub

gini ta maksute bro????

binggo .. It dy bro swett ae msh pengen bgt bs tp jelasin dikt dng bro , it coding buat keseluruhan event ap cm buat event tertentu aj um swet .. ??? Plz

Ae bikin 10 x 10 winsock buat konek alhmdulilah bs um , nah pas mu buat login nya ae gagal molo ..

Qlo ad conth coding buat login nya um .. Tiap ae nyoba pzt ae salah mulu
Gatoott !!! Btw thx um swet

Temand" yg lain share dong ilmunya ...

yow bro sama2. . .sebenere Q mau jawab kmren tapi Q kan nunggu kang heLm duLu gmn enaknya. . .takutnya aq salah. . .hehehehehe. . .

wew ga mudeng he he VB << tar ja blajarnya ah mw blajar AHK dulu nech

good posting

ok kang. . . .ckakakakakakakaka. . . . .

aku pasti bisa

gagagaggagaga....................................................................

katae temenku se pake vb6 katae vb paling basic tp aq sendiri mumet jg kalo maen vb

maaf ya ane leh ikut jwb?........

setelah ane blajar bkin app dari SOURCE CODE MIG33 TCP (VISUAL BASIC)
emang pertama cm bisa login 1 nik aja.

setelah ane pkirn lg ane bikin yang login 1 nick itu ane gandain jadi 10 txtbox buat 10 nick dan pake 10winsok , ternyata berhasil tapi ad efeknya

pas form di run ternyata berat.

setelah ane banyak nanya ma yang udah pengalaman ternyata ga usah menggunain 10winsok tapi cukup make 1 winsok tapi di copas/di array.


maaf kalo salah

nah bro. . . .itu bener bgt. . .jd justru winsocknya itu menambahkan beban ajah. . .(kalo di gandain)

wahhhh jd penasaran ni mau buat app juga

hmmmmmmmmmmmmm

nope dunk biar lebih mudeng ckakakakak