主题：[求助]整数列单元格格的值，加1和减1按钮代码怎么写？

比如当前单元格值为10

按钮1点击实现，值10变11

按钮2点击实现，值10变9

如果是字符串，后面要字符串呢，怎么修改呢？用那个函数呢？

试了 下面代码不行，用那函数呢？

CurrentTable.Value = val(CurrentTable.Value) + "0.2"

比如单元格值  201805-366

按钮后，值变成  201805-366.2

比如单元格值  201805-366

按钮后，值变成  201805-366.2

列的多行单元格中字符长度不要一样，要怎么实现呢？

比如：

中国   中国.2

我是谁   我是谁.2

20180-366    20180-366.2
201805-367  201805-367.2

图示，下面按钮代码，执行后，方法  只是窗口提示 方法.2

怎样单元格的值，也变成  方法.2

Dim str As String = e.Form.Controls("TextBox1").Text
Dim mc = System.Text.RegularExpressions.Regex.Matches(str,"[0-9.]+")
If mc.count > 0 Then
    Dim s As String = mc(mc.count-1).value
    msgbox(s)
    str = str.replace(s, val(s) + 0.2)
    msgbox(str)
Else
    str = str & ".2"
    msgbox(str)
End Ifa

此主题相关图片如下：图.jpg

谢谢坛主指教