Ako previesť desatinné miesta na binárne VBA

VBA je programovací jazyk vytvorený spoločnosťou Microsoft . VBA je jednoduchá a rýchla učiť . Jazyk je považovaný za menej komplikované ako iné programovacie jazyky , ale VBA stále obsahuje mnoho rovnakých konštrukcií ako sú tradičné programovacie jazyky . Pomocou VBA programátori môžu vytvoriť všetky druhy programov , a to aj tých , ktoré previesť desatinné binárne informácie . Vytvorenie program , ktorý prevádza desatinné čísla na binárne vyžaduje pochopenie konceptu a programovanie VBA , ale akonáhle získal by mala trvať len niekoľko krokov nasledovať . Pokyny dovolená 1

Otvorte aplikáciu Microsoft Word .
2

Kliknite na " Nástroje " , " Makro " a potom kliknite na tlačidlo " Visual Basic " . Teraz ste vo VB editore .
3

Kliknite na " Vložiť " , " Modul " . Teraz ste v programovacom module kóde
4

Zadajte alebo skopírujte a vložte nasledujúci čiastkové postupy v module kódu : .

Public Function BinaryToDecimal ( Binary As String ) As Long

Dim n As Long

Dim s As Integer

s = 1 Ľan ( binárne )

n = n + ( Mid ( binárne , Ľan ( binárne ) - s + 1 , 1 ) * ( 2 ^ _

( y - 1 ) ) )

Next s

BinaryToDecimal = n

End Function

• Predchádzajúca strana: Ako odstrániť špeciálne znaky z VB String 
• Ďalšia strana: Ako používať Tvar príkazu v jazyku Visual Basic 6