Пара вопросов о TextBox

[Mrsqler]

Всем привет)Скажите,как по нажатию на кнопку очистить содержимое объекта TextBox ?Знаю что ячейку можно так

 Range("M:M").Clear

А как быть с объектами?И еще вопрос-как устранить ошибку
Run-time error '13'
Type mismatch
Она появляется тогда,когда я запускаю программу,а значения объекта TextBox пустые.Т.е там ничего нету,ни цифр,ни букв.А просто пустые ячейки.Как её можно устранить?

[IgorGO]

1. TextBox.Text = ""
2. передавайте процедурам и операторам совместимые по типу значения - избавитесь от Type mismatch

[Mrsqler]

Что-то второе не совсем понял)У меня там всего два типа данных,Integer и Double.
Но когда ячейки TextBox пустые-вылазит эта ошибка.

[IgorGO]

значение TextBox - строка, с перечисленными Вами типами несовместима.

[Mrsqler]

Всё,я нашел!)
Вот то,что хотел

If TextBox1.Text = IsNothing Then
    MsgBox ("Введите значения!")
    EndIf

[Казанский]

Браво! А теперь попробуйте

If TextBox1.Text = bla_bla_bla Then

Ваше IsNothing - это просто необъявленная переменная типа Variant, которая имеет значение Empty.
Для текста можно использовать пустую строку

If TextBox1.Text = "" Then

[Mrsqler]

Всем спасибо!Но у меня возникла новая проблема =)
Мне нужно чтобы когда флажок был активен(CheckBox),то объект TextBox менял свойство Visible с True на False.Я попытался это сделать так,но ничего не работает=(

If CheckBox1 = True Then TextBox3.Visible = False

[doober]

А так,работает?

Private Sub CheckBox1_Click()
TextBox3.Visible = Not CheckBox1.Value
End Sub

[Mrsqler]

Нет,не работает(А почему же мой вариант не хочет принимать.Вроде бы всё правильно...

[doober]

Как это не работает.
Сам предложил,значит и сделать надо