Message 1 of 4
here is my qustion

Not applicable
11-09-2003
08:45 PM
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report
hi,
here is my qustion.
Private Sub CommandButton1_Click()
Dim susuki1 As String Dim i As Integer
a = 2
b = 2
H = Replace(susuki, "a", " 2 ")
H = Replace(H, "b", " 2 ")
MyLen = Len(H)
H = mid(H, 2, MyLen - 1)
MsgBox Val(H)
End Sub
i just want the result to be a double instead of a text.(
for exemple ,to be 4 instead of 2+2)
would you like me to tell me how to do it.
as a matter of fact susuki1 is a formula and a ,b are both variants,that is
to say they are not always 2s.
thank you.
with regards
here is my qustion.
Private Sub CommandButton1_Click()
Dim susuki1 As String Dim i As Integer
a = 2
b = 2
H = Replace(susuki, "a", " 2 ")
H = Replace(H, "b", " 2 ")
MyLen = Len(H)
H = mid(H, 2, MyLen - 1)
MsgBox Val(H)
End Sub
i just want the result to be a double instead of a text.(
for exemple ,to be 4 instead of 2+2)
would you like me to tell me how to do it.
as a matter of fact susuki1 is a formula and a ,b are both variants,that is
to say they are not always 2s.
thank you.
with regards