Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


76014 / 76732 ←次へ | 前へ→

【5147】先頭の文字を大文字に
質問  koshimizu E-MAIL  - 03/4/23(水) 15:39 -

引用なし
パスワード
   またまた質問です。
下記のものを使用しています。
先頭の文字を大文字にならないでしょうか?
よろしくお願いします。

かなり長いですが、ご勘弁下さい。 では。

Function kana2roma(ByVal kana As String) As String

Dim i As Integer, retStr As String
Dim ts As Boolean, tmp1 As String, tmp2 As String
Dim Cnv2(1 To 64, 1 To 2) As String, Cnv1(1 To 85, 1 To 2) As String

Cnv2(1, 1) = "きぃ": Cnv2(1, 2) = "kyi"
Cnv2(2, 1) = "きぇ": Cnv2(2, 2) = "kye"
Cnv2(3, 1) = "きゃ": Cnv2(3, 2) = "kya"
Cnv2(4, 1) = "きゅ": Cnv2(4, 2) = "kyu"
Cnv2(5, 1) = "きょ": Cnv2(5, 2) = "kyo"
Cnv2(6, 1) = "ぎぃ": Cnv2(6, 2) = "gyi"
Cnv2(7, 1) = "ぎぇ": Cnv2(7, 2) = "gye"
Cnv2(8, 1) = "ぎゃ": Cnv2(8, 2) = "gya▼koshimizu さん:
>でれすけさん こうさん 
>回答ありがとうございます。
>大変迷惑をおかけ致しました。申し訳ありません。
>無事に使用出来る状態になりました。
>ありがとうございます。
>今後ともよろしくお願い致します。

0 hits

【5113】ひらがなをローマ字に変換したい koshimizu 03/4/22(火) 16:45 質問
【5123】Re:ひらがなをローマ字に変換したい でれすけ 03/4/23(水) 8:09 回答
【5127】Re:ひらがなをローマ字に変換したい koshimizu 03/4/23(水) 10:06 質問
【5138】見られますが・・・ こう 03/4/23(水) 13:08 発言
【5139】m(_ _)m こう 03/4/23(水) 13:15 発言
【5143】回答ありがとうございました koshimizu 03/4/23(水) 14:15 お礼
【5147】先頭の文字を大文字に koshimizu 03/4/23(水) 15:39 質問
【5161】Re:先頭の文字を大文字に りん 03/4/23(水) 22:31 回答
【5164】Re:先頭の文字を大文字に [名前なし] 03/4/23(水) 23:11 発言
【5165】Re:先頭の文字を大文字に でれすけ 03/4/23(水) 23:14 発言
【5162】Re:m(_ _)m でれすけ 03/4/23(水) 23:07 発言
【5163】Re:m(_ _)m こう 03/4/23(水) 23:10 発言
【5166】Re:m(_ _)m でれすけ 03/4/23(水) 23:18 発言
【5167】Re:m(_ _)m こう@チャット状態やなぁ... 03/4/23(水) 23:22 回答
【5201】StrConvとProper りん 03/4/25(金) 4:19 回答
【5225】ありがとうございました koshimizu 03/4/28(月) 17:20 お礼
【5226】せっかくなので りん 03/4/28(月) 19:59 発言

76014 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free