|
I have a real simple question that I'm somewhat embarrassed to ask but I can't figure it out.
dim x as string
x = 59 * .60
msgbox(x) ' displays 4600000000000.2
now what i'm trying to do is store the first 2 digits, which would be 46 into a variable
the reason x is a string is because I used as split function to get the 59 in this case
|
|
|
|
|
dim i as integer
i = integer.parse(x.substring(0,2))
this will only work if you are absolutly certain that x contains a decimal value (otherwise make i string and remove integer.parse)
hope this helps
|
|
|
|
|
Oh thanks. That works great!
|
|
|
|
|
I want to compare between the dates something like that
If Date.Now.ToShortDateString < date2.ToShortDateString Then
Ahmed El-Badry
|
|
|
|
|
If Date.Now < date2 Then
Christian Graus - Microsoft MVP - C++
"I am working on a project that will convert a FORTRAN code to corresponding C++ code.I am not aware of FORTRAN syntax" ( spotted in the C++/CLI forum )
|
|
|
|
|
Talking about it, how does one calculate the duration between two dates?
|
|
|
|
|
Hello,
I am using VB 2005 & in my form all control are bound. I have Client Name field. I want to display all names in a combo, let the user select & bound the selected text to the client name field of DB. How do I achieve this?
Currently, I am using a trick for it - a combo box which has all names, when user select put the selected name in an invisilbe text field which is bound to the field. Client names will be taken from other table. In other case, combo will be filled by values but the scenario is the same. I Know & belive that this is a wrong way, professionally speaking. I would like to know is their a better and proper way for the operation.
Prog. is using the Binding to DB method, so operations are not done by manual code.
Thanks
Terry
|
|
|
|
|
Get that field or whole table into dataset
assume u r table comprises of (ID,Name)
then how u are goin to bind this
is
combobox1.datasource= dataset.tables(0)
combobox1.displaymember="ID"
combobox1.valuemember="ID"
|
|
|
|
|
I think, u didn't get my point clearly.
It is a data entry form & all fields are dragged from dataset to the form & hence they are bound automatically. The displaying respective fields in respective text box is managed by BindingSource only. I am not writtting any code for Add, SAve, Update, dEl etc.
I have data set with 3 tables. In table 1, i have id & name. In table 2 i have name, source & other fields.
* I want to display all names from table 1 and the selected name should be bound with name field of table 2
* For source field, I want user to enter items from 4 only. So, i thought of combo box. The point is how do I bind the combobox with that source field of table.
So, how do I make the bound sure of combobox with the field of table. How such a task be achieved.
Any help is appreciated.
Thanks
Terry
|
|
|
|
|
Short way is make inner join b/w tables
|
|
|
|
|
hi all,
how can i change the date format of Month calendar ?
Rupesh Kumar Swami
Software Engineer,
Integrated Solution,
Bikaner (India)
|
|
|
|
|
hi guys
i have made an windows application in vb.net. which contains certain dlls and a pdb and a exe.confing file. i also have another application of centura which works out after my application executes. no problem till here.
but problem is arrising when i am creating a setup & deployment project.
i will give a detailed report of what i have done for the setup & deployment project.
1)selected setup project with name hccp(some name)
2)pressed ok
3)i get a window containing file system on target machine.
4)selected application folder in that and added to folders and two text files(help files),one folder contains my vb.net windows application with related files, another contains the centura application(also windows or desktop application) and related files.
5)in users desktop folder i added the exe file of my application(getting an error ie a blue line is underlined under the file)
6)in users programmenu folder i created a folder and then added certain imp files like exe file and config file and help file.(getting an error ie a blue line is underlined under the file).
the centura application in no where concerned with ma pplication ie it runs in the background after my application completes execution.
getting warning messages like this below
E:\parser\parser\parser.vdproj File 'browserapplication.exe' should not be installed into a User's Profile folder because it may not be available to all users.
E:\parser\parser\parser.vdproj File 'browserapplication.exe' should not be installed into a User's Profile folder because it may not be available to all users.
and when i build the application msi file is being created.
here comes the real problem
when i click on the setup.msi or setup.exe file i get a n error like this
mshtml.dll failed to register.hresult-2147024770
could not rectify it.
i would be glad if some one helps me out in creating a setup file.
there is no such thing as good or bad.
|
|
|
|
|
from what I can see this might be the problem:
you create 2 folders in you're application folder in wich you put you'r application
I don't know this for sure but I think this is not allowed. I think you have to put you're application directly into the application folder by adding project output this will automaticly put all the files needed to run you'r programme (unless you have an outside component in wich case you might have to add a few dll's) in the application folder
you put you're exe on the desktop, don't know if it's a warning or an actual error but normally this is not done you create a shortcut on the destop (can be done by selecten user's destop then right click and choose 'create new shortcut')
in programme menu the same as user's desktop, create shortcuts instead of adding the files
All files outside of the project output that are needed or wanted should be added to the application folder
|
|
|
|
|
I am new to vb.I have downloaded a vb project code which can play wav files.
Location = CurDir()
Soundname$ = "c:\VB\WAVEPLAY\START.WAV"
wFlags% = SND_ASYNC Or SND_NODEFAULT
But when i run that i am getting runtime error. mmsystem.dll not found.
I know adding .lib and .dlls to vc code. But dont know how to add this dll to the vb project.
Please help me.
KIRAN PINJARLA
|
|
|
|
|
if you know the path of the mmsystem.dll (and you have the file)
you can 'add' this dll to the project by maken a refferenct (just right click the project in solution explorer and choose 'add reference') then choose tab browse and locate the dll
this is for 2003 and 2005 (vb.net)
don't know how to do it for vb6
|
|
|
|
|
As a side note, adding a reference only works for COM and .NET .DLL's. It won't work for library .DLL's.
|
|
|
|
|
I have a Pegasus ImageXview control in a panel. I would like to scroll up/down using the mousewheel. I can receive the wheel events, however I can't seem to move the scroll bar. From my reading, I thought AutoScrollPosition was supposed to be set, but I have had no sucess. Even tried hard coding it.
How does one scroll programmatically? How do you detect if you are at the top / bottom of the form?
|
|
|
|
|
first: a panel has a property 'autoscroll' set this to true maybe it will solve you're problem
second: there are 2 controls in vb.net you should look at: hscrollbar and vscrollbar maybe they can be of help
if not
three: you can try to propramme it by set the panels top bye -= 5 and height bye +=5 or something everytime there is a scroll event but this is far from the best way (and probably has al sorts of problems with it that I can't come up with right now)
so my advice try 1 then 2 and if you have ecausted every option go to 3 (only when absalutly no other way)
|
|
|
|
|
The problem was Pegasus - they have the AutoScrollPosition property - but it isn't used. They use their own property called ScrollPosition, setting that works. Go figure?
|
|
|
|
|
yeah that happens I'm currently working with datawindows control and the calender control of codejock and I ran into several of these 'wtf' moments
|
|
|
|
|
How can i call a form to show only one at a time or i mean not more than one instant of form without committing this error:
SystenNullReferenceException: object reference not set to an instance of an object.
**************************************************************
here's my form1 which is default mdiParent frmMain.vb:
Note: I just omitted some sub,functions and events code to minimize this code
**************************************************************************
Imports ADODB
Imports System.Diagnostics
-Public Class frmEmployeeProfile
Inherits System.Windows.Forms.Form
+ Windows Designer generated code
'there are some subs,functions and events i just omitted to minimize this code
- Private Sub menuEmployee_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles menuEmployee.Click
If frmEmployee Is Nothing Then
frmEmployee.Focus() 'My error occur here!
Else
frmEmployee = New frmEmployeeProfile
With frmEmployee
.MdiParent = Me.MdiParent
.ShowDialog()
End With
End If
End Sub
End Class
**************************************************************
here's my form2 which is non mdiParent frmEmployeeProfile.vb:
**************************************************************
Imports ADODB
Imports System.Diagnostics
-Public Class frmEmployeeProfile
Inherits System.Windows.Forms.Form
+ Windows Designer generated code
'there are some subs,functions and events i just omitted to minimize this code
End Class
*******************************
and this is my vb code in module.vb
***************************************
Imports System.Diagnostics
-Module mdlModule
Public frmParent As New frmMain
Public frmEmployee As frmEmployeeProfile
'there are some subs,functions and events i just omitted to minimize this code
End Module
*********************************
Please Help!!...
Please understand im a newbie in VB.NET
and this is my 1st question posting.. ahehe
Any reply shall be appreciated...
Thanks!
|
|
|
|
|
BlueCodeDiggerzzz wrote: If frmEmployee Is Nothing Then
frmEmployee.Focus() 'My error occur here!
Else
frmEmployee = New frmEmployeeProfile
...
End If
You figured which line is wrong, but you still need help ?
how can you call a method for a null reference ???
and replace it by something new when it is not Nothing?
Luc Pattyn [Forum Guidelines] [My Articles]
this weeks tips:
- make Visual display line numbers: Tools/Options/TextEditor/...
- show exceptions with ToString() to see all information
- before you ask a question here, search CodeProject, then Google
|
|
|
|
|
BlueCodeDiggerzzz wrote:
If frmEmployee Is Nothing Then
seem like this line is wrong. you can't access any properties, methods (eg: Focus() ) or events if that control is Nothing.
So, maybe. it should be something like that.
If frmEmployee IsNot Nothing Then<br />
<br />
frmEmployee.Focus() 'My error occur here!<br />
<br />
Else<br />
<br />
frmEmployee = New frmEmployeeProfile<br />
<br />
With frmEmployee<br />
<br />
.MdiParent = Me.MdiParent<br />
.ShowDialog()<br />
<br />
End With<br />
<br />
End If<br />
<br />
Note: IsNot is VB.NET 2005 code. If you are using VS 2003 then it should be like that If Not frmEmployee Is Nothing Then
Hope it helps.
Thanks and Regards,
Michael Sync ( Blog: http://michaelsync.net)
If you want to thank me for my help, please vote my message by clicking one of numbers beside "Rate this message". Why vote? Plz Read it here. Thank you.
|
|
|
|
|
Michael Sync wrote: Note: IsNot is VB.NET 2005 code. If you are using VS 2003 then it should be like that If Not frmEmployee Is Nothing Then
Wow - VB can't even standardise on this sort of stuff between versions ?
Christian Graus - Microsoft MVP - C++
"I am working on a project that will convert a FORTRAN code to corresponding C++ code.I am not aware of FORTRAN syntax" ( spotted in the C++/CLI forum )
|
|
|
|
|
Christian Graus wrote:
Wow - VB can't even standardise on this sort of stuff between versions ?
Yeah. IsNot is new keyword for VS.NET 2005.. I think that this keyword is pretty cool. Even thought we can use IsNothing() or Not *** Is Nothing , I prefer to use IsNot that makes the code looks better.
Thanks and Regards,
Michael Sync ( Blog: http://michaelsync.net)
If you want to thank me for my help, please vote my message by clicking one of numbers beside "Rate this message". Why vote? Plz Read it here. Thank you.
|
|
|
|