Dim hFile As File
Dim sLine As String

hFile = Open "/var/log/syslog"
For Each sLine In hFile.Lines
  If Instr(sLine, "[drm]") Then Print sLine
Next

Aug  6 04:44:44 Inspiron-530 kernel: [    1.895315] [drm] nouveau 0000:01:00.0: Detected an NV50 generation card (0x086300a2)
Aug  6 04:44:44 Inspiron-530 kernel: [    1.901186] [drm] nouveau 0000:01:00.0: Attempting to load BIOS image from PRAMIN
Aug  6 04:44:44 Inspiron-530 kernel: [    1.948417] [drm] nouveau 0000:01:00.0: ... appears to be valid
Aug  6 04:44:44 Inspiron-530 kernel: [    1.948420] [drm] nouveau 0000:01:00.0: BIT BIOS found
Aug  6 04:44:44 Inspiron-530 kernel: [    1.948423] [drm] nouveau 0000:01:00.0: Bios version 60.86.45.00
Aug  6 04:44:44 Inspiron-530 kernel: [    1.948426] [drm] nouveau 0000:01:00.0: TMDS table version 2.0
...

Voir aussi

EndOfLine