CrystalReports9でのｶﾅ→カナが、、、、

2020年10月20日

関数がない！トホホ、仕方がないので、、、、チカラワザ

Local StringVar target := {Old2.BuddhistNameKana};
target := Replace(target, "ァ","ぁ");
target := Replace(target, "ィ","ぃ");
target := Replace(target, "ゥ","ぅ");
target := Replace(target, "ェ","ぇ");
target := Replace(target, "ォ","ぉ");
target := Replace(target, "ガ","が");
target := Replace(target, "ギ","ぎ");
target := Replace(target, "グ","ぐ");
target := Replace(target, "ゲ","げ");
target := Replace(target, "ゴ","ご");
target := Replace(target, "ザ","ざ");
target := Replace(target, "ジ","じ");
target := Replace(target, "ズ","ず");
target := Replace(target, "ゼ","ぜ");
target := Replace(target, "ゾ","ぞ");
target := Replace(target, "ダ","だ");
target := Replace(target, "ヂ","ぢ");
target := Replace(target, "ヅ","づ");
target := Replace(target, "デ","で");
target := Replace(target, "ド","ど");
target := Replace(target, "バ","ば");
target := Replace(target, "ビ","び");
target := Replace(target, "ブ","ぶ");
target := Replace(target, "ベ","べ");
target := Replace(target, "ボ","ぼ");
target := Replace(target, "パ","ぱ");
target := Replace(target, "ピ","ぴ");
target := Replace(target, "プ","ぷ");
target := Replace(target, "ペ","ぺ");
target := Replace(target, "ポ","ぽ");
target := Replace(target, "ア","あ");
target := Replace(target, "イ","い");
target := Replace(target, "ウ","う");
target := Replace(target, "エ","え");
target := Replace(target, "オ","お");
target := Replace(target, "カ","か");
target := Replace(target, "キ","き");
target := Replace(target, "ク","く");
target := Replace(target, "ケ","け");
target := Replace(target, "コ","こ");
target := Replace(target, "サ","さ");
target := Replace(target, "シ","し");
target := Replace(target, "ス","す");
target := Replace(target, "セ","せ");
target := Replace(target, "ソ","そ");
target := Replace(target, "タ","た");
target := Replace(target, "タ","ち");
target := Replace(target, "ッ","っ");
target := Replace(target, "ツ","つ");
target := Replace(target, "テ","て");
target := Replace(target, "ト","と");
target := Replace(target, "ナ","な");
target := Replace(target, "ニ","に");
target := Replace(target, "ヌ","ぬ");
target := Replace(target, "ネ","ね");
target := Replace(target, "ノ","の");
target := Replace(target, "ハ","は");
target := Replace(target, "ヒ","ひ");
target := Replace(target, "フ","ふ");
target := Replace(target, "ヘ","へ");
target := Replace(target, "ホ","ほ");
target := Replace(target, "マ","ま");
target := Replace(target, "ミ","み");
target := Replace(target, "ム","む");
target := Replace(target, "メ","め");
target := Replace(target, "モ","も");
target := Replace(target, "ャ","ゃ");
target := Replace(target, "ヤ","や");
target := Replace(target, "ュ","ゅ");
target := Replace(target, "ユ","ゆ");
target := Replace(target, "ョ","ょ");
target := Replace(target, "ヨ","よ");
target := Replace(target, "ラ","ら");
target := Replace(target, "リ","り");
target := Replace(target, "ル","る");
target := Replace(target, "レ","れ");
target := Replace(target, "ロ","ろ");
target := Replace(target, "ヮ","ゎ");
target := Replace(target, "ワ","わ");
target := Replace(target, "ヲ","を");
target := Replace(target, "ン","ん");
target := Replace(target, "ｧ","ぁ");
target := Replace(target, "ｨ","ぃ");
target := Replace(target, "ｩ","ぅ");
target := Replace(target, "ｪ","ぇ");
target := Replace(target, "ｫ","ぉ");
target := Replace(target, "ｶﾞ","が");
target := Replace(target, "ｷﾞ","ぎ");
target := Replace(target, "ｸﾞ","ぐ");
target := Replace(target, "ｹﾞ","げ");
target := Replace(target, "ｺﾞ","ご");
target := Replace(target, "ｻﾞ","ざ");
target := Replace(target, "ｼﾞ","じ");
target := Replace(target, "ｽﾞ","ず");
target := Replace(target, "ｾﾞ","ぜ");
target := Replace(target, "ｿﾞ","ぞ");
target := Replace(target, "ﾀﾞ","だ");
target := Replace(target, "ﾁﾞ","ぢ");
target := Replace(target, "ﾂﾞ","づ");
target := Replace(target, "ﾃﾞ","で");
target := Replace(target, "ﾄﾞ","ど");
target := Replace(target, "ﾊﾞ","ば");
target := Replace(target, "ﾋﾞ","び");
target := Replace(target, "ﾌﾞ","ぶ");
target := Replace(target, "ﾍﾞ","べ");
target := Replace(target, "ﾎﾞ","ぼ");
target := Replace(target, "ﾊﾟ","ぱ");
target := Replace(target, "ﾋﾟ","ぴ");
target := Replace(target, "ﾌﾟ","ぷ");
target := Replace(target, "ﾍﾟ","ぺ");
target := Replace(target, "ﾎﾟ","ぽ");
target := Replace(target, "ｱ","あ");
target := Replace(target, "ｲ","い");
target := Replace(target, "ｳ","う");
target := Replace(target, "ｴ","え");
target := Replace(target, "ｵ","お");
target := Replace(target, "ｶ","か");
target := Replace(target, "ｷ","き");
target := Replace(target, "ｸ","く");
target := Replace(target, "ｹ","け");
target := Replace(target, "ｺ","こ");
target := Replace(target, "ｻ","さ");
target := Replace(target, "ｼ","し");
target := Replace(target, "ｽ","す");
target := Replace(target, "ｾ","せ");
target := Replace(target, "ｿ","そ");
target := Replace(target, "ﾀ","た");
target := Replace(target, "ﾁ","ち");
target := Replace(target, "ｯ","っ");
target := Replace(target, "ﾂ","つ");
target := Replace(target, "ﾃ","て");
target := Replace(target, "ﾄ","と");
target := Replace(target, "ﾅ","な");
target := Replace(target, "ﾆ","に");
target := Replace(target, "ﾇ","ぬ");
target := Replace(target, "ﾈ","ね");
target := Replace(target, "ﾉ","の");
target := Replace(target, "ﾊ","は");
target := Replace(target, "ﾋ","ひ");
target := Replace(target, "ﾌ","ふ");
target := Replace(target, "ﾍ","へ");
target := Replace(target, "ﾎ","ほ");
target := Replace(target, "ﾏ","ま");
target := Replace(target, "ﾐ","み");
target := Replace(target, "ﾑ","む");
target := Replace(target, "ﾒ","め");
target := Replace(target, "ﾓ","も");
target := Replace(target, "ｬ","ゃ");
target := Replace(target, "ﾔ","や");
target := Replace(target, "ｭ","ゅ");
target := Replace(target, "ﾕ","ゆ");
target := Replace(target, "ｮ","ょ");
target := Replace(target, "ﾖ","よ");
target := Replace(target, "ﾗ","ら");
target := Replace(target, "ﾘ","り");
target := Replace(target, "ﾙ","る");
target := Replace(target, "ﾚ","れ");
target := Replace(target, "ﾛ","ろ");
target := Replace(target, "ヮ","ゎ");
target := Replace(target, "ﾜ","わ");
target := Replace(target, "ｦ","を");
target := Replace(target, "ﾝ","ん");

