Visual Basic :: How To Show Any Text

How To Show Last Text In Text Box? *Resolved*
I have a 5 line textbox that holds 10 lines of text. I have multiline true.

As the textbox is an event log window, I want it to stay focused on the most recently added line. The way it currently works I see lines 1-5, but not 6 - 10. As I add lines 11 , 12 ,13, etc, I want them to be the last lines of the textbox with the rest that don't fit hidden above the box (ie I'd have to scroll UP to see them).

Thanks.

ps if it matters I add to the textbox like this:

textbox.text = textbox.text & "New Text" & vbcrlf

Show The Contain Of A Text File In A Text Box.
Hai guys. Here is my situation, i got a form with a file list box and a text box on it . What i wish to do is that, when i click the text file listed in the file list box, the text box will display the contain of the text file. Let say there is a text file named "Good" with the contain" I feel good today" in it, and when i select this text file the text box will display the text " i feel good today". Can any one provide me with the code please.

Here is what i do
Private Sub Text1_Change()
File1.Path = "C:My DocumentsVMBText Messages"
Text1.text = File1.Path & "" & File1.FileName
End Sub

But this did not work out. Help please. Thanks

How To Get VB6 Text Box To Scroll Down, Show New Text
I have set up a VB6 MultiLine Text Box with Vertical and Horizontal Scroll Bars.

But when I add text lines to it at runtime, and the text lines pass below the bottom of the Text Box, it does not scroll down to show the latest text that is added, but simply stays at the top of the Text Box

How do I get the Text Box to scroll down so it always shows the latest text lines that are added.

Always Show Last Text In Scrolling Text Box
After using text boxes for several programs I am stumped on this.

How do I display the last text sent to a textbox? The textbox has multiline on with vertical scroll bars. When I send text to the textbox (usually some numbers followed by a CR), the textbox always shows the 1st lines of text sent. I would like to see the last few lines of code?

Thanks for the help,
RAD DAD

Show Last Text
In my multiline textbox, I want to make it so that when text is entered, the last text entered is in view. Can someone help

How To Show "hidden" Characters In A Text Box/rich Text Control
Hi, I'm wondering if any of you have any tips on how I can display spaces, tabs AND Linefeeds in a Rich Text Control WITHOUT doing a
replace(.text, " ", another_char)

That is, I want to preserve the text, but only "view" them to the user, like you do in MS Word or Ultra Edit.

EDIT : I am using VB 6.0 in this project

Listbox Text Show
Hallo
I have a listbox with a list of item, I want, selecting the items, copy the item in another list box, this function well, my problem is that I want to show in the second listbox the value in the second column of the list, but I don't know how?!?!
here is the code

Sub addLabels()
For i = 0 To (Form1.listboxListOfCode.ListCount - 1)
If Form1.listboxListOfCode.Selected(i) = True Then
iCount = Form1.listboxIn.ListCount
Form1.listboxIn.AddItem
Form1.listboxIn.List(iCount, 0) = Form1.listboxListOfCode.List(i, 0)
Form1.listboxIn.List(iCount, 1) = Form1.listboxListOfCode.List(i, 1)
If typeLabel = 2 Then
Form1.listboxIn.List(iCount, 2) = Form1.listboxListOfCode.List(i, 2)
Form1.listboxIn.List(iCount, 3) = Form1.listboxListOfCode.List(i, 3)
Form1.listboxIn.List(iCount, 4) = Form1.listboxListOfCode.List(i, 4)
End If
End If
Form1.listboxIn.TextColumn = 1
Next
MsgBox (Form1.listboxIn.List(Form1.listboxIn.ListCount - 1, 0))
MsgBox (Form1.listboxIn.List(Form1.listboxIn.ListCount - 1, 1))
End Sub

thanks a lot
Adel

Need Help - How To Show Random Text
Hi all, good day!

I have a problem with vb6. I need to show random text in a lable or text box. that means, If command1 button click text box show another text from predefined text list. this must show when program start also. I mean,

ex: If user open once it display "Hello" after that he open the program in next time it will display "Howdy" etc.

Random text is must in the program like

Hello
Howdy
LOL

I am so confusing of this. Please some one help me. I am a new comer to vb6. I need your help please.

Thanks & Have a Nice day!
gymamal

