Hilfe!!! Programmierung C++ und Visual Basic

magik

Hi, ich hoffe mir kann jemand helfen ein Programm von Visual Basic in C/C++ umzusetzen
Hier ist das Programm:
Private Sub PolyCode_Click()
Dim i As Integer
Dim n As Byte
Dim b As String
Dim key(1 To 10) As Byte
TBCode = ""
If TBKey = "" Then TBKey = "a"
For i = 1 To Len(TBKey)
b = UCase(Mid(TBKey, i, 1))
key(i) = Asc(b) - 65
Next
For i = 1 To Len(TBQuelle)
b = UCase(Mid(TBQuelle, i, 1))
n = Asc(b)
If (n>64) And (n<92) Then
n = n+key((i-1) Mod Len (TBKey)+1)
If n>90 Then n = n-26
b= Chr(n)
End If
TBCode = TBCode & b
Next
End Sub

Das was: Danke

:confused::confused:

Arthur Dent

Wo genau hast du Probleme? So kompliziert schaut es ja nicht aus.

magik

ich habe nur programmieren in C/C++ gelenrt und Basic Programmierung kenne ich mich ueberhaupt nicht aus

und das Progr... brauche ich dringend

hal

Dieser Algo lässt sich fast via search&replace in C umsetzen.
Len(x) -> strlen(x)
UCase(x) -> string x in upper case
Mid(x,start,len) -> nimm einen teil aus x, von start weg, len zeichen (im dem Algo wirds nur für die character-Referenzierung verwendet, was in C ja viel einfacher geht, indem man den string als char-feld anspricht)
Asc(x) -> ascii-wert des ersten Zeichens in x (kann in C komplett weggelassen werden)
Chr(x) -> Gegenstück zu Asc()
Mod -> %

for x=a to b
...
next
=>
for(x=a;x<=b;x++) {
...
}
usw.

magik

Vielen Dank !!!

Jetzt mitmachen!