Tracking Forums, Newsgroups, Maling Lists
Home Scripts Tutorials Tracker Forums
 
  HOME    TRACKER    Visual Basic




Read .caption From A Button


I want my program to read from a label. so that when i click on a button it reads its caption and changes somthing in a modual.

I have this modual


VB Code:
Public Type DataType    TodayMonth As String    TodayMonthNum As Integer    TodayDay As Integer    username As String    ChosenMonthNum As Integer    ChosenMonth As String    ChosenDay As Integer    TotalUsers As IntegerEnd TypePublic Data(0) As DataType


and this is the code inside each button

VB Code:
Dim TodayDate As Integer    TodayDate = FriA.Caption    Data(0).TodayDay = TodayDate


but when i run the program i get this error.

Run Time Error "424":
Object required

So can anyone see a problem with my code, or is it that you can't read captions this way, and if thats the case how do i read captions?




View Complete Forum Thread with Replies

See Related Forum Messages: Follow the Links Below to View Complete Thread
Changing Taskbar-button Caption Without Changing Form Caption
Hi,

Is there any way to change the caption of the taskbar button, without changing the form's caption?

Thanks.

Read External Message Box Caption
hey all i was wondering if its possible to read a external message box's caption and if it contains certin words do an action like as a very simple example if windows generates an error the program reads the caption and looks for the word "error" if it finds it then does somthing i assume this would need some findwindow apis or somthing on that lines but not sure

Button Caption
Is there a way to make the caption go to two lines?

E.g. "The Thingy"

The
Thingy

With being centered and all?

Button Caption
Hi

I have two questions

1. i have a message box and i want to change the captions from default i.e OK,CANCEL,RETRY,ABORT to my own that is Append and Delete. How can i do that in a message box.

2 I have a button.......i need to change the color of the caption.

Can anybody help please??

Button Caption
I have a button that has a caption "Start" when i press it the caption changes to "Stop" but i dont know how to code the next bit, i want to caption to say "Start" again if i press it while it says "Stop"


BlueCode....

Command Button Caption
I have a Command Button on an Excel Worksheet, and the full vertical portion of my caption does not display
(bottom portion of lower case letters hanging below the imaginary writing line).

I have tried increasing the height of the button, but this has no effect.

Funny thing when the button has the focus, the caption is displayed properly.

How can I fix this?

Button Caption From Database
Hi

I was wandering if there was a way to get the caption on a button from a field in a database, I have an array of 10 command buttons cmdTest and i am trying to get the captions for the buttons from a field in an access database, i have tried the following but get a "Variable not set" error.

while not adodc1.recordset.eof
cmdTest(index).caption = adodc1.recordset.fields("Name")
adodc1.recordset.movenext
wend

Please can someone guide me in the right direction.

Many thanks

Button Caption In MsgBox
Is it possible to change a button caption in MsgBox?
For example OK caption should be "U REDU", CANCEL should be "PREKID"
I don't have so much experience (and knowledge) to write my own MsgBox. I use VB 5.

Command Button Caption
Hi,

I am trying to setup a command button so that its caption is the same as the text in a text box, which is on the same form. I just cannot work out how to do it. Any help would be much appreciated.

Thanks

Msgbox Button Caption
I'm trying to get a msgbox to look like this:
http://consolevision.com/members/fac...ges/msgbox.png

I got this example, actually from a Custom Message Box creator for Visual Basic, but the program was giving faulty code. Any way I can do this, without creating a form, the way I'm using it, the form thing will not do.

Format Button Caption To Right
Hi.
I've got one button with style set to graphical.
Is there any way to make the caption to appear at right side of the picture, instead of appearing down to the picture?
Thanks

Command Button Caption Help
wha I am trying to do is to use url address as button caption is it possible to do so. Also if I have 5 button in my app and 5 different url adress can i still use everyone of them as caption for each button.. not the same caption button different diffrent urls on each button.

MsgBox Button Caption
Is there a possibility to change the caption on the MsgBox Button .
I want that the button YES will be with caption EXIT and the button NO will be with the caption ENTER.

Shaykan

Command Button Caption
i want to know how can i display a commandbutton

caption with several language

for example to display the word "home"

i can do that with english, with hebrew but i cant with

russian.

i have the multi language support and all the needed

fonts

thank you

Thanks For The Help With The Command Button Caption
You can have it so that every line of the ListBox shows three words and an ellipsis, and when you click it, the entire item is copied to a MultiLine TextBox.