Text Box In Excel Won't Show Value
My VBA experience would be consider novice so I turn to the experts. I have serveral text box in Excel that are populated from a form the user uses. After closing the form VBA inserts their values into the text boxes. The problem is that the text box is not showing the value. If I look at the properities window, it says that the value is there but it is not visible. Also, the same input is then inserted into other text boxes through out the excel file but when I move between the tabs the values will not hold and are replaced with what was there previously. The kicker is when I run this file from my desktop is works perfectly. When it is downloaded through a work server, I run into the visibility issue...any help/ideas/suggestions are most welcome. Thanks.

Show Keypress In Text Box
is there a way to display the keypressed from the keyboard in a text box?

I know how to do this, but it would take a lot of code. (a line for each key) is there an easier way?

(ex. if i pressed "A", make it show an "A" in the textbox)

Thanks VBF

Help! Is There A Way To Show The Alphabet In Text Box?????
Hi I wanted to know if I could get a type of calculation that would put abcd all the way until z in text box instead of writing the 26 letter long alphabet. Like something like this code:

VB Code:
For i = "a" To "z","A" To "Z"

Some function like that.

How: Don't Show Pop-up Menu On Text Box
Dear All,

In my application, I have a login form having two text boxes(login and password).

When user rights clicks with mouse on the text boxed, pop-up menu appears. This is not the standard followed by Microsoft applications.

What I Want: When user right clicks with mouse on the text boxes, pop-up menu shoud not appear.

Please Guide.

Regards,

Edit: Added green check mark - Hack

Getting An && To Show In Lable And/or Text Box
is there a way to get the & symbol to show in a label or text box - i've already tried the "A " & chr(38) & " B" and it doesn't work

Show Memory In A Text Box.
I was wondering how you could show how much memory someone has in a textbox. Please Help!

Thankyou
Iwan.

Show Text On LCD Screens.
hiya all,

I have a small LCD screen like
http://www.nollet.com.au/serial_lcd_420.htm

BUT it hasnt got a serial converter card.

I have hoced it up to the parallel port BUT i have never programed though the parallel port before and dont know where to start.

If anyone has done somthing similar or knows how to send info though parallel port please reply..

Thank you for your time.

