※ 引述《duduyoo ()》之铭言： : 标题: [evb ] 问一个简单的if ~then字串的判别 : 时间: Sun Feb 19 15:31:15 2006 : : 专题进行一个读取资料,目前进行到字串判别 : 我是用evb写的 不过问的问题应该不太有关系.... : : 以reader读到资料後会在 Text1.Text 显示 例如显示 0100018B775A (应该是16进位) : 读取的部分已经ok,读到的数值会显示在 Text1.Text 栏位 : 我想要依照读到的数值不同进行不同的动作, 所以我写: : : If Text1.Text = "0100018B775A" Then +我的动作 : : 可是没有成功, 明明执行出来 Text1.Text 栏位显示的就是 0100018B775A : 我是一边弄一边学,所以语法不太清楚 : 请问是需要以什麽不同的写法吗? 16进位的表示方式呢?? : 不能以 "0100018B775A" 直接表示吗? : 麻烦告知 谢谢!! : : -- :

※ 发信站: 批踢踢实业坊(ptt.cc) : ◆ From: 163.25.148.34 推 LPH66:你是怎麽在Text1.Text上显示的? 02/19 17:47 设一个tmpSrt字串接收读取到的讯号 (讯号很长 只取中间需要的一段) 再把tmpSrt传到Text1.Text显示 If Len(Mid(tmpStr, 9, 16)) < 16 Then Text1.Text = "Try again" Else Text1.Text = Mid(tmpStr, 9, 16) End If 下面就是我要做 If...Then 弄不出来的地方 目的是要开启IE 网址是根据Text1.Text接收到的值 Dim Retval As Boolean Dim sURL If Text1.Text = "0100018B775A" Then sURL = Text1.Text Retval = CreateProcess("\Windows\iexplore.exe", sURL, 0, 0, 0, 0, 0, 0, 0, 0) End If 麻烦请指导一下了 谢谢 --

※ 发信站: 批踢踢实业坊(ptt.cc) ◆ From: 163.25.148.34 ※ 编辑: duduyoo 来自: 163.25.148.34 (02/19 18:30)