【StarSuite Basic/OpenOffice.org Basic】at TECH【StarSuite Basic/OpenOffice.org Basic】 - 暇つぶし2ch244:デフォルトの名無しさん 08/07/10 18:52:04 >>243 こうか? Sub retest Dim Re As Object Re = CreateObject("VBScript.RegExp") Re.Pattern = "A." Re.Ignorecase = True Re.Global = True sResult = Re.Replace("abc", "12") msgbox sResult Re = nothing End Sub 次ページ続きを表示1を表示最新レス表示レスジャンプ類似スレ一覧スレッドの検索話題のニュースおまかせリストオプションしおりを挟むスレッドに書込スレッドの一覧暇つぶし2ch