When I click on a header (Price) to sort the rows by that column, I get an error Object must be of type decimal.
I'm thinking that I'm encountering a new row without any values that's why this error is being generated.
I'm not sure how to intercept this error or fix it for that matter....
I've got a custom NumericEditor control that has a nullable Decimal property called Value. When I bind a data field to Value, I'd like to retrieve the underlying Type of the data that's bound, so that I can restrict the use of decimal places if the source field is an integral data type.I figure I'd have to do this in the BindingContextChanged event, but how do I get the Type of the data field from the binding itself? My Google-Fu is failing me at the moment.
In short, I'm looking for something like the GetValueType method mentioned in the following question: Simple databinding - How to handle bound field/property change. Winforms, .Net I imagine this method would also be handy if the Value property was an Object.
I am trying to insert a variable in Decimal type into an Access table. When I use "decimal" field with 0 digits after the decimal separator (,) my program works properly. However, when i use the field with 2 digits after the separator I get a "Data type mismatch in criteria expression." exception. This happens also when I try to update the table. The debugger shows me that my variables contain the right values but the update or insert command gives the error.
View 2 RepliesIm trying to set one variable equal to another but it says "No default member found for type 'Decimal'" what does that mean?Both the varuables are deciamls, one is a regular decimal that I declare in the sub and another is an array that I declare in the class. The line is:
tempx = xo(i)
this is in a for loop with i as the variable.
I can't cast my objects. I get: "Unable to cast object of type 'ClassA' to type 'ClassB'".
The service Class:
Public Class svc_Insp
Implements Isvc_Insp
Public Function Test(ByVal pm_income As ClassC) As String Implements Isvc_Insp.Test
[code]....
I have a series of API calls that are returning J# data types. I have been able to convert most of the data types (Integer, Boolean, Double, Float, etc) just fine.What I need to do now is convert a java.Util.Collection to a VB .NET collection (ArrayList)
Here is my attempt:
Public Function MakeDotNETCollection(ByVal javaCol As java.util.Collection) As Collection
Dim dotNetCol As Collection
[code]....
I keep getting a runtime error "Unable to cast object of type 'AbstractListlistIterator' to type 'System.Collections.IEnumerator.
I am using a background worker and am attempting to use the following code. However I keep getting this error on i "Unable to cast object of type 'ObjectCollection' to type 'System.Array'."
Private Sub btnVerify_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnVerify.Click
myArray = listProxies.Items()
BackgroundWorker1.RunWorkerAsync()
End Sub
[code]....
I have
Public stack() As CTest
I want
Public stack() As Object
The latter is giving the error "Unable to cast object of type 'Object' to 'CTest'." when used:
Dim thestack As CTest() = testdatabase.getStack
Where testdatabase.getStack simply returns stack();
Public Function getStack() As Object()
Return stack
End Function
This fixes it, but it's not ideal (for me personally):
Dim thestack As Object() = testdatabase.getStack
So if I could keep the variable as-is (Public stack() As Object) and then do something along the lines of class.stack() = CTest I should be able to do Dim thestack As CTest() = testdatabase.getStack because the object array will programmatically have changed from Object to CTest.
I have been trying to use vb2008 to automatically update CustomDocumentProperties fields that I have set up within a pro-forma document. I can load the Word application and word document without problems.I want to update the CustomDocumentProperties fields with data read from a dB. To do this I am assuming that I need to iterate through the CustomDocumentProperties fields within the word document and when one is "found" that matches the data I wish to merge then assign the dB value to the field.The problem is that I am getting an exception error when I try to reference the document customdocumentproperties
"Error : Unable to cast the COM object of type 'System._ComObject' to interface type 'Microsoft.Office.Interop.Word.CustomProperties'. ...... "
my code looks like;
Dim WordApp As Word._Application
Dim odoc As Word._Document
Dim BContinue As Boolean = True
[code].....
[URL]The issue is as soon as I change the value of the text boxes it gives me an error and forces me to close the project.
The error is:Unable to cast object of type 'System.EventArgs' to type 'System.Windows.Forms.KeyPressEventArgs'.
However I'm supposed to clear the number of gallons used and the total charged when a change is made to the contents of the 2 text boxes on the form.
I have an InvalidCastException Error in my program. The program is that i try to insert an employee record into a database table after getting the details from a form. I've used Money data type is SQL Server for salary and SqlTypes.SqlDecimal data type in employee template class. i've used a stored procedure to pass the values and i add the basic value by passing a parameter by the method
Dim prm8 As SqlParameter = com.Parameters.Add("@basic", SqlDbType.Money)
prm8.Direction = ParameterDirection.Input
prm8.Value = emp.Bsc
I've used the money datatype itself even in the stored procedure variable.I get the following error.
failed to convert parameter value from sql decimal to decimal
Even if i use
prm8.Value = Convert.ToDecimal(emp.Bsc)
I get an error Unable to cast object of type 'System.Data.SqlTypes.SqlDecimal' to type 'System.IConvertible'.
I am getting this error when I am tring to load string type to data table)
Using connection As New SqlConnection("connectionstring;")
connection.Open()
Using Command As New SqlCommand("SELECT ClientId,forename,surname from t_clientdetails
[code].....
I get the below error Unable to cast object of type 'System.String' to type 'System.Data.DataTable'.This is the code I'm using
Dim str As String = String.Empty
If (Session("Brief") IsNot Nothing) Then
Dim dt As DataTable = Session("Brief")
If (dt.Rows.Count > 0) Then
[code]....
same errors or something related to System.windows.forms. Unable to cast object of type 'Public_Information_System_Remake.PIS' to type 'System.Windows.Forms.TextBox'.
[Code]...
I am tightening up my coding with the Option Strict set to ON. It has now produced alot of errors. An example of this is:
If AllocatedDGV.Rows(i).Cells("RoomNumber").Value = RoomsAvailableDGV.Rows(j).Cells("RoomName").Value Then
It gives me the following error: Option Strict On disallows operands of type Object for operator '='. Use the 'Is' operator to test for object identity.
I am taking my first quarter of programming and am having a VERY difficult time understanding jagged arrays. At the moment I am working on a project that is using two two dimensional jagged arrays
If IsNothing(g_decChargesArray(g_intActivePatientNumb er)) Then
numVisits = 0
Dim decTemp(g_intActivePatientNumber) As Decimal[code].....
The line in bold is the only way I can think of to pass the amount of decCharges into the array g_decChargesArray.
I have do the coding to export the data from DataGridView to Excel. But If am running the code am getting the below error.
[Code]...
I have a structure that contains another structure. The inner structure is nullable. Now wht I do is something like the following. I create a new instance of the inner structure, set the member variables and assign the whole structure to the inner structure of the parent. But it is giving an error. The assignment is not successful. If I try to peek into the structure in the watch window, it says "property evaluation failed" for the HasValue and Value properties.
Dim testData As List(Of TestData) = Nothing
Dim testData_List1 As New TestData
With testData_List1.commonTestParam
[Code].....
The code I want to work:
<Extension()>
Public Function NValue(Of T)(ByVal value As Nullable(Of T), ByVal DefaultValue As T) As T
Return If(value.HasValue, value.Value, DefaultValue)
[code].....
I seem to have broken something I get this error Unable to cast object of type System.EventArgs' to type 'System.Windows.Forms.KeyPressEventArgs'.
my code:
Private Sub ListControl_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListControl.SelectedIndexChanged
[code].....
i write this code to work with some radio button and calculate Score for a questionare : Dim SScore AsByte = 0 Dim BTNN AsByte = 0 Dim BTNNS AsString = "" ForEach rBTN AsRadioButtonInMe.Controls If Mid(rBTN.Name, 1, 5) = "RBS01"Then If rBTN.Checked Then SScore = SScore + CType(Mid(rBTN.Name, 7, 1), Byte) EndIf EndIf Next I get this error on line 4 : Unable to cast object of type 'System.Windows.Forms.Button' to type 'System.Windows.Forms.RadioButton'. i dont know what is it and how can handle it.
View 5 RepliesI am pulling data from a local MSSQL database using a stored procedure, then send the data to a web service. Every part of the component works well except for a pesky problem will a DBNull being returned from the DataRow field, when I know that the field is not null and has valid data. The database and associated INSERT statements that add to this field are designed to not allow NULL entries. When I debug break the program on or right before the line that throws the error I see that the field has valid data for the current row.If I add a null check to the code (as below) the operation continues as normal:
Dim dataResultsTable = Me.myViewTableAdapter.GetData(int)
For Each myDataRow In dataResultsTable.Rows
If worker.CancellationPending Then
[code]....
Why is the read operation returning DBNull instead of the data in the database?
EDIT: Just to be clear, the operation does return the proper data, but the data is not being saved into the variable.
I have a Job Register Table and that table doesn't have any records.
This is my LINQ code:
Dim QRecordCount = (From LC In CntxtJobDetails.JobRegistrations _
Where LC.JobCode <> 0 _
[code].....
I have been trying to assign value to an object array that is defined as follows.Dim englishTextAry As Object(,) = New Object(,) {}I am looping through a dataReader and trying to assign the values to this array with the following code.[code]But the ReDim is throwing an error on dataVal not being an Integer.What am I doing wrong here? Can anyone point me in the right direction?
View 2 RepliesI am trying to delete a file(s) from a checked list box, when i click a button.
This is the code i have:
Dim item As IO.FileInfo
For Each item In CheckedListBox1.CheckedItems
Try
item.Delete()
Catch : End Try
Next item
But i get the error: Unable to cast object of type 'System.String' to type 'System.IO.FileInfo'.
Dim lastidcmd As New SqlCommand("SELECT MAX(ProformaID) FROM " & IIf(boolException, "ImportException_Proforma", "Proforma") & " WHERE SupplierId=" & CustomerId & ";", con)
in the part marked in red I get this error:Error71Option Strict On prohibits operands of type Object for operator '&'.how can I fix this. I turned on Option Strict today and got this error.
When executing this code I get this error:
Unable to cast object of type 'System.Windows.Forms.MouseEventArgs' to type 'System.Windows.Forms.DataGridViewCellMouseEventArgs'.
Private Sub NoteGrid_CellContentClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles NoteGrid.CellContentClick
Try
[code]....
This error makes no sense to me[code]...
Unable to cast object of type 'DynamicTreeNode' to type 'DynamicTreeNode'.
I have an inherited TreeView with an inherited class called DynamicTreeNode inside it. I am trying to loop through the DynamicTreeNodes in the TreeView.Nodes property which is causing this error.
I have got this error No default member found for type 'VB$AnonymousDelegate_0(Of SqlDataReader,String,Object)'.
My Code is below
dsBranch.Tables.Add(GetDataTableFromSQLReader(dr, "")) - Calling
Private Function GetDataTableFromSQLDataReader(ByVal dr As SqlDataReader, ByVal TableName As String)
[code]....
For I = 0 To 10
If Items.Count = 0 Then Exit For
Dim T As New Thread(AddressOf Thread)
T.Start(New Object() {"Test", "Test"})
[code]....
When I put same code in empty project it works.