乐筑天下

搜索
欢迎各位开发者和用户入驻本平台 尊重版权,从我做起,拒绝盗版,拒绝倒卖 签到、发布资源、邀请好友注册,可以获得银币 请注意保管好自己的密码,避免账户资金被盗
查看: 45|回复: 2

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

[复制链接]

194

主题

592

帖子

11

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1380
发表于 2006-10-17 14:13:06 | 显示全部楼层 |阅读模式
有人有检索文本框文本的代码吗"
               
        Else
        
            MsgBox "User pressed [Cancel]."
            
        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[/code]
看到问题,看到不好的建议等?让我/我们知道。谢谢!
回复

使用道具 举报

194

主题

592

帖子

11

银币

顶梁支柱

Rank: 50Rank: 50

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

使用道具 举报

194

主题

592

帖子

11

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1380
发表于 2006-10-17 14:15:06 | 显示全部楼层

没错,我是一名黑客
-但是我每天都在努力变得更好!如果您看到代码或注释有任何错误,很有可能,请告诉我!
谢谢杰夫!
回复

使用道具 举报

发表回复

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

QQ|关于我们|小黑屋|乐筑天下 繁体中文

GMT+8, 2025-7-6 20:24 , Processed in 1.029602 second(s), 69 queries .

© 2020-2025 乐筑天下

联系客服 关注微信 帮助中心 下载APP 返回顶部 返回列表