[RESOLVED] String assistance

[jsublime]

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?

[Siddharth Rout]

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

[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

[westconn1]

works for me
make sure no spaces at end of string

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

[Siddharth Rout]

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'?

[jsublime]

dim test as String

test=textbox41.text

[Siddharth Rout]

And what is the value of textbox41.text ?

[jsublime]

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

[Siddharth Rout]

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...)

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

[jsublime]

Interesting, that worked. Thanks!

[Siddharth Rout]

Glad your query is solved

Do remember to mark the thread resolved

Check my signature on how to mark the thread resolved