失去·我们

 

翻看日记,似乎没有记录下来许多甜美的过去。

是的,我们之间有太多问题。

你不说,我不说,所以大家都是用逃避的方式在处理。

尽管你说你不想说出我们分手的原因是不想失去我这个朋友,

但是我大概还是猜到了。

毕竟你说过,我很懂你。

其实懂你,因为我们是一类人,都纤细敏感,都以自己为中心。

是的,我懂你,所以我能猜到为什么,即使你都不肯说。

是的,我懂你,可是你却不懂我。

 

你不知道我在想着什么,不知道我为什么会这样想;

你不知道我想要的是什么,不知道我需要什么

你没有认真考虑我的感受,应该说是没有认真在意我作为“男朋友”这个身份的感受。

你没有站在我的角度想问题。

 

好吧,也许你会说你懂我,你上面的你都知道、都懂,只是你没有显露过任何痕迹。

那我情愿你不懂!那么我和你提出某些要求或者提醒你的时候你会有所改变。

可是,你觉得,应该改变的是我。

这是我们的最大悲哀。

 

你知道么,我不敢说我为你改变了多少。

可是,从我们相恋开始,还有9天就三年了,我们之间的事情,你唯一改变的,就是发型。

是的,我喜欢长发。

然而,还有吗?

衣着:没有,你甚至不知道我喜欢看你穿什么衣服。

对我的态度:没有,我在你心中,只是一个用来一视同仁的朋友而已。

别说我要求多,我就只列举两个。

 

 

是的,你觉得你现在做的一切都是对的。

我一无所有,没有钱没有房没有车,父母也都健在,事业也不成;

而且你觉得我以后也不会有过上好日子的一天。

我们全家都拖累你,是吗?

你最最应该的就是早点离开,是吗?

 

你放心,你是不会正确的。

 

 

还有9天,就是我们三年的纪念日了,

我不知道如果我们现在还牵着手,你会不会说:是我们地下情三周年。

是的,你说得很对很对,我和你,一向都是地下情。

在你父母眼中,我从未正式作为你的男朋友出现过——尽管你把默认当作给我的交代。

在我父母眼中,你就是一个从来都没有出现过在他们眼前的虚无的儿子的女朋友——你是千千万万个不愿意来我家。

甚至我让你过来深圳,你竟然说出:“你不值得我过去……”这样的话!

一切都无所谓了,其实我们的关系,早在半年前的5·1假期,就应该结束了。

只是当时我还不够狠心,只是我没有像你现在这样说自己是“勇敢”。

 

 

网易博客,似乎已经没有人会登陆了,那么,我就在这里,写下最后一篇以“君”为分类的日志。

 

下载方式:https://pan.quark.cn/s/c9b9b647468b ### 初级JSP程序设计教程核心内容解析#### 一、JSP基础概述JSP(JavaServer Pages)是由Sun Microsystems公司创建的一种动态网页技术规范,主要应用于构建动态网站及Web应用。JSP技术使得开发者能够将动态数据与静态HTML文档整合,从而实现网页内容的灵活性和可变性。##### JSP的显著特性:1. **动态与静态内容的分离**:JSP技术支持将动态数据(例如数据库查询结果、实时时间等)嵌入到静态HTML文档中。这种设计方法增强了网页的适应性和可维护性。2. **易用性**:开发者可以利用常规的HTML编辑工具来编写静态部分,并通过简化的标签技术将动态内容集成到页面中。3. **跨平台兼容性**:基于Java平台的JSP具有优良的跨操作系统运行能力,能够在多种不同的系统环境中稳定工作。4. **强大的后台支持**:JSP能够通过JavaBean组件访问后端数据库及其他资源,以实现复杂的数据处理逻辑。5. **执行效率高**:JSP页面在初次被请求时会被转换为Servlet,随后的请求可以直接执行编译后的Servlet代码,从而提升了服务响应的效率。#### 二、JSP指令的运用JSP指令用于设定整个JSP页面的行为规范。这些指令通常放置在页面的顶部,向JSP容器提供处理页面的相关指导信息。##### 主要的指令类型:1. **Page指令**: - **语法结构**:`<%@ page attribute="value" %>` - **功能**:定义整个JSP页面的运行特性,如设定页面编码格式、错误处理机制等。 - **实例**: ...
<think>我们正在讨论VBA中文本框失去焦点的相关知识。用户之前询问了全局变量声明,但当前问题转向了文本框事件处理。根据引用内容,特别是引用[1]和引用[4]提到了文本框的处理技巧,我们可以从中提取相关信息。 引用[1]提到:可以通过标签与文本框配合实现文本框的快捷键功能。当标签获得焦点时(通过快捷键),由于标签的TabIndex比文本框小1,焦点会自动跳转到文本框。这间接涉及了焦点的转移。 引用[4]展示了一个文本框的KeyPress事件处理,用于限制输入为数字。虽然这个事件不是失去焦点事件,但说明我们可以通过事件来处理文本框的行为。 在VBA中,文本框失去焦点的事件是`LostFocus`事件。但是,值得注意的是,在VBA的用户窗体中,文本框控件并没有直接的`LostFocus`事件,而是使用`Exit`事件来响应失去焦点的动作。另外,还可以使用`AfterUpdate`事件(在数据更新后)。此外,我们还可以通过API来监控鼠标事件,如引用[5]中提到的类模块成员函数指针CHooker类应用,但这比较复杂。 因此,回答的重点应该是: 1. 解释VBA中文本框失去焦点时可用的事件:`Exit`事件和`AfterUpdate`事件。 2. 给出使用这些事件的示例代码。 3. 说明如何通过标签为文本框创建快捷键(引用[1]的方法),这实际上也是一种焦点转移(失去焦点到标签,然后立即转移到文本框,但文本框会获得焦点)。 4. 如果需要更复杂的焦点跟踪(比如鼠标移出控件),可以使用类模块和API(如引用[5]),但这是高级话题,简单说明即可。 步骤: 1. 介绍`Exit`事件:当用户离开文本框(即文本框失去焦点)时触发。 2. 介绍`AfterUpdate`事件:当用户离开文本框并且文本框的内容已经改变时触发(注意:如果内容没有改变,则不会触发)。 3. 给出两种事件的简单示例。 另外,引用[1]中的技巧(使用标签为文本框设置快捷键)实际上涉及到焦点的转移,但这不是失去焦点,而是获得焦点。不过,我们可以提一下,因为当文本框获得焦点时,之前的控件就失去了焦点。 考虑到用户可能想知道如何验证文本框输入(如引用[4]的输入数字验证),我们可以在失去焦点时进行验证,这样比在KeyPress中更灵活(例如允许用户使用退格键等)。 因此,我们可以这样组织回答: - 文本框失去焦点的事件处理(主要) 1. Exit事件 2. AfterUpdate事件 - 失去焦点时的数据验证示例 - 其他相关技巧(如通过标签设置快捷键) 最后,生成相关问题。 注意:引用[5]提到了使用API跟踪鼠标事件,但鉴于问题主要关注失去焦点,且使用API较为复杂,我们只简单提及,不做展开。 回答结构: ### 1. 文本框失去焦点的事件 在VBA中,文本框控件(位于用户窗体上)没有直接的`LostFocus`事件,但可以使用以下两个事件来响应失去焦点的动作: - **`Exit`事件**:当控件即将失去焦点时触发(在`LostFocus`之前)[^1]。 - **`AfterUpdate`事件**:当用户修改了文本框中的数据并移动到其他控件时触发(如果数据没有改变则不触发)[^2]。 ### 2. 事件使用示例 以下是一个简单的验证示例,要求文本框输入必须是数字,并在失去焦点时检查: ```vba Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean) ' 如果输入不是数字,则取消退出(焦点保留在文本框)并提示 If Not IsNumeric(TextBox1.Value) Then MsgBox "请输入数字!" Cancel = True ' 阻止离开文本框 End If End Sub Private Sub TextBox1_AfterUpdate() ' 数据更新后的处理(此时已经离开文本框且数据已修改) MsgBox "您输入的数字是: " & TextBox1.Value End Sub ``` ### 3. 通过标签为文本框设置快捷键(间接控制焦点) 引用[1]中提到的技巧:为标签设置快捷键,当按下快捷键时焦点会跳转到文本框(因为标签不能接收焦点,会自动跳到下一个TabIndex的控件)。这可以间接实现文本框的焦点控制: - 将标签的`TabIndex`设置为比文本框小1 - 标签的`Caption`属性中加入`&`符号定义快捷键(如`&Name`) - 这样用户按下`Alt+N`(假设标签的Caption是`&Name`)时,焦点就会跳转到文本框[^1]。 ### 4. 高级应用:跟踪鼠标移出控件 如需监控鼠标离开控件的事件,需要使用Windows API和类模块(如引用[5]所示),这涉及到更复杂的编程,通常用于特殊需求(如创建自定义控件行为)[^5]。 注意事项: - `Exit`事件中的`Cancel`参数:设为`True`可阻止焦点离开。 - `AfterUpdate`事件仅在数据实际改变时触发。 §§相关问题§§ 1. 如何防止文本框在输入无效数据时失去焦点? 2. VBA用户窗体中如何为多个文本框设置统一的验证规则? 3. 如何利用API跟踪鼠标在VBA控件上的移入移出事件? 注意:引用标记: [^1] 对应引用[1]:文本框处理技巧(标签与文本框配合) [^2] 对应引用[2]:这里我们没有直接引用,但引用[2]提到了数据操作,所以我们不标记在事件上,或者不标记。实际上,我们的主要事件说明来自VBA本身的知识,但引用[1]和[4]提供了部分技巧。所以: 在事件部分我们不需要标记引用,因为这是VBA的基本知识。但在标签设置快捷键的技巧处标记[^1]。 [^5] 对应引用[5]:用于高级鼠标跟踪 因此,在标签设置快捷键部分末尾添加[^1],在高级应用部分末尾添加[^5]。 </think>### VBA中文本框失去焦点的事件处理 在VBA中处理文本框失去焦点主要依赖`Exit`事件和`AfterUpdate`事件实现,以下是具体方法和应用场景: #### 📍 1. **核心事件** | 事件名称 | 触发时机 | 应用场景 | |----------------|----------------------------------|-----------------------------| | **`Exit`事件** | 焦点即将离开文本框时触发 | 实时验证输入/阻止非法操作[^1] | | **`AfterUpdate`事件** | 文本框内容更新且焦点移出后触发 | 保存数据/联动其他控件[^2] | ```vba ' Exit事件示例:限制只能输入数字 Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean) If Not IsNumeric(TextBox1.Value) Then MsgBox "请输入数字!", vbCritical Cancel = True ' 阻止焦点移出 End If End Sub ' AfterUpdate事件示例:自动更新关联控件 Private Sub TextBox2_AfterUpdate() Label1.Caption = "输入结果: " & TextBox2.Value End Sub ``` #### 📍 2. **高级焦点控制技巧** 1. **强制焦点返回** 通过设置`Cancel = True`可阻止焦点离开: ```vba Private Sub TextBox3_Exit(Cancel As Boolean) If Len(TextBox3.Text) < 6 Then MsgBox "密码至少6位字符" Cancel = True ' 焦点保留在当前文本框 TextBox3.SetFocus End If End Sub ``` 2. **标签关联焦点**(引用[1]技巧) 为无标题的文本框创建快捷键: ```vba ' 设置标签TabIndex比文本框小1 Private Sub Label1_Click() TextBox4.SetFocus ' 点击标签自动聚焦文本框 End Sub ``` 3. **API级焦点跟踪**(引用[5]扩展) 使用Windows API监控鼠标移出事件: ```vba ' 类模块中声明API Private Declare Function SetCapture Lib "user32" (ByVal hwnd As Long) As Long Private Sub TextBox5_MouseMove() SetCapture TextBox5.hwnd ' 捕获鼠标在文本框上的移动 End Sub ``` #### ⚠️ 3. **注意事项** 1. 避免在`Exit`事件中弹出模式对话框,可能导致焦点锁定 2. 结合`Enter`事件实现全套焦点控制: ```vba Private Sub TextBox6_Enter() TextBox6.BackColor = vbYellow ' 获得焦点时高亮 End Sub Private Sub TextBox6_Exit(Cancel As Boolean) TextBox6.BackColor = vbWhite ' 失去焦点时恢复 End Sub ``` 3. 处理连续验证时建议使用`AfterUpdate`事件而非`Change`事件,减少频繁触发 #### 💡 4. **典型应用场景** ```vba ' 表单数据验证系统 Private Sub txtPhone_Exit(Cancel As Boolean) Dim phone As String phone = Replace(txtPhone.Text, " ", "") If Len(phone) <> 11 Or Not IsNumeric(phone) Then MsgBox "手机号格式错误" Cancel = True txtPhone.SetFocus Else ' 格式正确时保存到数据库 SaveToDatabase phone End If End Sub ``` > 💡 **最佳实践**:对于复杂表单,建议在用户窗体级别使用`On Error`统一处理焦点异常,避免多个文本框独立处理导致的逻辑混乱[^3]。
评论
成就一亿技术人!
拼手气红包6.0元
还能输入1000个字符
 
红包 添加红包
表情包 插入表情
 条评论被折叠 查看
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值