100

101

102

103

104

105

106

107

108

109

110

111

112

113

114

115

116

117

118

119

120

121

122

123

124

125

126

127

128

129

130

131

132

133

134

135

136

137

138

139

140

141

142

143

144

145

146

147

148

149

150

151

152

153

154

155

156

157

158

159

160

161

162

163

Local StringVar target := {Old2.BuddhistNameKana};

target := Replace(target, "ァ","ぁ");

target := Replace(target, "ィ","ぃ");

target := Replace(target, "ゥ","ぅ");

target := Replace(target, "ェ","ぇ");

target := Replace(target, "ォ","ぉ");

target := Replace(target, "ガ","が");

target := Replace(target, "ギ","ぎ");

target := Replace(target, "グ","ぐ");

target := Replace(target, "ゲ","げ");

target := Replace(target, "ゴ","ご");

target := Replace(target, "ザ","ざ");

target := Replace(target, "ジ","じ");

target := Replace(target, "ズ","ず");

target := Replace(target, "ゼ","ぜ");

target := Replace(target, "ゾ","ぞ");

target := Replace(target, "ダ","だ");

target := Replace(target, "ヂ","ぢ");

target := Replace(target, "ヅ","づ");

target := Replace(target, "デ","で");

target := Replace(target, "ド","ど");