Show Different Text From ListView
With ListView 6.0 in VB6:
When a ListView is displayed, I want to have some of the
subitems text displayed differently (without modifing the subitem's value). i.e. show subitem(1)values +1
Im sure I have seen this done...

How Do I Show My Text Uniformly?
I have two seperate froms where i have to display text from seperate sequential files. one is a list box and the other a combo box. i have six seperate variables with text ot numbers in them, but when i display them they end up all over the place. any suggestions?

Show The Arabic Text
i want to show the text or image while a sentence is speak by computer. at the end the next sentence automatically shown in the window, and similarly go on, and at the end its again back to the initial point. can any one help me. thanx. the main problem is that how i get information that computer speak first sentece, b/c i showed the text and images, but not at that time when sentence end.

you can responce it at uiwpk@msn.com

thanx very much

Need Help To Show Text While Typing
In my program, there i a text box, a label and a checkbox, among others. What it does now, if you type something and then click on the checkbox, it will show what you typed in the label. If you check the checkbox then type something, it won't show what you typed, unless you uncheck and then re-check the checkbox. What I would like to do is get it so that if they typesomething then check the box it will show it. But also, if they check the box then type, it shows in the label what they are typing, as they type it. Any help would be great, thanks!

Only Show Three Lines Of Text At A Time
Is there a way to only show 3 lines of text at a time in a textbox? for instance, if i entered the following into a textbox,

this is line one
this is line two
this is line three

is there then a way to make it so that when I enter another line(like "this is line four"), the first three lines will be scrolled "up" and out of sight so you can only see the "this is line four" text and so on

I kind of want to make a "page down" -like effect in a textbox.

Thanks in advance for any help!

Compare A Value And Show The Result In A Text Box
Hey Guys,

This is getting to me its just not working and as far as I can see my code is ok.

I have a combobox control and a textbox control.

The combo is filled with a recordset and when the user picks a record from the combo i need to get the id number of this record to display in the textbox.

The combobox loads on the form_load event with:
'Combo lists code1
Dim strConnect
strConnect = ";DATABASE=" & App.Path & "sbt.mdb" & _
";PWD=not tellin"
Dim rs5 As DAO.Recordset
Dim db5 As DAO.Database
Combomales.AddItem "Add New" & _
"[" & "Add" & "]"
Combomales.AddItem "Unknown"
Set db5 = OpenDatabase("", False, False, strConnect)
Set rs5 = db5.OpenRecordset("select * FROM males " & _
"ORDER By field_kcname")

Do Until rs5.EOF
Combomales.AddItem rs5.Fields("field_kcname")
rs5.MoveNext

Loop

rs5.Close
Set rs5 = Nothing
' end of Combo lists code1

Private Sub Combomales_Change()
Dim strResults
Dim strConnect
Dim rs As DAO.Recordset
Dim db As DAO.Database
strConnect = ";DATABASE=" & App.Path & "sbt.mdb" & _
";PWD=not tellin"

Set db = OpenDatabase("", False, False, strConnect)
Set rs = db.OpenRecordset("select * FROM sbt where field_kcname like '" & Combomales.Text & "'")
strResults = rs.Fields("field_id").Value
Me.TextBox(5).Text = strResults
Me.TextBox(5).Refresh
Set rs = Nothing
rs.Close
End Sub

so far this runs without erroring out but the textbox doesnt get the value.
Any help is appreciated.
Regards as ever.
C

Hide/Show Scrollbars In Text Box
I am trying to show the scrollbars in a multiline textbox when the text gets too big.
i.e. put the vertical ones in when there is too many lines and the horizontal ones in when there is too many chars on a line.

The code for the vertical bars works fine.
The code for the horizontal bar shows the bar but it doesn't activate
i.e. the text still wraps onto the next line

What am I doing wrong?

I have used some of Martys code from here http://www.vbforums.com/showpost.php...74&postcount=8 and also someone elses that I cant remember

VB Code:
Option Explicit Private Declare Function ShowScrollBar Lib "user32" _(ByVal hWnd As Long, ByVal wBar As Long, _ByVal bShow As Long) As Long Private Const SB_HORZ = 0Private Const SB_VERT = 1Private Const SB_HWND = 2Private Const SB_BOTH = 3 Private Const EM_GETLINECOUNT = &HBAPrivate Declare Function SendMessageAsLong Lib "user32" Alias "SendMessageA" _ (ByVal hWnd As Long, ByVal wMsg As Long, ByVal wParam _ As Long, ByVal lParam As Long) As Long Private Sub txtinfo2_Change() Dim lngLineCount As Long ' Make sure we're at the beginning txtinfo2.SelStart = 0 ' Count the number of lines in txtinfo2 lngLineCount = SendMessageAsLong(txtinfo2.hWnd, EM_GETLINECOUNT, 0, 0) ' Multiply line count by line height and add 505 for border If Me.TextHeight("A") * lngLineCount + 505 > txtinfo2.Height Then ShowScrollBar txtinfo2.hWnd, SB_VERT, True End If If Me.TextHeight("A") * lngLineCount + 505 < txtinfo2.Height Then ShowScrollBar txtinfo2.hWnd, SB_VERT, False End If ' Make sure the next character gets placed at the end txtinfo2.SelStart = Len(txtinfo2.Text) + 1 '5205 seems to be the width when a horizontal scrollbar is needed If Me.TextWidth(txtinfo2.Text) > 5250 Then ShowScrollBar txtinfo2.hWnd, SB_HORZ, True End If If Me.TextWidth(txtinfo2.Text) < 5250 Then ShowScrollBar txtinfo2.hWnd, SB_HORZ, False End If End Sub

Show If Caps Is On In Text Box ?[solved]
i got a small question is there a way to show if caps are on or off in a text box ? i used the search but i coulndt find a thing im just wondering if theres a way...like the box below(the vbcode is: on box) i need that,but then for caps

How Can I Show A Picture In A Rich Text Box?
How can I show a picture in a rich text box? I know there must bw a way because I have seen that when we use the MSN messenger which shows the emoticons in the text box.

Create And SHOW New Text Document
I know this is a stupid question but I can't figure out how to do it. I have an application that allows the user to look at a text box with results from a query in it.

I want to give the user the ability to create a text document with the info in it. I have searched the forum and can't find an answer.

I want to know how to create the document, add the info AND THEN SHOW IT SO THE USER WILL THEN SEE IT IMMEDIATELY.

Please help.

How Do I Show Syntax Highlighting In A Text/Rtf Box?
I am building a HTML editor and would like to use syntax highlighting..now how do i do that?

Getting Combo Box To Show -Please Select- Text
I am adding a ComboBox to a worksheet, purely in a list format with several available choices. However the default view is none of these choices show immediately - the box is blank until you hit the drop down arrow. Does anyone know how I can enter the text --Please Select Data Type--- to show in the box at the beginning ?
thx
Mark

Show Running Count In Text Box
I am doing some testing. Calling a dll function 50,000 times.

Dim nCallCount As Long
nCallCount = 0
For nCallCount = 1 To 50000
DummyFunc1 v1
Next nCallCount

I want to display the running call count in a text box:
For nCallCount = 1 To 50000
DummyFunc1 v1
txtCallCount.Text = nCallCount
Next nCallCount

But the txtCallCount text box does not show the changing value. Only 50000
after the loop is exited.

How do I repaint the form each time thru the loop so that I can see what the
current call count value is ?

thanks,
Steve Richter
email@removed

Show Windows Get Window Text? Help
Hey all I read a tut.. on Get windows and show windows in notepad and how to
send messages on it I am weary on it can any of you help me understand it
better some how in just confused about it

--
Frank R. Jr.

!! How To Show Hyperlinks In A Rich Text Box !!
1. How do I display the hyperlinks in a rich text box. Underlining the text is not the solution. It should change the mouse icon when a move over to the hyperlink. Or is there any ActiveX control which does the same.

2. How to resize the rich text box as the user is typing text inside it, like 'Microsoft Word' and 'Microsoft Powerpoint' does.

Show Text In A TextBox From A Class??
This does not work as I planed...
I have a textBox in my Form1 named txtFile
This works fine with loping and getting the text from the file and showing it in the msgBox but I can't get it to show the text in the textBox, way does it not work?

I am new to VB so it is probably a simple error I have made

Code:
Option Explicit
Dim objForm1 As New Form1

Public Sub PrintTheFile()
Dim x As Long
Dim Name As String
Dim URL As String

'** This objForm1.getURLFile is calling a function with that name and getting a UBound for MyArray
'** This objForm1.GetAryInternet x, Name, URL calls an other function that uses my Array to set the URL and Name variables
'** With this objForm1.txtFile.Text I want to insert the text from the variables Name and URL in to my textBox named txtFile
'** MsgBox objForm1.txtFile.Text This is showing exactly that I want to show in the textBox.

For x = 0 To objForm1.getURLFile Step 2
objForm1.GetAryInternet x, Name, URL
objForm1.txtFile.Text = objForm1.txtFile.Text + URL + Name + vbCrLf
MsgBox objForm1.txtFile.Text

Next

End Sub

Show All Lines Of An Text File
Hi,

How can i do an loop to show all lines from an text file? The ReadAll method is not useful to what i need to do, im trying this but dont work:

Code:
Public Sub VerificaFormatoTxt(ByVal FilePath As String)
    Dim i As Variant
    Dim fso As New FileSystemObject
    Dim file As file
    Dim ts As TextStream

    Set file = fso.GetFile(FilePath)
    Set ts = file.OpenAsTextStream(ForReading)
    For i = 1 To ts.AtEndOfStream
        s = ts.ReadLine
        Debug.Print s
    Next i
    ts.Close
End Sub

Edited by - Augusto on 10/25/2004 1:37:18 PM

Open A Text File And Show The End Of It
I have a really big text file, I would like to open it and rool the scrol bar to the bottom

I use shell to open, it works but the scroll bar is on the top

How can I do that?

Thanks a lot

How To Set [B]ControlTooltip Text And Show At Runtime[/B]
Please does anyone know how to set control tooltip text at runtime and also allow it to show....

I have a box that I disable at runtime and so I wanted to be able to show a tool tip that says the box is disabled

How To Show A Text File From VB Application
how to open a txt file from a vb application.
I have tried using shell command but i get a invalid procedure error. the code is as follows

dim sid

sfile = "" & Flxgrd1.CellSet(Row, 5).Value & ""

sid = shell (sfile,1)

Kindly help. Is it that shell can be used to execute only Exe's?

Thanks

Show Different Text In Taskbar Window
Hello guys, I'm mainly a VB programmer currently looking for a tip to show a different text in a window taskbar, not the form's caption. Anyone could help me do it in VB 6 ? I know some API is invlolved, but I didn't figured it out how.

Thanks !

Tooltip: Show Time And Text Change
hi there!

I have two questions about tooltips:
1) can I reduce the show time to zero? Soit would be shown at the right moment the the user hover the mouse over it.

