kenapa ngga for i = val(text1.text) to val(text2.text)

  ----- Original Message ----- 
  From: Frangky 
  To: [email protected] 
  Sent: Tuesday, November 28, 2006 3:47 PM
  Subject: [Programmer-VB] Perintah For...Next bermasalah



  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

   

Kirim email ke