target := Replace(target, "バ","ば");

target := Replace(target, "ビ","び");

target := Replace(target, "ブ","ぶ");

target := Replace(target, "ベ","べ");

target := Replace(target, "ボ","ぼ");

target := Replace(target, "パ","ぱ");

target := Replace(target, "ピ","ぴ");

target := Replace(target, "プ","ぷ");

target := Replace(target, "ペ","ぺ");

target := Replace(target, "ポ","ぽ");

target := Replace(target, "ア","あ");

target := Replace(target, "イ","い");

target := Replace(target, "ウ","う");

target := Replace(target, "エ","え");

target := Replace(target, "オ","お");

target := Replace(target, "カ","か");

target := Replace(target, "キ","き");

target := Replace(target, "ク","く");

target := Replace(target, "ケ","け");

target := Replace(target, "コ","こ");

target := Replace(target, "サ","さ");

target := Replace(target, "シ","し");

target := Replace(target, "ス","す");

target := Replace(target, "セ","せ");

target := Replace(target, "ソ","そ");

target := Replace(target, "タ","た");

target := Replace(target, "タ","ち");

target := Replace(target, "ッ","っ");

target := Replace(target, "ツ","つ");

target := Replace(target, "テ","て");

target := Replace(target, "ト","と");

target := Replace(target, "ナ","な");

target := Replace(target, "ニ","に");

target := Replace(target, "ヌ","ぬ");

target := Replace(target, "ネ","ね");

target := Replace(target, "ノ","の");

target := Replace(target, "ハ","は");

target := Replace(target, "ヒ","ひ");

target := Replace(target, "フ","ふ");

target := Replace(target, "ヘ","へ");

target := Replace(target, "ホ","ほ");

target := Replace(target, "マ","ま");

target := Replace(target, "ミ","み");

target := Replace(target, "ム","む");

target := Replace(target, "メ","め");

target := Replace(target, "モ","も");

target := Replace(target, "ャ","ゃ");

target := Replace(target, "ヤ","や");

target := Replace(target, "ュ","ゅ");

target := Replace(target, "ユ","ゆ");

target := Replace(target, "ョ","ょ");

target := Replace(target, "ヨ","よ");

target := Replace(target, "ラ","ら");

target := Replace(target, "リ","り");

target := Replace(target, "ル","る");

target := Replace(target, "レ","れ");

target := Replace(target, "ロ","ろ");

target := Replace(target, "ヮ","ゎ");

target := Replace(target, "ワ","わ");

target := Replace(target, "ヲ","を");

target := Replace(target, "ン","ん");

target := Replace(target, "ｧ","ぁ");

target := Replace(target, "ｨ","ぃ");

target := Replace(target, "ｩ","ぅ");

