|
You are aware of Form.KeyPreview property ? Maybe it can help and solve your
problem, and maybe not at all.
|
|
|
|
|
it's set to true
I did need it form the vb.net part (if a textbox had focus the keydow of the form wasn't triggerd with keypreview on it is triggerd)
but it doesn't solve the problem with the component
|
|
|
|
|
hi frnds..
i have a function that return a DATAROW , in another , i want to check that datarow has any values ie any row, or its nothing.. how can i..
cheers...
|
|
|
|
|
Hello,
You can try this :
<br />
Dim dr() As DataRow<br />
dr = ds.Tables(0).Select("id > 'o'") 'ds is a DataSet<br />
If (dr.GetLenght(0) = 0) then<br />
'Has no row<br />
Else<br />
'Has row<br />
End if<br />
<br />
|
|
|
|
|
but i'm sending only 1 row and not recieving an array ..
|
|
|
|
|
Hello,
you can try this
If dr Is Nothing Then ' dr is DataRow<br />
MessageBox.Show("Row has no value")<br />
Else<br />
MessageBox.Show("Row has value")<br />
End If
|
|
|
|
|
Dim qq As Array
qq = ListBox1 ''''' it didn't work
can any one help me with this problem?????
|
|
|
|
|
first of all do you get an error?? (if so please post it)
second: you are trying to convert an control of the type listbox to an array (with this code) that will not work
you will probaly have run trough you'r listboxitems and add them to the array
Dim qq As String() = {0}
for each l as listboxitem in listbox1.itmes
qq(0) = l.text
next
or something like this
|
|
|
|
|
Hi there..
Im trying to write an application that calculates an employee's age. The user needs to enter the day, month and year separately into provided textboxes..
Within the button_click event:
Dim FirstDate As String
Dim SecondDate As Date
Dim pAge As Long
FirstDate = (txtDay.Text & txtMonth.Text & txtYear.Text)
SecondDate = CDate(FirstDate)
pAge = DateDiff(DateInterval.Day, Now, SecondDate)
MsgBox (pAge)
Please can someone tell me if this piece of code is correct... im also getting an error, stating :
"Exception System.InvalidCastException was thrown in debuggee:
Conversion from string "02121980" to type 'Date' is not valid."
02121980 is the day, month, year entered into textboxes.
Please help!
Thanks
|
|
|
|
|
Try putting seperators in the dates, either - or / so you get 02-12-1980 or 02/12/1980
David Loring
!! Keep Music Live !!
|
|
|
|
|
And to be sure you won't be screwed over by the regional settings on any PC it's on, format it in yyyy-mm-dd format.
-------------------------------------------
Don't walk in front of me, I may not follow;
Don't walk behind me, I may not lead;
Just bugger off and leave me alone!!
|
|
|
|
|
since you already have the day,month,year seperatly this might be the easist way to do it
Dim month As Integer = 12<br />
Dim year As Integer = 1983<br />
Dim day As Integer = 3<br />
Dim d As Date<br />
d = New Date(Year, Month, Day)
|
|
|
|
|
It is, there is no point in turning it into a string first, and then
get into trouble about regional settings...
|
|
|
|
|
Thanks 4 all the help!!
|
|
|
|
|
Thanx a million TDDragon, it works... although i just took out the values, and made the integers to string values..and
the variable d is deducted from current date.. THANK You!!!!
THANK YOU!!
THANK YOU!!
|
|
|
|
|
always glad to help someone
|
|
|
|
|
Datediff, google it, it's the right way to do it: something like:
DateDiff(FirstDate, SecondDate)
|
|
|
|
|
can any tell me how simplest of way to find whether a string exists in a file.
for eg.I have file tat ends with "}" I have to close the file ,if tat exists
Thanks in advance
|
|
|
|
|
If Instr(strYourString,strYourCharacter) > 0 Then
End if
David Loring
!! Keep Music Live !!
|
|
|
|
|
if yourstring.contains("yourchar") then
|
|
|
|
|
actually i want to open a file and search if "}" exists.
|
|
|
|
|
dim textreader as textreader (or somthing like that  )
do while not textreader.EOF
dim s as string = textreader.readline
if s.contains("}")then
'do somthing
end if
loop
|
|
|
|
|
Unless your file turns out to be very big, you could simplify a lot
and use File.ReadAllText method.
|
|
|
|
|
dim s as string = system.io.file.readalltext("C:\Example")
if s.contains("}") then
'do your actions
end if
|
|
|
|
|
This is probably very simple to answer, and I must be doing something very silly, but I just don't seem to be able to get changes in a dataset to write back to a table in the database. I have used stored procs up 'til now but this is a quick fix needed to join two columns, date and time, into one datetime column, and I just cannot get it to work. Here is the code:
Dim dsetData As New DataSet
Dim dteTemp1 As Date
Dim dteTemp2 As Date
Dim intRowCount As Integer = 1
Using sqlcnnData As New SqlConnection(m_strConnect)
Dim sqlcmdData As New SqlCommand("SELECT * FROM DDI_tbl_SystemDemandData", sqlcnnData)
sqlcmdData.CommandType = CommandType.Text
Dim sqldaData As New SqlDataAdapter(sqlcmdData)
Dim builder As SqlCommandBuilder = New SqlCommandBuilder(sqldaData)
builder.QuotePrefix = "["
builder.QuoteSuffix = "]"
sqldaData.Fill(dsetData, "Dates")
If dsetData.Tables(0).Rows.Count > 0 Then
Dim drowData As DataRow
For Each drowData In dsetData.Tables(0).Rows
dteTemp1 = DateValue(drowData("DataDateTime"))
dteTemp2 = drowData("DataTime")
dteTemp1 = dteTemp1.AddHours(Hour(dteTemp2))
If Minute(dteTemp2) > 0 Then
dteTemp1 = dteTemp1.AddMinutes(Minute(dteTemp2))
End If
drowData("DataDateTime") = dteTemp1
drowData.AcceptChanges()
Label1.Text = "Processed row " & intRowCount.ToString
Application.DoEvents()
intRowCount = intRowCount + 1
Next
dsetData.AcceptChanges()
intRowCount = intRowCount - 1
Label1.Text = "Completed. Processed " & intRowCount.ToString & " rows"
sqldaData.Update(dsetData, "Dates")
Else
Label1.Text = "FAILED"
End If
sqldaData.Dispose()
sqlcmdData.Dispose()
End Using
dsetData.Dispose()
I don't get any errors, it runs OK, but just does not do it! I any one can point me in the right direction I would be most grateful.
David Loring
!! Keep Music Live !!
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
