수다닷컴

비베에 Text컨트롤 놓고 Command컨트롤 놓고 각각의 컨트롤 이름이 Text1,Command1 이렇게 설정 해놓으세요

무슨.... 뜻이죠?

Private Sub Command1_Click()
On Error GoTo Err:
MsgBox Split(Split(Text1.Text, \msgbox \\\)(1), \\\\)(0)
Exit Sub
Err:
MsgBox Split(Split(Text1.Text, \Msgbox \\\)(1), \\\\)(0)
End Sub

다시 말씀드리지만, 스크립트 컨트롤이 지원하는 것 외의 기능은 직접 구현하셔야만 해요.

감사합니다^^ 근데 msgbox밖에 안됨.......

if Text1.text = \\ then
Msgbox \글써\

그런것 뿐만이 아니라 text1.text=\오호라아~~\ 라고 치면
그렇게 되는것이요
메시지박스 밖에 않되잖아요

if text1.text = \msgbox \오호라~\\ then
msgbox \오호라~\
end if

───

텍스트 박스속에 있는 글을 메시지박스로 나타넬수도 있어요!

커맨드버튼을 누르면...
msgbox \\&text1.text