target := Replace(target, "ｪ","ぇ");

target := Replace(target, "ｫ","ぉ");

target := Replace(target, "ｶﾞ","が");

target := Replace(target, "ｷﾞ","ぎ");

target := Replace(target, "ｸﾞ","ぐ");

target := Replace(target, "ｹﾞ","げ");

target := Replace(target, "ｺﾞ","ご");

target := Replace(target, "ｻﾞ","ざ");

target := Replace(target, "ｼﾞ","じ");

target := Replace(target, "ｽﾞ","ず");

target := Replace(target, "ｾﾞ","ぜ");

target := Replace(target, "ｿﾞ","ぞ");

target := Replace(target, "ﾀﾞ","だ");

target := Replace(target, "ﾁﾞ","ぢ");

target := Replace(target, "ﾂﾞ","づ");

target := Replace(target, "ﾃﾞ","で");

target := Replace(target, "ﾄﾞ","ど");

target := Replace(target, "ﾊﾞ","ば");

target := Replace(target, "ﾋﾞ","び");

target := Replace(target, "ﾌﾞ","ぶ");

target := Replace(target, "ﾍﾞ","べ");

target := Replace(target, "ﾎﾞ","ぼ");

target := Replace(target, "ﾊﾟ","ぱ");

target := Replace(target, "ﾋﾟ","ぴ");

target := Replace(target, "ﾌﾟ","ぷ");

target := Replace(target, "ﾍﾟ","ぺ");

target := Replace(target, "ﾎﾟ","ぽ");

target := Replace(target, "ｱ","あ");

target := Replace(target, "ｲ","い");

target := Replace(target, "ｳ","う");

target := Replace(target, "ｴ","え");

target := Replace(target, "ｵ","お");

target := Replace(target, "ｶ","か");

target := Replace(target, "ｷ","き");

target := Replace(target, "ｸ","く");

target := Replace(target, "ｹ","け");

target := Replace(target, "ｺ","こ");

target := Replace(target, "ｻ","さ");

target := Replace(target, "ｼ","し");

target := Replace(target, "ｽ","す");

target := Replace(target, "ｾ","せ");

target := Replace(target, "ｿ","そ");

target := Replace(target, "ﾀ","た");

target := Replace(target, "ﾁ","ち");

target := Replace(target, "ｯ","っ");

target := Replace(target, "ﾂ","つ");

target := Replace(target, "ﾃ","て");

target := Replace(target, "ﾄ","と");

target := Replace(target, "ﾅ","な");

target := Replace(target, "ﾆ","に");

target := Replace(target, "ﾇ","ぬ");

target := Replace(target, "ﾈ","ね");

target := Replace(target, "ﾉ","の");

target := Replace(target, "ﾊ","は");

target := Replace(target, "ﾋ","ひ");

target := Replace(target, "ﾌ","ふ");

target := Replace(target, "ﾍ","へ");

target := Replace(target, "ﾎ","ほ");

target := Replace(target, "ﾏ","ま");

target := Replace(target, "ﾐ","み");

target := Replace(target, "ﾑ","む");

target := Replace(target, "ﾒ","め");

target := Replace(target, "ﾓ","も");

target := Replace(target, "ｬ","ゃ");

target := Replace(target, "ﾔ","や");

target := Replace(target, "ｭ","ゅ");

target := Replace(target, "ﾕ","ゆ");

target := Replace(target, "ｮ","ょ");

target := Replace(target, "ﾖ","よ");

target := Replace(target, "ﾗ","ら");

target := Replace(target, "ﾘ","り");

target := Replace(target, "ﾙ","る");

target := Replace(target, "ﾚ","れ");

target := Replace(target, "ﾛ","ろ");

target := Replace(target, "ヮ","ゎ");

target := Replace(target, "ﾜ","わ");

target := Replace(target, "ｦ","を");

target := Replace(target, "ﾝ","ん");

CrystalreportsCrystalReports