符合中小企业对网站设计、功能常规化式的企业展示型网站建设
本套餐主要针对企业品牌型网站、中高端设计、前端互动体验...
商城网站建设因基本功能的需求不同费用上面也有很大的差别...
手机微信网站开发、微信官网、微信商城网站...
第一个问题有个简单的方法,把字符串变量赋值到一个textbox里面,利用textbox.lines实现。如:
10年积累的成都网站建设、成都网站设计经验,可以快速应对客户对网站的新想法和需求。提供各种问题对应的解决方案。让选择我们的客户得到更好、更有力的网络服务。我虽然不认识你,你也不认识我。但先网站制作后付款的网站建设流程,更有阿瓦提免费网站建设让你可以放心的选择与我们合作。
dim a as string ="hh12345" vbcrlf "qdq123" vbcrlf "ddd244" vbcrlf "whw266" ’定义变量
textbox1.text=a ‘赋值
message.show(textbox1.lines(2).tostring) ‘显示第三行内容。
第二个问题结合第一个问题,用循环逐行查找,就可知道字符串第一次出现在哪行。
在VB中是这样的,没学过VB点虐 ,你变换一下就可以了
按你说的,用用Left,Right和Mid
Option Explicit
Private Sub Command1_Click()
Dim Num(2)
Num(0) = Val(Left(Label1.Caption, 2))
Num(1) = Val(Mid(Label1.Caption, 3, 1))
Num(2) = Val(Right(Label1.Caption, 2))
MsgBox "Num(0)=" Num(0) vbCrLf "Num(1)=" Num(1) vbCrLf "Num(2)=" Num(2)
'如果想测试是不是可以计算,可以用这一句
'MsgBox "Num(0)+1=" Num(0) + 1 vbCrLf "Num(1)+1=" Num(1) + 1 vbCrLf "Num(2)+1=" Num(2) + 1
End Sub
Private Sub Form_Load()
Label1.Caption = "12345"
End Sub
有问题请追问,满意请采纳!
因为|在正则表达式中是或的意思,如果要用|字符的原意,需要用转义符\转义才行.
因此,你的第二个函数调用应该这样写dim str3 as string = Extract(str1,"6","\|",false)
加一个转义符.