Jump to content
Sign in to follow this  
erezlevi

VB to AutoIT again...

Recommended Posts

erezlevi

hi,

how can I write the following with AU3:

For i = 1 To 40
    Debug.Print Mid(s, i, 1) & "=" & Asc(Mid(s, i, 1))
Next

without the Debug.Print...is there a Mid function I don't see it.

Share this post


Link to post
Share on other sites
Swift

what does Debug.Print Mid...? ive never learned VB and dont plan too :D

Share this post


Link to post
Share on other sites
weaponx

ConsoleWrite()

StringMid()

Asc()

Share this post


Link to post
Share on other sites
erezlevi

what does Debug.Print Mid...? ive never learned VB and dont plan too :D

well you should it is the basics of all. there are some things that you can't do with AutoIT but only with VB and C++.

Share this post


Link to post
Share on other sites
erezlevi

ConsoleWrite()

StringMid()

Asc()

Thanks alot. I had to use this until you made your post:

#include <File.au3>
#include <Array.au3>

Dim $L[5000]
Dim $MM[5000]

$file=FileOpen ("c:\erez.txt",1)
$m=FileReadLine ("c:\erez.txt",1)
$J=$m
MsgBox (0,"",StringLen ($m))
for $i=1 to StringLen ($m)
    $L[$i]=StringLeft ($m,1)
    $m=StringTrimLeft ($m,1)
;   MsgBox (0,"",$m)
Next
_ArrayDisplay ($L)
for $i=1 to StringLen ($J)
    $MM[$i]=Asc ($L[$i])
Next
_ArrayDisplay ($MM)
Edited by erezlevi

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
Sign in to follow this  

×

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.