2) I am trying to change the tooltiptext according to the txtfield content (so that it could show the entire content for the user).
I have txtfields(0) ... txtfields(20).
Can I use only one code, instead of crating codes for every field?
like this:

Code:
Private Sub txtfields_MouseMove(...)
If Len(txtFields.text) > 23 Then
.ToolTipText = txtFields.Text
End Sub

[]'s
r.

Textbox.text To Show More Than 32kb Of Data
hello
i'm reading a file, i want to display it inside a textbox (or some other text control), my file is ~5mb, but the textbox.text property is truncated to 32kb always, so the file content's are truncated,
what can i do to show the whole file in the textbox?? is there another control to do this better??
thanks for your help

Show Progress While Opening Text File.
When the user opens a large file, I want to show a
progress bar to ease their minds. I don't care for an
hourglass. Actually, I despise them.

I would guess the .Max of the progress bar would be
the number of lines in the text file. I would then need
to read the file line by line, and set the .Value of the
progress bar accordingly.

I need the fastest way though, just the theory behind it,
not the actual code.

Any help would be cool.

Show Textbox's Hidden Text Using Tooltiptext
I've got a textbox that contains many individual lines of text, each ending with a crlf.

Some of the lines contain more chars than can be displayed because the width of the textbox isn't wide enough.

