投稿日 | : 2005/03/07(Mon) 17:20 |
投稿者 | : Say |
Eメール | : |
URL | : |
タイトル | : Re: 指定した文字の位置の取得 |
思うに、こんなことをしたいんでないかえ?
Option Explicit
Private Sub Command1_Click()
Text1.Text = Replace(Text1.Text, "(", "(param as Long")
End Sub
Private Sub Form_Load()
Text1.Text = "Function foo() As Long"
End Sub