kalo valnya diganti CInt ? SOL
On 11/28/06, Frangky <[EMAIL PROTECTED]> wrote:
Teman-teman yg terhormat!
Saya menggunakan code dibawah ini:
Private Sub Command1_Click()
Dim i As Integer
For i = 1 To 10
Print i
Next
End Sub
Dengan code diatas maka pada form akan tercetak 1 sampai 10.
*Masalahnya setelah saya ubah code seperti dibawah ini, pada form hanya
tercetak Angka 0 (nol).*
Padahal yang saya ingin harus tercetak angka 1 sampai 10, karena pada*text1
*saya sudah input angka *1 *dan pada *text2 *saya input angka *10.*
Private Sub Command1_Click()
Dim i As Integer
For i = *Val(" & text1 & ") To Val(" & text2 & ")*
Print i
Next
End Sub
