Visual Basic

Member 11264383 wrote:

moving the data from the text box to the list of seperately,

Member 11264383 wrote:

when it calculate and move together

Member 11264383 wrote:

I tried the if else but it keep popping up with a error.

Bastard Programmer from Hell
If you can't read my code, try converting it here[^]

'kinda like this
private sub TextboxChanged(sender as object, e as eventargs) handles txtRoomWidth.changed, txtRoomLength.changed, lstFlooringType.changed

dim SquareFootage as single = txtRoomWidth.value * txtRoomLength.value
dim CostPerFoot as single 'Insert code here to get the cost per square foot of the current flooring type

dim RoomCost as single = Squarefootage * CostPerFoot

'put code here to insert the cost into the list of costs

dim totalprice as single = 0

    foreach RoomPrice as single in RoomPriceList
        totalprice += RoomPrice
    next


txtTotalprice.value = "Total cost is $" & totalprice

end sub

jkirkerx wrote:

When I write back to the WebBrowser1.DocumentText, am I forcing the page to load again?

WebBrowser.DocumentText Property [^]

When you set this property, the WebBrowser control automatically navigates to the about:blank URL before loading the specified text. This means that the Navigating, Navigated, and DocumentCompleted events occur when you set this property, and the value of the Url property is no longer meaningful.

SELECT SUBSTRING(physical_name, 1,
CHARINDEX(N'master.mdf',
LOWER(physical_name)) - 1) DataFileLocation
FROM master.sys.master_files
WHERE database_id = 1 AND FILE_ID = 1

using (var connection = new SqlConnection("Data Source=.;Integrated Security=SSPI"))
{
    var serverConnection = new ServerConnection(connection);
    var server = new Server(serverConnection);
    var defaultDataPath = string.IsNullOrEmpty(server.Settings.DefaultFile) ? server.MasterDBPath : server.Settings.DefaultFile;
    var defaultLogPath = string.IsNullOrEmpty(server.Settings.DefaultLog) ? server.MasterDBLogPath : server.Settings.DefaultLog;
}

Otekpo Emmanuel wrote:

If (c,d) = 1 Then

If SomeArray(c,d) = 1 Then

Public DistX As Integer
Dim Length As Integer
Public DistToDark(1 To 1850) As Integer
DarkX = DistToDark(Length)

Dim angle, ray_inc as Double
Public sine(-160 To 2400) As Double
Dim i As Integer
For i = -160 To 2400
angle = ray_inc * i * piDivBy180 'where rays_inc =1.85
sine(i) = sine(angle)
Next