mark 发表于 2006-10-17 14:13:06

检索文本框文本的示例代码

有人有检索文本框文本的代码吗"
               
      Else
      
            MsgBox "User pressed ."
            
      End If
      
      Unload myForm
      
      Set myForm = Nothing
      
      Exit Sub
      
ErrHandler:
      If Err.Number = -2147418105 Then
      
            MsgBox _
                "The user closed the form via the " & _
                "form's control box."
               
      Else
      
            ''Uhhh, what the h3ll? An error we didn't
            ''anticipate. Let's display the error
            ''description.
            
            MsgBox Err.Description
            
      End If
      Err.Clear
      
      Resume OutOfHere
      
    End If
   
OutOfHere:
   
    Set myForm = Nothing
      
End Sub
看到问题,看到不好的建议等?让我/我们知道。谢谢!

mark 发表于 2006-10-17 14:14:35

国会议员一举提醒JM,他真的只是个黑客......
看起来都是很好的建议迈克尔!现在要是我能学会把这个建议融入我写的东西就好了......
谢谢你发布代码,因为我不会下载这个项目(我现在有足够的东西在进行...)但是哇!真是大开眼界。
*Jeff_M回到用锤子和凿子写代码......

mark 发表于 2006-10-17 14:15:06


没错,我是一名黑客
-但是我每天都在努力变得更好!如果您看到代码或注释有任何错误,很有可能,请告诉我!
谢谢杰夫!
页: [1]
查看完整版本: 检索文本框文本的示例代码