Untuk menangkap parameter program bisa menggunakan fungsi Command atau
Command$.
misalnya kalau mau memasukkan parameter ke listbox
--------------------------------
Option Explicit
Dim Params(10) As String
Dim i, c As Integer
Dim t As String
Private Sub Form_Load()
Me.Caption = Command$
'masukkan parameter ke listbox
For c = 1 To Len(Command$)
t = Mid$(Command$, c, 1)
If t <> " " Then
Params(i) = Params(i) & t
Else
List1.AddItem Params(i)
i = i + 1
End If
Next c
End Sub
--------------------------------
--- In [email protected], Dian Rahmadi <[EMAIL PROTECTED]> wrote:
>
> Salam semua
>
> Mohon pencerahannya, bagaimana caranya kirim parameter / argumen
ke sub main pada module sehingga pemanggilan program EXEnya harus
menyertakan argumen.
>
>
> ---------------------------------
> Apakah Anda Yahoo!?
> Kunjungi halaman depan Yahoo! Indonesia yang baru!
>
> [Non-text portions of this message have been removed]
>
Untuk berhenti berlangganan kirim email kosong ke : [EMAIL PROTECTED]
Bagi terjangkit virus lokal, zip virus tersebut
dan kirim ke [EMAIL PROTECTED], kami
akan membuat removalnya untuk anda.
Yahoo! Groups Links
<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/indoprog-vb/
<*> Your email settings:
Individual Email | Traditional
<*> To change settings online go to:
http://groups.yahoo.com/group/indoprog-vb/join
(Yahoo! ID required)
<*> To change settings via email:
mailto:[EMAIL PROTECTED]
mailto:[EMAIL PROTECTED]
<*> To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/
