|
Unless you explain how you exactly intend to use your variables its hard to point some suggestions to you  .
I would do the following (brute force method  )
1. Create an array which can hold 20000 numbers and calculate the sum of the aliquot divisors for each number from 1 to 20000. To obtain the divisors you will need a seperate loop where you can use the mod function to identify all of them.
2. Walk through the array and search for amicable pairs. This can be done by only one walkthrough because you just have to look if the values in your array matches with the one at the other index.
I hope this was understandable 
(Please note that I have no deeper mathematical background on this. Its possible that there are far more intelligent solutions out there)
|
|
|
|
|
I want to create a matching algorithm using VB that matches jobs with applicants
job = architect
personality = artistic, investigative, practical
constraints = masters degree, age > 21
|
|
|
|
|
Permission granted!
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
HI,
How can i hide the 2 buttons (next/previous month) in the MonthCalendar Control ?
Is there a way to do it ?
Thank is advance
Dan
|
|
|
|
|
I've never used the control, but you can't turn the buttons off. You might want to look into the .MinDate and .MaxDate properties or Google for another control that will let you display just a single month.
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
nop
that does not hide the buttons
Dany
|
|
|
|
|
I didn't say it would turn off the buttons, just limit the choices.
After some further searching, I don't think you can turn off the buttons.
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
I have created a service in VB .Net, and a GUI to control it remotely. My GUI needs to be able to write to the registry on the remote machine where the service resides. Writing to the registry on the local machine is easy, but I have not found code examples on how to write to a remote registry. Any ideas? Code snippets?
"Whatever you can do, or dream you can, begin it. Boldness has genius, power and magic in it." - Goethe
|
|
|
|
|
You can look about the OnCustomCommand
As you control the service remotely you can send custom command to the remote service.
Just look in MSDN.
|
|
|
|
|
This this has what to do with reading the Registry on a remote machine?
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
I've been writing code for over 25 years and I can't tell you what the @#*& the other guy was talking about...
You can start by checking out the OpenRemoteBaseKey[^] method.
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
Yeah, thanks. I figured it out today - finally found some reference to OpenRemoteBaseKey, and it was easy from there. Only been working in .Net for a couple of months.
|
|
|
|
|
i had a oledb connection, adapter and a dataset
now i m trying to bind combobox with my dataset
combobox1.valuemember=dataset11.tables("table1").rows.coloumn(1).tostring
it is not giving any error but it does not show any thing in combobox.
help me
|
|
|
|
|
There's a ValueMember (what is the value or ID of the object selected), and a DisplayMember (what is actually shown in the combobox:
ComboBox1.ValueMember = DataSet11.Tables("Table1").Columns(1)
ComboBox1.DisplayMember = DataSet11.Tables("Table1").Columns(2)
Also, you told the combobox what the valuemember was, but no what the display member was supposed to be, so of course, the combobox came up blank. On top of that, you called .ToString() on a Column object. This will return the name of the column, not the data in that column.
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
I have the following simple code to place a background image and an animated image in a picture box. How can I get the animated image to be centered in the picture box?
Dim myPBImage As Bitmap = New Bitmap("Dog.gif")
Dim myPBBkgrd As Bitmap = New Bitmap("BackYardBkgrd.jpg")
PictureBox1.BackgroundImage = CType((myPBBkgrd), System.Drawing.Image)
ImageAnimator.Animate(myPBImage, New EventHandler(AddressOf OnFrameChange))
PictureBox1.Image = CType((myPBImage), System.Drawing.Image)
|
|
|
|
|
PictureBox1.SizeMode = PictureBoxSizeMode.CenterImage
|
|
|
|
|
Worked perfectly. Thanks!
|
|
|
|
|
Not sure if this is theright forum but....
Does anybody know how to turn off the feature in a visual studio .net setup and deployment project that when you change an installed file it asks you to re-install the whole app.
It is really annoying when you need to swap out a dll, ocx or exe on client site because you need to..(I know you shouldn't have to but this is a rushed job for a very large client) and then it insists on re-install replacing the dll, ocx, exe with the original....aaaahhhhhhhhhhhhhhhhhhhhh!!!!!!!
Thanks for any help on this...
Cheers
"If i was king cigarettes would be free."
|
|
|
|
|
This is a built-in function in the Windows Installer service. There is not much you can do about this once the setup has been run. What happens is changing the file causes the Windows Installer to automatically put itself into Repair mode.
You have a couple of options:
1) Reissue the entire setup with the new files, have the user uninstall the original application completely, then install the updated version. This is easy enough for you to do, but your client may not be very happy about it.
2) Author a Patch project. A patch project does several things. First it replaces any files that you need to replace. Second. it finds the original installation MSI and applies changes to the MSI so that it now recognizes the updated files as being the correct ones so Repair mode is no longer automatically in initiated because the versions have changed.
Creating a Patch is way outside the scope of what you can do with the VS.NET Setup projects. You will need to download the Windows Installer SDK from Microsoft to even get started, and authoring MSI's is difficult and tedious.
Good Luck!
Robert
|
|
|
|
|
Hello ,can someone help me to get a combobox in datagrid?
i tried to use the one done by Mr.Buddhi Dananjaya. But I need the latest .net version.
Please do not use databases.If possible try to do with datasets alone.
Any help will be greatly appreciated.![Rose | [Rose]](https://codeproject.global.ssl.fastly.net/script/Forums/Images/rose.gif)
|
|
|
|
|
The one at www.rustemsoft.com works very well but you do have to pay for it, $35.00, but it does more than just single column comboboxes. It also does multicolumn combo boxes, datepicker, button control on the grid and some others.
I found a number of free, single column comboboxes when I did a web search for datagrid combobox. Actually they were projects that showed how to use the standard vb.net combo box in a datagrid.
|
|
|
|
|
Im currently using the VB6.0 to search for data in Access 97's database. But even i can see the comparison showing the same results, it still say "not same" then it just to the next record. Does anyone know about the reocrd searching function in VB6.0? If you know, i wish that you can help me on this matter. the following is my code.
Private Sub SearchRegNum()
Data1.Refresh
Data1.Recordset.MoveFirst
Do While Data1.Recordset.EOF = False
MsgBox "'" & Data1.Recordset.Fields(14) & "'" & " XXXX " & "'" & txtTest.Text & "'"
If Data1.Recordset.Fields(14) = txtTest.Text Then
MsgBox "SAME ==> FOUND"
txtName.Text = Data1.Recordset.Fields(2)
txtID.Text = Data1.Recordset.Fields(3)
txtRegNum.Text = Data1.Recordset.Fields(14)
Exit Do
Else
MsgBox "Not SAME"
Data1.Recordset.MoveNext
End If
Loop
If Data1.Recordset.EOF = True Then
MsgBox "Vehicle Not Registered.", vbExclamation, "error"
End If
End Sub
|
|
|
|
|
Use this
data1.Recordset.Movefirst
if Data1.Recordset.Eof = true then Exit sub
MsgBox "'" & Data1.Recordset.Fields(14) & "'" & " XXXX " & "'" & txtTest.Text & "'"
If Data1.Recordset.Fields(14) = txtTest.Text Then
MsgBox "SAME ==> FOUND"
txtName.Text = Data1.Recordset.Fields(2)
txtID.Text = Data1.Recordset.Fields(3)
txtRegNum.Text = Data1.Recordset.Fields(14)
else
Data1.Recordset.MoveNext
If Data1.Recordset.EOF = True Then
MsgBox "Vehicle Not Registered.", vbExclamation, "error"
MsgBox "Not SAME"
End If
End if
|
|
|
|
|
Use this
please make suse of the exit sub
and make sure MsgBox "Vehicle Not Registered." & " " & " Not SAME"vbExclamation, "error"
:Exit sub is one line
data1.Recordset.Movefirst
if Data1.Recordset.Eof = true then Exit sub
MsgBox "'" & Data1.Recordset.Fields(14) & "'" & " XXXX " & "'" & txtTest.Text & "'"
dd:
If Data1.Recordset.Fields(14) = txtTest.Text Then
MsgBox "SAME ==> FOUND"
txtName.Text = Data1.Recordset.Fields(2)
txtID.Text = Data1.Recordset.Fields(3)
txtRegNum.Text = Data1.Recordset.Fields(14)
else
Data1.Recordset.MoveNext
If Data1.Recordset.EOF = True Then
MsgBox "Vehicle Not Registered." & " " & " Not SAME"vbExclamation, "error"
:Exit sub
goto dd
End if
|
|
|
|
|
Hi all...
actually, i'm using the datagrid to display the data that i've queired in the database, i've limit the row in the datagrid to 12. so, if i have retrieve more than 12 data, there are two buttons that i've provide to go to the other pages which the PREVIOUS button and the FORWARD button.besides, i'm also provide the checkboxlist for each row of the datagrid.
but now, i want to change the way i display the data.can i used the datagrid and the checkboxlist with the scrollbar??
so, i will not have to display the data in multiple pages anymore but only scroll it down.can anyone please give me some guide...
besah
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