Example:

The item is:

This is an example of how to show
a MultiLine item in one line
of a ListBox

On the ListBox it shows:

This is an...

When you click it, the entire text is displayed in a MultiLine TextBox.

------------------
Yonatan
Teenage Programmer
E-Mail: RZvika@netvision.net.il
ICQ: 19552879
AIM: RYoni69

Command Button Caption
Can a command button caption have multiple lines?
I am trying to read in a text file or a rich text file at run time and assign the text to a text box and a command button. If the user clicks the text box its visible property becomes false and the command button becomes visible.(these two items cover the exact same space) This is giving me a selected unselected state. The command button has a different look then the rich text box. I would like to be able for them both to have the same text. Is this possible? I do not need rich text I just used the rich text box to start with.
thank you for your time and have a good day

Graphical Button - Get Caption To Appear At Top
I have a button with a caption and I have set the picture's style to 'Graphical'. If I load a picture onto the button the caption appears below the picture. Can I get the caption to appear above the picture?



Edited by - VBDummy on 7/25/2006 9:35:51 AM

Changing Caption On Button
hello i want to print the caption on button in vertical format and not in horizontal format that is by default i want to print the text in vertical style wht to do? plz reply

Special Button And Caption
hallo,in my vb program i have a special button,i.e. a picture with a label above (the picture have a particular paint related to the specified button).
when a push this button (i click on the picture or on the label), the picture change.
i use paintpicture for changing the picture,my problem is that the paintpicture overwrite the label. for not having some bad effect (flickering) the autoredraw of the picture is false...
how can i solve my problem?
thank you,Isabella

Caption's Color On A Button
How can I change the color of the caption on a command button ?

Button Short Cuts With && In Caption
Hi

i was just wondering would it be "much work"/possible to edit the Hovercommand button by "The Hand" to allow a user to use a shorcut to press a button. ( i.e Alt+s)

when i put the "&" before the letter in the caption it comes up with an underscore on the button but pressing alt and the required letter produces no effect

Any thoughts

Thanks
Road Runner

Caption && Text On Command Button?
Hello everyone,
can anyone give me some idea how to display a text as well as icon on a command button. I have seen such one being done in delphi, but, am wondering whether we can do it in VB. I tried but, in vain.
Thanks in advance,
K Lloyd

Form With Custom Button In It's Caption...
Okay, listen-up- Here's the deal....

Is there any way to create a custom object and place it in the
titlebar rect?

- Robert Butler

Howto Let Button.Caption Countdown From 3 To 0.
What i'm trying is to get the caption of a button to show the waittime left.

I have tried multiple things:


Code:
Button.Caption = 3
'Time 3 seconds of delay
While DateDiff("s", start, Now) < 3
Button.Caption = Button.Caption - (DateDiff("s", start, Now) / 1000)
DoEvents
Wend

Button.Caption = "Send"

and with a left$ but then it just removes the first number instead of the last 3:

Code:
Button.Caption = 3
'Time 3 seconds of delay
While DateDiff("s", start, Now) < 3
Button.Caption = Button.Caption - (Left$(DateDiff("s", start, Now) / 1000, 1))
DoEvents
Wend

Button.Caption = "Send"

In these both cases i don't see a countdown from 3 to 0 but i see a countdown with 100th's of seconds.. how can i fix it so it will only show me seconds?

Extract Number From Button Caption
I have a button on which the caption changes when a user enters a number in the input box. For example it might be 1 Unit then changes to 5 when the user enters 5. I need to capture the initial number into a variable to use after. The number can be any from 1 -10000. I just want to strip away the unit or units from the caption and then I have my number.

I am writting this inside of Excel.

Thanks!!

Returning Caption Of Button Clicked
Does anyone know a way of returning the caption of a button that is clicked?
I tried Me.Name in the button's onClick event but that returns the name of the worksheet.

What I am trying to do here is make my code expandable so that to add new elements all the end user will have to do is change the caption of a button or add a new one, and the caption itself will be used as part of the code.
Thanks!

Arrow As Caption - Command Button
I know I've done this before but can't seem to remember how. All I need to do is present the caption of a command button as an arrow. There is a character combination that will do this but can't seem to remember what it is.

The result should be the appearance similar to a drop down button.

Thanks in advance...

Command Button Caption Question
I want to change the color, but I don't see a value for it.... is it possible?

