DE5TROY3R

Kayıt : 4 Nisan 2007 Istanbulda / Rize
|
|
isminizin japonca karşlığı için :) text1 : isminizdir text2 : sonuç command1 : çevir ------ Private Sub Command1_Click() Text2.Text = "" boyut = Len(Text1.Text)
For i = 1 To boyut deger = Mid(Text1.Text, i, 1)
If deger = "a" Then deger = "ka" ElseIf deger = "b" Then deger = "tu" ElseIf deger = "c" Then deger = "mi" ElseIf deger = "d" Then deger = "te" ElseIf deger = "e" Then deger = "ku" ElseIf deger = "f" Then deger = "lu" ElseIf deger = "g" Then deger = "ji" ElseIf deger = "h" Then deger = "ri" ElseIf deger = "ı" Then deger = "ki" ElseIf deger = "j" Then deger = "zu" ElseIf deger = "k" Then deger = "me" ElseIf deger = "l" Then deger = "ta" ElseIf deger = "m" Then deger = "rin" ElseIf deger = "n" Then deger = "to" ElseIf deger = "o" Then deger = "mo" ElseIf deger = "p" Then deger = "no" ElseIf deger = "q" Then deger = "ke" ElseIf deger = "r" Then deger = "shi" ElseIf deger = "s" Then deger = "ari" ElseIf deger = "t" Then deger = "chi" ElseIf deger = "u" Then deger = "do" ElseIf deger = "v" Then deger = "ru" ElseIf deger = "w" Then deger = "mei" ElseIf deger = "x" Then deger = "na" ElseIf deger = "y" Then deger = "fu" ElseIf deger = "z" Then deger = "zi" ElseIf deger = "A" Then deger = "Ka" ElseIf deger = "B" Then deger = "Tu" ElseIf deger = "C" Then deger = "Mi" ElseIf deger = "D" Then deger = "Te" ElseIf deger = "E" Then deger = "Ku" ElseIf deger = "F" Then deger = "Lu" ElseIf deger = "G" Then deger = "Ji" ElseIf deger = "H" Then deger = "Ri" ElseIf deger = "I" Then deger = "Ki" ElseIf deger = "J" Then deger = "Zu" ElseIf deger = "K" Then deger = "Me" ElseIf deger = "L" Then deger = "Ta" ElseIf deger = "M" Then deger = "Rin" ElseIf deger = "N" Then deger = "To" ElseIf deger = "O" Then deger = "Mo" ElseIf deger = "P" Then deger = "No" ElseIf deger = "Q" Then deger = "Ke" ElseIf deger = "R" Then deger = "Shi" ElseIf deger = "S" Then deger = "Ari" ElseIf deger = "T" Then deger = "Chi" ElseIf deger = "U" Then deger = "Do" ElseIf deger = "V" Then deger = "Ru" ElseIf deger = "W" Then deger = "Mei" ElseIf deger = "X" Then deger = "Na" ElseIf deger = "Y" Then deger = "Fu" ElseIf deger = "Z" Then deger = "Zi"
End If Text2.Text = Text2.Text & deger
Next
End Sub
tdsoftware.tr.cx
|
blue_leader

Uzaklaştırılmış Üye
Kayıt : 15 Ekim 2007 istanbul
|
|
millet türkçesini zor anlıyor sen japonyaya kadar götürdün .) ama yinede saol
SInıfı Geçme Derdinde İnş. Geçer AMİN !!! blue_leader, 4 Ekim 2009 (Pazar) 11:53 tarihinde Türkiye AB'ye girene kadar uzaklaştırıldı.
Uzaklaştırılma Sebebi: Müride PM ile ana bacı küfür.
|
ilower

Kayıt : 10 Temmuz 2008 Türkiye
|
|
bu nee yaaa :)))
saolsın tsk ler
ismiim anlami
Ka Ri Rin Ku Chi
Akıllı yatırımcı gerçekçidir. Kötümserlerden alır, iyimserlere satar.
|
AmoR

Kayıt : 14 Nisan 2007 @@@@@@
|
|
Vardı buna benzer bişi. Teşekkürler yinede.
Those who speak know nothing,And find out to their cost, Like those who curse their luck in too many places, And those who fear are lost...
|
ajan1111

Kayıt : 25 Agustos 2005 coder acan (:
|
|
nakamura bunları ezbere biliyordur :D
Kayalardan kayarım, yoktur benim ayarım ;)
ajan1111.com
google‘ye kafam girsin (:
|
KrypT

Kayıt : 5 Mart 2004 Outbreak of Evil
|
|
Paylaşım için teşekkürler ama düzmece la bu japonca karşılığı falan değil.
|
|
|
bu konuyu nerden aldığını biliyom:P:D
Suskunluğum asaletimdir her lafa verecek bir cevabım var.Ama bir lafa bakarım,lafmı diye.Birde söyleyene adammı diye....
|
|
|
Olm kafadeym şunu biriniz exe yapıp atn =)
|
Fikret

Kayıt : 1 Ekim 2007 GopCity
|
|
angels_demos bunu yazdı: -----------------------------
Olm kafadeym şunu biriniz exe yapıp atn =)
-----------------------------
http://www.dosya.cc/Japonca_sminiz.rar.html
screw you guys! i"m goin" hoooome!
|
|
|
angels_demos bunu yazdı: -----------------------------
Olm kafadeym şunu biriniz exe yapıp atn =)
----------------------------- http://rapidshare.com/files/128665503/isim.exe.html
http://www.speedtest.net/result/926625321.png
|
Fikret

Kayıt : 1 Ekim 2007 GopCity
|
|
nazmanya bunu yazdı: -----------------------------
angels_demos bunu yazdı: -----------------------------
Olm kafadeym şunu biriniz exe yapıp atn =)
----------------------------- http://rapidshare.com/files/128665503/isim.exe.html
-----------------------------
eheh pi$ti olduk :D
screw you guys! i"m goin" hoooome!
|
|