大橙子网站建设,新征程启航
为企业提供网站建设、域名注册、服务器等服务
用字符串保存两个数据,当然只有你这种办法,另外提供你其它思路:
创新互联长期为千余家客户提供的网站建设服务,团队从业经验10年,关注不同地域、不同群体,并针对不同对象提供差异化的产品和服务;打造开放共赢平台,与合作伙伴共同营造健康的互联网生态环境。为通州企业提供专业的网站设计制作、成都网站设计,通州网站改版等技术服务。拥有10多年丰富建站经验和众多成功案例,为您定制开发。
1. flexcell增加两列,这两列隐藏不显示,额外数据可以从这两列读取
2. 用自定义类型数组,保存这两列数据,数组顺序和表格一样,或者数组中增加一个ID元素,与表格对应
If "3333aa".EndsWith("aa") Then MessageBox.Show("以aa结尾")
or :
dim str as string = "3333aa"
if str.EndsWith("aa") Then MessageBox.Show("以aa结尾")
使用一个单重的循环扫描这个字符串中的所有字符,对每一个字符的出现次数进行统计,最后输出每个字符的出现次数。
Private Sub Command1_Click()
s = InputBox("请输入一个英文字符串:")
Dim a(128) As Integer
For i = 1 To Len(s)
t = Asc(Mid(s, i, 1))
a(t) = a(t) + 1
Next i
For i = 1 To 127
If a(i) 0 Then Print Chr(i); ":"; a(i)
Next i
End Sub