重庆分公司,新征程启航
为企业提供网站建设、域名注册、服务器等服务
Dim regex=New System.Text.RegularExpressions.Regex("\(([^\)]*)\)")
创新互联主营集宁网站建设的网络公司,主营网站建设方案,重庆APP开发,集宁h5微信平台小程序开发搭建,集宁网站营销推广欢迎集宁等地区企业咨询
Dim s= regex.Replace("(111)k(222)","$1")
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
For i = 1 To 10
ListBox1.Items.Add(i)
Next
End Sub
Private Sub ListBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListBox1.SelectedIndexChanged
TextBox1.Text = ListBox1.Text
End Sub
用Erase 函数试试,
Erase函数的作用是:重新初始化大小固定的数组的元素,以及释放动态数组的存储空间。
希望有帮助
定义的时候默认就是空的。
由于是variant类型,可以用buffer=""或者buffer=vbnullstring或者buffer=Null或者buffer=0来手动清空,看你实际使用的时候它里面保存的是什么类型的数据了。