Change 'start Button' Caption
i remember there being some code to change the start button's caption, but all i can google up is the way to do it by editing explorer.exe. any ideas? thanks in advance.

Centering The Caption Of A Command Button
Hi everyone. I've got as problem with the appearance of the captions of my command buttons. For some reason, it's left-justifying them instead of centering, but only if the caption is more than one line.

In other words, if the caption is "NEW EMPLOYEE", and I make the button wide enough to all fit on one line, it's centered, but if I narrow the button to force it onto two lines, it appears as :-

NEW
EMPLOYEE

instead of as :-

NEW
EMPLOYEE

I can't find an 'allignment' property like there is for a label or text box, so what can I do?

Richard

Change MsgBox Button Caption
Hi All,
Can we change the caption of the message box? I guess I'll have to use an API. Required a quick answer. Any idea will be highly appreciated. Thanks.

How Does Caption Work On Command Button
hi

im creating a tic tac toe game and i change label into a comand this it my coding. i tried taking tha caption out but my program doesnt work. can u explain how this works

Sub PlayGround()
Dim i As Integer
Dim j As Integer

For i = 1 To 3
For j = 1 To 3
cmdPlayGround((i - 1) * 3 + j - 1).Caption = ""
intXPos(i, j) = 0
intOPos(i, j) = 0
Next j
Next i

intMove = 0
cmdNewGame.Visible = False
End Sub

Clearing A Button Caption With Variable?
Is this possible? How would i go about it?


VB Code:
Dim nick As Integernick = InputBox("Please enter the button number you wish to clear." & vbCrLf & "(Enter a number between 2 and 11", "Clear Custom")If nick < 2 ThenMsgBox "Please Enter a number between 2 and 11"ElseIf nick > 11 ThenMsgBox "Please Enter a number between 2 and 11"ElseCommand & nick.Caption = ""End If

Command Button Caption Right Of Icon
Does anyone know if there is an API or other method to do this please ?

Thanks
Rory

Command Button Caption Problem
hi all

i have a command button with caption = "V".
when i click, i want to toggle between "v" and "X", so here
is what i wrote in the code:


VB Code:
Private Sub cmdFillAgain_Click()    If gFillAgain = True Then        cmdFillAgain.Caption = "X"    Else        cmdFillAgain.Caption = "V"    End If    gFillAgain = Not gFillAgainEnd Sub


but in the first time i click the button, the Caption remains "x" even though
the gFillAgain variable is changing as it should.. it looks like only the first time the button is clicked doesnt work, because after that i have no problems...

any idea???
thanks

Changing Color Of A Button's Caption
I noticed there is no forecolor option for a button so how would one go about changing the color of the text within a button without making a graphic for it???? I've done it before I just don't remember how

Changing Caption's Color On A Button
I hate to even ask this because it should be so simple, yet I have no idea how to change the color of the caption on a button. How in the world do I do this?

Custom Button Caption Issue
I have created a custom button control with a caption property. When I am using this in another project, I am able to set the caption to whatever I want, and it shows correctly in design mode, however when I am running the project the button caption still shows as the default I have set on the control, how do I fix this?

Here is my code on the control:

VB Code:
Public Event Click()Private lblCaption As String Private Sub imgUp_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)    imgUp.Visible = False    imgDown.Visible = TrueEnd Sub Private Sub imgUp_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)    imgUp.Visible = True    imgDown.Visible = False    RaiseEvent ClickEnd Sub Private Sub Label1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)    imgUp.Visible = False    imgDown.Visible = TrueEnd Sub Private Sub Label1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)    imgUp.Visible = True    imgDown.Visible = False    RaiseEvent ClickEnd Sub Property Get Caption() As String    lblCaption = UserControl.Label1.CaptionEnd Property Property Let Caption(capt As String)   UserControl.Label1.Caption = capt   PropertyChanged "Caption"End Property

Renaming Command Button Caption?
How can I change the Caption of Commnad Button while running compiled file (exe) of VB?

And I want that the modification of command button caption should remain save when I run the same compiled file for next time.

Can anyone help me? How can I do this?

<vbcode>

Private HoldButton As String
Private Type POINTAPI
x As Long: y As Long
End Type


Private Sub CBObject1_MouseUp(Button As Integer, Shift As Integer, x As Single, y As Single)
HoldButton = "CBObject1": CBObject1.SetFocus
If Button = 2 Then Me.PopupMenu Menu1
End Sub


