|
What code did you write to make this shortcut key work ? How has the debugger led you to believe that it should be saving ?
Christian Graus
No longer a Microsoft MVP, but still happy to answer your questions.
|
|
|
|
|
Sir,
its not the shortcut key code since this shortcut is just to focus the Save button '&Save' event is firing is the btnSave_click only.. but in the datatable which i m using & binding to datagrid is not considering the last record because user is not hitting any key to generate the new row in the datagid instead it just saving the data....
|
|
|
|
|
OK, so you need to write code that detects that a record has not been saved, based on key presses in the grid ?
Christian Graus
No longer a Microsoft MVP, but still happy to answer your questions.
|
|
|
|
|
No i just need to write a code which saves all the records edited or added new in the grid on the pressing of Alt + s keys
|
|
|
|
|
OK, so the code issue IS that you are pressing a key and you didn't write code to make it do anything ? I am confused....
Christian Graus
No longer a Microsoft MVP, but still happy to answer your questions.
|
|
|
|
|
dont get confused... Sorry if i am unable to explain u properly well i had found the solution...
thanks for ur support & invaluable time...
|
|
|
|
|
Public Class Form1
Delegate Sub d(ByVal b As Boolean, ByVal b1() As Button)
Private Sub disablefunction(ByVal val As Boolean, ByVal ParamArray b() As Button)
For i As Integer = 0 To b.Length - 1
b(i).Enabled = val
Next
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.Invoke(New d(AddressOf disablefunction), False, Button1, Button2)
End Sub
End Class
</pre>
I am getting the following error
Parameter count mismatch
|
|
|
|
|
It's sure VERY nasty that you're passing controls arround, but does ParamArray mean you can pass as many buttons as you like, or do you need to create the array and pas it ?
Is that really how you call a delegate in VB ? It looks nasty compared to C#
Christian Graus
No longer a Microsoft MVP, but still happy to answer your questions.
|
|
|
|
|
Pretty sure ParamArray is the equivalent of the C# params keyword. Regardless, his delegate signature is d(bool, Button) and he's calling it with two Buttons...
|
|
|
|
|
Christian Graus wrote: Is that really how you call a delegate in VB ? It looks nasty compared to C#
Not exactly. He's doing Me.Invoke, which would call a method on the main thread. From what I know, the same thing in C# would be (note that I've also fixed his problem here):
this.Invoke((d)disablefunction, false, new button[] {Button1, Button2})
|
|
|
|
|
ParamArray only works when you are directly calling the function. The arguments passed to a ParamArray parameter will always be converted to an array at compile time. When you are using Me.Invoke, you need to make the array yourself.
Me.Invoke(New d(AddressOf disablefunction), False, new Button() {Button1, Button2})
As a bonus, if you had declared the function as
disablefunction(ParamArray b() as object)
and called it as
disablefunction(new button() {Button1, Button2})
you would get a one element array that is an array of buttons.
|
|
|
|
|
Good day fellow codeproject.com'ers.
I am missing a vital part of theory which I've identified when I tried the below. (I believe it's theory...)
Please can one of you assist me by filling the theory gap I have. I've been through MSDN and Google, but to no avail...
Question:
Why can one not call a class from within another class? I don't mean within a function of a class, but at the top, where one declares variables pertaining to that class.
E.g. Below:
Friend Class Class1
Dim _message As String
Public Property Message()
Get
Return _message
End Get
Set(ByVal value)
_message = value
End Set
End Property
End Class
And here is where it fails, intellisense doesn't see the properties or methods of the variable (first class), I've labled the variable as THISDOESNTWORK.
Friend Class Class2
Dim _myVariable As String
Dim THISDOESNTWORK as New Class1
Public Property myVariable()
Get
Return _message
End Get
Set(ByVal value)
_message = value
End Set
End Property
End Class
It works when I place the code
Dim THISDOESNTWORK as New Class1<br /> within a function, so either there is a "secret way to do this", or I'm missing a bit of .Net/OOB Theory.
Thanks in advance... 
|
|
|
|
|
class2 needs to be like this
Friend Class Class2
Dim _myVariable As String
Dim THISDOESNTWORK As New Class1
Public Property myVariable()
Get
Return THISDOESNTWORK.Message
End Get
Set(ByVal value)
THISDOESNTWORK.Message = value
End Set
End Property
End Class
'Never argue with an idiot; they'll drag you down to their level and beat you with experience.' ~ anonymous
'Life's real failure is when you do not realize how close you were to success when you gave up.' ~ anonymous
|
|
|
|
|
Thank you!
Ah, a blonde moment of note!
This one will definatly go down in the books a silly moment for me, hopefully this helps someone else
Thanks again.
- Artificial intelligence is no match for natural stupidity
|
|
|
|
|
It should also be mentioned that your syntax might be a bit off:
Friend Class Class2
Dim _myVariable As String
Dim THISDOESNTWORK as New Class1
Public Property myVariable()as string
Get
Return THISDOESNTWORK._message
End Get
Set(ByVal value as string)
THISDOESNTWORK._message = value
End Set
End Property
End Class
or
Friend Class Class2
Dim _myVariable As String
Dim THISDOESNTWORK as New Class1
Public Property myVariable() as Class1
Get
Return THISDOESNTWORK
End Get
Set(ByVal value as Class 1)
THISDOESNTWORK= value
End Set
End Property
End Class
Regards,
Thomas Stockwell
Programming today is a race between software engineers striving to build bigger and better idiot-proof programs, and the Universe trying to produce bigger and better idiots. So far, the Universe is winning.
Visit my Blog
|
|
|
|
|
I have web-pages & MS Access database in my web-host (http://www....), is there easy way to use VB.net to access it without using FTP?
If possible, please provide valid links or sample codes.
Thanks 
|
|
|
|
|
where is the access file in relationship to your vb.net code? why does ftp come into play?
'Never argue with an idiot; they'll drag you down to their level and beat you with experience.' ~ anonymous
'Life's real failure is when you do not realize how close you were to success when you gave up.' ~ anonymous
|
|
|
|
|
Please see the comments on Can I use VB.net and XML to read/write a MS access database in the web-site? about 2 pages after this page.
I post 2 questions because the first one I mentioned about using XML ... but what I try to find out which is the best way to write/read MS Access database in my Web-host! How do you think?
|
|
|
|
|
I need to find out how to do the following:
I have a script to do this
Ask User for a variable
Create a NEW sheet with the variable name
I am able to do some of the above however I need to incorporate some error checking to prevent the script failing. wats the best course of action
hope this makes sense to someone
|
|
|
|
|
Is this a question about VB scripting in MS Excel?
Steve Jowett
-------------------------
It is offen dangerous to try and see someone else's point of view, without proper training. Douglas Adams (Mostly Harmless)
|
|
|
|
|
|
Ok - I guess you need to check for 2 things:
1) Check that the user input is valid (not blank, doesnt contain invalid characters...)
2) Check that the name specified does not already exist as another sheet in the workbook where you want to attempt to create the new sheet (Check the Workbook.Sheets collection)
HTH
|
|
|
|
|
I used somethng like this recently.
In my case I wanted a new sheet consisting only of data of a particular Suppliers account.
But you can see the basis of it and adapt as per necessary.
'request supplier
Dim RequestedSupplier As String
RequestedSupplier = Application.InputBox("Enter Supplier Code", "Supplier Selection", , , , , , 2)
If RequestedSupplier = "" Then End
'UPPER CASE the RESULT
RequestedSupplier = UCase(RequestedSupplier)
'confirm supplier
MsgBox ("You have Selected : " & RequestedSupplier)
'create page
'creates ActNm - Active Sheet name
Dim ActNm As String
With ActiveWorkbook.Sheets
.Add after:=Worksheets(Worksheets.Count)
End With
ActNm = ActiveSheet.Name
On Error Resume Next
ActiveSheet.Name = RequestedSupplier
NoName: If Err.Number = 1004 Then ActiveSheet.Name = InputBox("Enter name for New Sheet")
If ActiveSheet.Name = ActNm Then GoTo NoName
On Error GoTo 0
Hope this helps
------------------------------------
"I'd rather have a bottle in front of me than a frontal lobotomy" - Bob Monkhouse
|
|
|
|
|
Hi,
Please help me to create pdf file from crystal reports with sub reports and parameters?
Thanks,
Deepa
|
|
|
|
|
Hi group,
we have a UserControl "UserCtrlWithDataGridView" containing a DataGridView
(and other controls such as labels ...)
To be able to set properties of the DataGridView (or other contained controls) in the designer of the form where the UserControl is placed, we defined a
public property for the component, e.g. "Public ReadOnly Property XDataGridView() As DataGridView".
With the following attribute "DesignerSerializationVisibility..." (see code below) we make sure, that the property values are persistant, that means they are automatically entered into the form.designer.vb code.
This works fine in case of a label and also for properties such as "Dock" for the DataGridView.
But if we try to add columns to the "XDataGridView" in the designer by clicking on "..." of the property "columns", the following error appears:
"Object reference not set to an instance of an object"
How can it be solved?
Michael
Public Class UserCtrlWithDataGridView
< _
System.ComponentModel.Localizable(False), _
System.ComponentModel.DesignerSerializationVisibility(System.ComponentModel.DesignerSerializationVisibility.Content) _
> _
Public ReadOnly Property XDataGridView() As DataGridView
Get
Return Me.DataGridView1
End Get
End Property
End Class
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