Is there a way to make it so that when you move your mouse over a line that's not fully exposed, you can show it in its entirety using the textbox's tooltiptext property. I know they do this in Windows all the time.

Also does anybody know of a way to get crlf's into a tooltiptext? Even if it's some add on ocx or something. I'm willing to pay for it. The single line that VB offers is a bit limiting.

Thanks,
John

When I Move The Mouse Over A Menu, Show A Text
How can i do that ?

I have menus, and when i move the mouse over the menus
i want than in a label appears a text referer the menu, like
the WordPad

I know than i must use the ModifyMenu Api but how ?

Can anyone send me a source ?

Please, don't say : Use GetSubmenu or something, only real
source please

Show The File Selected With Browsing In The Text Box.
How can I make the browse button to select the Input and/or Output file,
so that when the file is selected you can see the full path with filename
in the text box near the browse button?

Thanks

Show Filename In Text Box When Opening A File
I want to open a file (picture) but i dont want to load the image a just want to place the filename and .filetype in a text box. This is because i am creating an xml generator for SE Mods. Heres my code

Code:
Private Sub cmdApply_Click()

Dim strBuffer As String
Dim intDemoFileNbr As Integer
Dim strFileToOpen As String

On Error GoTo cmdApply_Click_Exit

With cmdOpen
.CancelError = True
.InitDir = mstrLastDir
.Flags = cdlOFNOverwritePrompt + cdlOFNPathMustExist
.FileName = ""
.Filter = "Png Files(*.png)|*.png|All Files(*.*)|*.*"
.ShowOpen
.DialogTitle = "Select Image"
strFileToOpen = .FileName
frmMain.Text1.Text = .Name
End With

On Error GoTo cmdApply_Click_Error

mstrLastDir = Left$(strFileToOpen, InStrRev(strFileToOpen, "") - 1)

Exit Sub

cmdApply_Click_Error:
MsgBox "The following error has occurred:" & vbNewLine _
& "Err # " & Err.Number & " - " & Err.Description, _
vbCritical, _
"Save Error"

cmdApply_Click_Exit:
End Sub

Yes i did copy the code from someone else in the website but edited it. I am stuck though because i open the dlg Box and when i select the image and click open it says the whole Filedirectory and the filename in the text box. i just want the filename so instead of "D:...name.png" i want "name.png"

Please help
cheers

How To Show Any Text

What i am trying to do is find out what empty text is like whatever i type in the txt box it will add it to a box.ive tried txtname.text = "" txtname.text = "."im not sure can anybody tell me

What i am trying to do is find out what empty text is like whatever i type in the txt box it will add it to a box.
ive tried

txtname.text = ""

txtname.text = "."

im not sure can anybody tell me