Új hozzászólás Aktív témák

• #33015 lenkei83 tag Pakliman #33014

  Új Válasz 2016-10-20 09:11:08 #33015

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  lenkei83

  tag

  válasz Pakliman #33014 üzenetére

  Szia!

  Logikailag értem, csak mégsem. Valamiért mindig nullát dob.

  Hova kell a seek, vagy mit kell máshogyan?

  üdv
  P.

  Dim LineofText As String
Dim rw As Long
rw = 0
Do While Not EOF(xx)
Line Input #xx, LineofText
rw = rw + 1
Loop
Close #xx
MsgBox rw

Új hozzászólás Aktív témák