|
Here is the code that has worked on several target height values passed.
(Not quite sure how this "code" thing works yet)
<br />
'This function exists within a custom collection<br />
Public Function GetStack(ByVal height As Decimal) As GageBlockCollection<br />
Me.ClearUsedBlocks()<br />
Dim Stack As New GageBlockCollection<br />
If Me.HasEqualGageBlock(height) Then<br />
Stack.Add(Me.GetEqualGageBlock(height))<br />
Return Stack<br />
Else<br />
Dim PossibleBlocks As New GageBlockCollection<br />
If height >= 1 Then<br />
'Height is greater than 1", so find the block that makes eliminates the inch part<br />
For Each Block As GageBlock In Me<br />
If height - Block.Height > 0 AndAlso height - block.Height < 1 Then<br />
Block.IsUsed = True<br />
PossibleBlocks.Add(block)<br />
height -= Block.Height<br />
End If<br />
Next<br />
End If<br />
'Find all Blocks that are smaller than height<br />
For Each Block As GageBlock In Me<br />
If Block.Height < height AndAlso Not Block.IsUsed Then<br />
PossibleBlocks.Add(block)<br />
End If<br />
Next<br />
'Find combinations of blocks that are less that height<br />
Dim Done As Boolean = False<br />
For Each Block1 As GageBlock In PossibleBlocks<br />
For Each Block2 As GageBlock In PossibleBlocks<br />
If height - (Block1.Height + Block2.Height) = 0 Then<br />
Block1.IsUsed = True<br />
Block2.IsUsed = True<br />
Stack.Add(Block1)<br />
Stack.Add(Block2)<br />
Done = True<br />
Exit For<br />
End If<br />
Next<br />
If Done Then<br />
Exit For<br />
End If<br />
Next<br />
For Each Block As GageBlock In PossibleBlocks<br />
If Block.IsUsed Then<br />
Stack.Add(block)<br />
End If<br />
Next<br />
Return Stack<br />
End If<br />
End Function<br />
Thanks again,
Scott Page
"Some people spend an entire lifetime wondering if they made a difference. The Marines don't have that problem."
( President Ronald Reagan)
|
|
|
|
|
is there some thing called re dim S as string
i need to redefine string because the fist time this string work as i want but the second time i face some problem in this parameter
so i need to redefine this parameter for each click on button
kilany
|
|
|
|
|
What is it that you are trying to do?
if you just want to change what the string is equal to then
dim s as string
s = "hello"
s = "world"
|
|
|
|
|
you may be having scope issues. if your declaring a local variable in vb
with "Dim", then taht variable is only valid inside that block.
EX
sub main()
thing()
otherthing
end sub
private sub thing()
dim x as string = "Hello"
debug.writeline(x)
end sub
private sub otherthing()
debug.writeline(x) 'This line causes an error.
end sub
the second reference to 'x' causes an error because it was declared within a block.
to declare globals within a class or module,
use :
Private x as string = "Hello"
sub main()
thing()
otherthing()
end sub
private sub thing()
x = "Hello"
debug.writeline(x)
end sub
private sub otherthing()
debug.writeline(x & " Again") 'No error this time
end sub
Globals are just one answer to a scope issue. paramater passage and other techniques exist. you'll learn 'bout 'em sooner or later
Good Luck
hey...slang is the vernacular for the vernacular...wow
|
|
|
|
|
the another application should receive from vb.net enter + B to do some thing
i send string but i cant send those keys as a parameters
enter+B should send as a parameters from vb.net to another application
how i cant do it ?
kilany
|
|
|
|
|
You can use
AppActivate("Title of the application")<br />
SendKeys.Send(Keys.Enter)
Regards,
Chatura Dilan
If at first you don't succeed, try; try again, so that you know
what not to do the next time. The answer is out there.
|
|
|
|
|
I am looking for suggestions on how to accomplish the following;
I am writing an application that display folders (A - Z) in a treeview. When the user clicks on a folder - a list of companies is retrieved from the database to a dataset and then displayed in a listview w/ checkboxes.
Eventually I want to save the checked listview items to a separate database table - when the user clicks on an OK button. A CANCEL button is also available if the user decides not to proceed.
The issue that I am having is I am not sure what method I should use to save the checked items or where to store them until the user presses OK/CANCEL buttons. To further define - I know how to retrieve the checked items from the Listview but I am not sure where to store them (i.e. datatable?) until the OK/CANCEl buttons are clicked.
Thank you,
Digicd
-Everyday is a new opportunity
|
|
|
|
|
you done necessarily need to store these values anywhere - they are "stored" by virtue of the fact they are on-screen.
When the user clicks "OK" just get all the currently selected items and save it in whatever way you want.
|
|
|
|
|
Apparently my post was not completely clear . . .
When the user clicks on a folder - a list of companies is retrieved from the database to a dataset, therfore the listview values dynamically change each time the user clicks on a new folder. If the user checked 2 companies on the "A" folder - then clicked on the "B" folder - and went back to the "A" folder the items are no longer checked. Make sense?
Digicd1
-Everyday is a new opportunity
|
|
|
|
|
I am having a problem regarding opening a binary file in VB.net or Vb 6 and then
tramsmit it to a Serial port.
Please give a solution if any?
from Mayur Gondaliya
Mayur
|
|
|
|
|
I am new to VBScripting. have only worked on VC++,C# etc.Kindly help me with this.
I have to develop a module using VBScript. The VbScript should be able to open an existing .htm file(this .htm file has a list of drivers name and file name).
The VBScript has to basically be able to open this .htm file, pick out all drivers name and associated file name and log the driver and file names into a simple text file.
Being new to VBScripting i do not have an idea how to go ahead. Pls suggets me a way to do this - if there is a sample cose existing kindly inform me.
Thanks in advance.
Awaiting a reply soon.
Sincerely
Giftsana
|
|
|
|
|
hi i'm very novice in vb.net.this is my larning stage.
can any body tell me how can i read the field of database to make the login page.
if could then please provide th appropriat code
thanx
Aavesh
|
|
|
|
|
Hi Aavesh ,
This is the code to validate User ID & Password from DataBase.
If u r using SQL
imports System.Data.SqlClient
Dim Command as SqlCommand
dim DR as SqlDataReader
Dim Con as new SqlConnection("Server=server name;DataBase=database name;User Id=login id; Password=password;")
write this code in a Button Click.
Dim strCommand as String ="Select * from Login_Table where UserName_Column= ' " & txtUser.Text & " ' and Password_Column= ' " & txtPassword.Text & " '"
Command = New SqlCommand(strCommand,Con)
Con.Open()
DR = Command.executeNonQuery()
Con.Close()
If DR.HasRows = True then
MsgBox("Welcome")
Else
MsgBox("User Name or Password invalid")
End If
Dr.Close
With Regards,
Chandan Kumar
|
|
|
|
|
Hi there
i want to move to the next tab on click of a button.
Other than the tabstrip button . Please help me to solve this.
bharath.s
|
|
|
|
|
Try:
Me.tabcontrolname.SelectedTab = nameofthetab
or
Me.tabcontrolname.TabPages(x).Select() where x is the index of the tab you want selected
Dean
|
|
|
|
|
Go into the properties, under behaviors and you will find TabIndex, this gives you the order in which the buttons or anything on the screen that you can inter act with, the order in which the item is given focuse, if you want to move from one imput to the next, hope this helps. 
|
|
|
|
|
hi all
good morning,
can any one please tell me how can i drag a textbox from one cell in a tablelayoutpanel and drop it to another cell of the same tablelayoutpanel.
this is very urgent
please see if any help can i get
thanks and regards to all
SP
|
|
|
|
|
void tblTemplate_DragDrop(object sender, DragEventArgs e)
{
try
{
if (tblTemplate.Controls.Count < tblTemplate.RowCount * tblTemplate.ColumnCount)
{
RasterImageViewer rViewer = (RasterImageViewer)e.Data.GetData("MyData");
Point loc = this.tblTemplate.PointToClient(new Point(e.X, e.Y));
int ColumnIndex = -1;
int RowIndex = -1;
int x = 0;
int y = 0;
while (ColumnIndex <= this.tblTemplate.ColumnCount)
{
if (loc.X < x)
{
break;
}
ColumnIndex++;
x += this.tblTemplate.GetColumnWidths()[ColumnIndex];
}
while (RowIndex <= this.tblTemplate.RowCount)
{
if (loc.Y < y)
{
break;
}
RowIndex++;
y += this.tblTemplate.GetRowHeights()[RowIndex];
}
this.tblTemplate.Controls.Add(rViewer, ColumnIndex, RowIndex);
tblTemplate.GrowStyle = System.Windows.Forms.TableLayoutPanelGrowStyle.AddColumns;
tblTemplate.PerformLayout();
}
else
{
return;
}
}
catch (Exception ex)
{
}
}
void tblTemplate_DragEnter(object sender, DragEventArgs e)
{
e.Effect = e.Data.GetDataPresent("MyData") ? DragDropEffects.Move : DragDropEffects.None;
}
write this code in move event of control which u want move
try
{
if (e.Button == MouseButtons.Left)
{
tblTemplate.AllowDrop = true;
RasterImageViewer objRaster = (RasterImageViewer)sender;
DataObject data = new DataObject("MyData", objRaster);
objRaster.DoDragDrop(data, DragDropEffects.Move);
}
}
catch (Exception ex)
{
}
|
|
|
|
|
Just what I was looking for - thanks...
|
|
|
|
|
I tried code from
http://support.microsoft.com/default.aspx?scid=kb;en-us;312839#XSLTH4156121122120121120120
As we are using window2003 we need to use CDOSYS code from given URL.
Its working on our side.
But giving problem on client side.
Can any one help me this?????
http://support.microsoft.com/default.aspx?scid=kb;en-us;312839#XSLTH4156121122120121120120
|
|
|
|
|
run a port sniffer on the server and see if any of the ports used are blocked on the firewall, or rely on IP or layer 2 broadcasts.
it may be an SMTP relay issue as well. if your sec policy disables the right that might be it.
I would typically advise against sending email from SQL (at least SQL2000). we had issues with it at work.
hey...slang is the vernacular for the vernacular...wow
|
|
|
|
|
hello my self is a beginner and this is my first question on vb code, I Like to now how to generate a vb code to show a picture ; as forum signature if img code is off and also html and smilies off. Is there a Way to show a picture in vb code? Thank you for any help. Greez Roger
-- modified at 0:42 Wednesday 5th April, 2006
|
|
|
|
|
line42 wrote: as forum signature if img code is off and also html and smilies off.
If you're hoping to show a picture in a forum, how do you expect your code to be run ?
In general, a picturebox lets you easily show a picture, Image.FromFile will let you load an image from the file system.
Christian Graus - Microsoft MVP - C++
|
|
|
|
|
hello guys anyone could help me on how to set column in MSHFlexGrid in VB.Net..... hope you can give a sample code.....
thanks! 
|
|
|
|
|
There is no .Net component called MSFlexGrid, It is a COM component.
Right Click MSFlexGrid control
Select properties
Select General tab
Now you can create columns and rows
Regards,
Chatura Dilan
If at first you don't succeed, try; try again, so that you know
what not to do the next time. The answer is out there.
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
