作者redclock (紅色時鍾)
看板Visual_Basic
標題Re: [VB6 ] 請問如何抓取空字元..
時間Wed Aug 10 14:14:05 2005
※ 引述《mhc (路邊小草)》之銘言：
: ※ 引述《redclock (紅色時鍾)》之銘言：
: : 以下是小弟的部份程式碼
: 不確定你表達的東西是什麼阿..你是要這種東西嗎？ @@
: Private Sub Command1_Click()
: If Trim(Chr) = "" Then
: rtvl = MsgBox("首字不得為空白！", vbCritical Or vbOKOnly, "注意!")
: Unload Me
: End If
: 還是
: Private Sub Command1_Click()
: If Left(Chr,1) = " " Then
: rtvl = MsgBox("首字不得為空白！", vbCritical Or vbOKOnly, "注意!")
: Unload Me
: End If
: anyway,去看一下字串處理函示吧~
感謝各位先進的幫忙
我找到寫的方法了~
If Mid(RichTextBox1.SelText, 1, 1) = Chr(32) Then
rtvl = MsgBox("首字不得為空白！", vbCritical Or vbOKOnly, "注意!")
Uload Me
End If
感謝各位 <(_ _)>
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 203.70.54.215
1F：推 fumizuki:Left(...., 1) = " " 61.222.155.162 08/10
2F：推 runtime:mid(....,1)=""220.133.250.210 08/11