| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1200 人关注过本帖
标题:vbCrLf 表示回车,什么表示退格呢
只看楼主 加入收藏
blackstine
Rank: 1
等 级:新手上路
帖 子:25
专家分:0
注 册:2006-4-10
收藏
 问题点数:0 回复次数:6 
vbCrLf 表示回车,什么表示退格呢
vb系统常量: vbCrLf 表示回车 什么表示退格呢 ? 我试了 vbTag 但是 很令偶失望 这个在VB6中不表示退格
各位大虾 请请帮帮忙, 我已经郁闷一下午了,WUWU!!!
搜索更多相关主题的帖子: vbCrLf 回车 
2006-10-17 19:17
konggs
Rank: 1
等 级:新手上路
帖 子:13
专家分:0
注 册:2006-9-1
收藏
得分:0 

chr(8)

2006-10-17 19:33
chenwind17
Rank: 1
等 级:新手上路
帖 子:28
专家分:0
注 册:2006-9-25
收藏
得分:0 
vbkeyback
2006-10-17 19:36
purana
Rank: 16Rank: 16Rank: 16Rank: 16
来 自:广东-广州
等 级:版主
威 望:66
帖 子:6039
专家分:0
注 册:2005-6-17
收藏
得分:0 
同意楼上..

我的msn: myfend@
2006-10-17 20:04
blackstine
Rank: 1
等 级:新手上路
帖 子:25
专家分:0
注 册:2006-4-10
收藏
得分:0 

先谢谢了


##今日不签名·#¥!!!
2006-10-17 20:50
blackstine
Rank: 1
等 级:新手上路
帖 子:25
专家分:0
注 册:2006-4-10
收藏
得分:0 
还有一个问题,就是在我的程序里的一个函数怎么不能实现其功能?
这是一个 查找在回车符 后 的一个字符是字母的话,就返回 这个回车符在字符位置(在字符串中的排位)与形参的差
但是总是不能实现 请大家再帮帮忙

可能就是 函数中那两个 if 语句

Dim StrAll As String
Private Sub Form_click()
StrAll = "abcd" & Chr(13) & "123" & Chr(13) & "efgh"
Print FindWord(2) ' 调用函数 把形参 赋为 2
End Sub

Function FindWord(I As Long) As Long
Dim U As Long, AscA As Integer
FindWord = 0
For U = I To N
If Chr(13) = Mid(StrAll, U, 1) Then ' 找到回车的话 要是在其下一个字符是字母的话 返回函数值
AscA = Asc(Mid(StrAll, U + 1, 1))
If AscA >= 97 And AscA <= 122 Or AscA >= 65 And AscA <= 90 Then
FindWord = U - I
Exit For
End If
End If
Next U
If FindWord = 0 Then MsgBox "查找完毕", vbOKOnly, "提示"
End Function

##今日不签名·#¥!!!
2006-10-17 21:10
chenwind17
Rank: 1
等 级:新手上路
帖 子:28
专家分:0
注 册:2006-9-25
收藏
得分:0 

1.上面程序中的N好像没声明
2.回车符应该是Chr(13)+chr(10)

2006-10-18 08:34
快速回复:vbCrLf 表示回车,什么表示退格呢
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.046633 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved