vb字符串函数实例(有图)

Public a As IntegerPrivate Sub Command1_Click()If a ThenCommand1.Caption = "已经点过了"Elsea = a + 1Dim s