高手啊, 我已经读取字符串,如下str=browser("name:=ssss").page("name:=wwwww")
之前用vbs是可以用EVAL函数直接生成对象,现在我用VB语言改写, 发现不能使用eval函数,需要自己定义,请问如何将上述自符串转换成如set obj=str....的呢,在线等
vb 如何将字符串转换成对象
答案:2 悬赏:20 手机版
解决时间 2021-03-01 21:22
- 提问者网友:最爱你的唇
- 2021-02-28 23:37
最佳答案
- 五星知识达人网友:千杯敬自由
- 2021-03-01 01:06
没见过vb6能把字符串转换为对象的,vb.net倒是可以用Cobj()转换。
干什么用?可以建立一个简单的类,里面只设一个字符串公共变量,并把它设置为默认成员。
可以自定义个函数,如Cobj( string str) ,
function Cobj( str as String) as CString '返回字符串对象
dim cstr as new CString
cstr=str
set Cobj=cstr
end if
CString 自己定义的类
成员只一条:
Public Value as String ‘从工具\过程属性菜单中 把value设置为默认属性
干什么用?可以建立一个简单的类,里面只设一个字符串公共变量,并把它设置为默认成员。
可以自定义个函数,如Cobj( string str) ,
function Cobj( str as String) as CString '返回字符串对象
dim cstr as new CString
cstr=str
set Cobj=cstr
end if
CString 自己定义的类
成员只一条:
Public Value as String ‘从工具\过程属性菜单中 把value设置为默认属性
全部回答
- 1楼网友:我住北渡口
- 2021-03-01 02:23
private sub form_load() dim zifu as string zifu = "nihao: hao" msgbox split(zifu, ":")(1) '将字符按冒号分割,然后输出最后的元素hao '或者 msgbox mid(zifu, 7) '从左往右开始从第七个字符开始取,直到最后 end sub
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
点此我要举报以上问答信息
大家都在看
推荐资讯