[RESOLVED] String assistance

I have a button which places text into a text box which is then copied to emails.

here is the code:

TextBox40.Text = "IP Address :" & Ip & vbCrLf & "Default Gateway:" & Gw & vbCrLf & "Subnet Mask :" & Sm & vbCrLf & "DNS Servers :" & Dns

which results in:

IP Address :
Default Gateway:
Subnet Mask :
DNS Servers :

I'm trying to make the colons line up in a straight line vertically but can't seem to get them to match.

Any ideas?

What I would suggest is to create your own userform and then use labels to show that text. It will be very simple to align the text that ways :)

That will work, thanks.

Any idea why I can't get the last 3 characters removed with this condition?

If Right(test, 3) = "/##" Then
MsgBox Left(test, (Len(test) - 3))
End If

works for me
make sure no spaces at end of string

there is also sendmessage API with em_settabs
to align text in textbox

Quote:

---

Originally Posted by jsublime

That will work, thanks.

Any idea why I can't get the last 3 characters removed with this condition?

If Right(test, 3) = "/##" Then
MsgBox Left(test, (Len(test) - 3))
End If

---

What is the value of 'test'?

dim test as String

test=textbox41.text

And what is the value of textbox41.text ?

ive been testing it with various entries similar to 55.55.55.100 and 55.55.55.100/30

I could be wrong but I guess what you are trying to do is 'String Comparison'...

Here is an example of what I think you want... (In case I am wrong, then ignore this post...)

Code:

---

Sub Sample()
    Dim StrSample As String
    StrSample = "55.55.55.100/30"
   
    If Right(StrSample, 3) Like "/##" Then
        MsgBox Left(StrSample, (Len(StrSample) - 3))
    End If
End Sub

---

Interesting, that worked. Thanks!

Glad your query is solved :D

Do remember to mark the thread resolved :)

Check my signature on how to mark the thread resolved ;)