要判断文本框Textbox_1中输入的字符和excel中的字符是否相同。如下程序。
dim obj1
dim objexcelapp
set objexcelapp=createobject("Excel.Application")
objexcelapp.wokbooks.open"C:\1.xls"
set obj1=screenitems("Textbox_1")
if obj1.value=objexcelapp.cells(1,1).value then
msgbox "OK"
end if

在Textbox_1中输入111111，（excel中（1，1）位置也是存了111111）运行后没有弹出对话框。但是我msgbox objexcelapp.cells(1,1).value ,弹出的是111111，

这是怎么回事？？