Private Sub menuRename_Click()
Dim x As String
If HoldButton = "CBObject1" Then x = InputBox("Rename " & HoldButton & " to what?", "Object Renamer", CBObject1.Caption): CBObject1.Caption = x
End Sub

</vbcode>

Thanks.

Change Button Caption On Right Click
Can you code events behind a right click? For instance, I want to make the caption of a button an "X" on left click and an "O" on right click. Is this possible?

RESOLVED - Cmd Button Array - Caption
Hi

I have a cmd button array but once the user has selected the
appropriate button I want to caption to disappear!!

my code

VB Code:
Private Sub cmdbutshft_Click(index As Integer)   'Remember that the first CommandButton in the array is'ALWAYS 0. commandbutton array to determine the packers shift          If index = 0 Then          Strshiftletter = Trim$("A")        ElseIf index = 1 Then         Strshiftletter = Trim$("B")        ElseIf index = 2 Then         Strshiftletter = Trim$("C")        ElseIf index = 3 Then         Strshiftletter = Trim$("D")    End If          Select Case Intwndprogress        Case Is = 10                txtinformation.Text = Strshiftletter                PicresultsShft.Print "P_Sht"; vbCrLf & CStr(txtinformation)                txtinformation.SetFocus                txtinformation.maxlength = 11                txtinformation = ""             Call wndprogres   End Select     [b] Set cmdbutshft.item(0).index(1 - 3) = "" THIS IS THE LINEIN QUESTION  [/b]       Lbltext.Caption = "Please enter code"            validate_code   End Sub


thanks

Command Button Caption Text
How can I change the color of a command button's caption from say black to blue when the cursor moves over the button and changes back to black when the mouse moves away from the button?

Centre Caption On Command Button
Hi all,

On a command button, if the caption is forced to wrap due to the length, the second line of text starts underneath the start of the first. Is there a way to make all of the lines of the caption centred?

e.g.

At the moment....

Code:
Import Monthly
Data

I need.....

Code:
Import Monthly
Data

Hope that makes sense!

Changing The Caption Of A Button In Excel
Hi all !!!

This is my problem:

From vb, I need to add a macro to an Excel file from a txt file (done!!!)
Then, I need to add a button to fire the macro (done!!!)
But, I need to change the caption of the button !!!
I canīt, I tried recording a macro and getting the code... useless.


Code:
X.application.VBE.ActiveVBProject.VBComponents.Import MyTextFile

X.activesheet.Buttons.Add(381, 171.75, 111, 30.75).OnAction = MyMacroName


Any ideas???
Thanx

Common Dialog Button Caption
I am using the cmDialog control to select a file that I want to process in my VB app. On the dialog, there is a button labeled OPEN. Is there a way to change the caption of the button to "Attach File"?

Thanks for your help

Option Button && Caption Problem
I am trying to find an alternative way to display this. What I am having trouble with is the display on the form. When I click the command button, it does not give the correct answer, but when I click it twice it does.

I tested it out thinking the calculation was incorrect but, if I make the rem line active, it will give me the correct calculation with 1 click of the button, but without the " **** payment will be " line before it.

Any suggestions?



Private Sub cmdCompute_Click()

If optYearly.Value = True Then
PaymentsPerYear = 1
lblPayment.Caption = "Yearly payment will be " & _ Format$(Payment, "Currency")

Else
PaymentsPerYear = 12
lblPayment.Caption = "Monthly payment will be " & _ Format$(Payment, "Currency")
End If

''lblPayment.Caption = Format$(Payment, "Currency")

End Sub

How Change Caption Color Of Button?
Hi,

I am a beginner to Visual Basic. How can I change the color
of caption text of command button?

Thanking in anticipation.

J.K.Saini.
India.

How To Wrap Vb6 Toolbar's Button Caption?
Hello,

How to wrap the toolbar's button caption text in visual basic 6?

your help is appreciated..!

Regards
Krishna

Command Button Caption Coloring
Hi every body,

Is there is any API to change the Command buttons Caption Color?. if so please give that

Regards
Madeshwaran


Don't HURT the heart which LOVES You.
Don't LOVE the heart which HURTS You.

Edited by - Madeshwaran_Mohanraj on 4/29/2005 4:02:19 AM

Copyright Đ 2005-08 www.BigResource.com, All rights reserved