Conditional Checking Of An Image?
Mar 28, 2011imgTitle.Image = My.Resources.title
If imgTitle.Image Is My.Resources.title Then
MsgBox("Success")
Else
[code]....
imgTitle.Image = My.Resources.title
If imgTitle.Image Is My.Resources.title Then
MsgBox("Success")
Else
[code]....
I have conditional code checking in a card game Im working on and it just feels wrong.I m looking for a better way.Right now, all my functions return a card. If I get a card Im usually done and can fall out of my nested structure.If I dont get a card I have to test a condition If card is nothing.And this condition gets repeated ad-nauseum.Here is a small sample of the code.
card = FindMaxTrump(playableCards)
If Not card Is Nothing Then
'If we found a trump at all[code]....
This might be a fine way to do it, but the constant check for a null card is what has me wondering if there is a better approach I'm missing.
Table relationship[code]...
There are some TimeSheet that have no TimeRecord, which I need to select as well. How can I select all of them to make selection like above wanted result? I'm thinking of how I can include some condtion checking in the query to see if this TimeSheet has no TimeRecord then no need to Sum(tr.BonusHour) just assign TotalHour to zero.
So I'm writing the equality operator overload (Operator =())for a custom object, and the resulting mess of If conditionals is just an eyesore. But so far, it seems like the only sane way to check the values to as to match the specific behavior of this object.
The rules are:Num1 is required, period, and both the left and right operands and must be equal for True. Else, False.Num2 is optional, but if specified, must be present for both the left and right operands, and must be equal for True. Else, False.Num3 is optional, but can only be specified if Num2 is also present. Else, False.Num3, if specified, must be present for both the left and right operands, and must be equal for True. Else, False.
[Code]..
I also know that I could cache elements of the checks into booleans and then use those to reduce the amount of text. But that seems like a waste of cycles just for code readability. So I wanted to know if the SO community had better thoughts on reorganizing it, just in case I'm being too verbose with my checks.
I have a datagrid in asp.net and vb.net, and i'd like to show the status of the item of a certain row with two possible icons.I have a function that checks validation and returns a boolean value that uses some fields of the datagrid.
View 2 RepliesCompletely new to ASP.net
Page Language="vb"
Microsoft .NET Framework Version:2.0.50727.3603; ASP.NET Version:2.0.50727.3082
I want to check on the server for the existence of an image, then if it does exist, display the image wrapped in other code. E.g.
if "/images/name.jpg" exists then
<div><img src="/images/name.jpg"></div>
else
Do nothing.
Seems really simple to me but NOTHING I have tried has worked (compilation errors). I've tried examples using system.io, DIM stuff with 'FileInfo', Set fs. FileInfo examples produce 'not defined' errors, 'Set' says it's outdated and not used anymore and so on.
I have a datagridview with a bunch of columns, one of them being an Image type (DataGridViewImageColumn).What I want to do is basically check to see what the file path of the image in one of those cells is.
I've tried doing like:
If (DataGridView1.Item(7, Number).Value.ToString = "some path" then
'do stuff here
End if
but it always says DataGridView1.Item(7, Number).Value.ToString is just "System.Drawing.Bitmap", instead of the actual file path of the image in the cell.I've also tried the above, without the .ToString, but I get an error saying System.ArgumentException was unhandled (Argument 'Prompt' cannot be converted to type 'String'.)
With all the smarts of actually loading images being done by the .net framework, seems like I shouldn't have to repeat it all in my code by checking for magic numbers, or using a hack like this:[code]Am I missing something obvious, like System.Drawing.IsImage(stream)?
View 1 RepliesIs there any better performance by checking for a true value like this:
[CODE]..............
Than like this:
[CODE]..............
The template I use for all of my pages looks at the style.css to get the header image. I want to change it so that it looks at who logs in and displays an image based on who they are.
View 3 RepliesIs there a way to set a variable in VB.NET in an IF statement. I would like to do the following:
[Code]...
Is there some way I can get the last "ElseIf" to work? I know I can re-write it to get it to work but is there some syntax that will make it work the way it is?
In this query against a datatable i'm trying to do some conditional filtering.The check against Timeband(index N) should only be done when the Index exists. (the base code only had three item fields, i've converted them to a simple list)
Dim res As DataTable =
(
From dr As DataRow In dtTimedRow.AsEnumerable()
Select dr
[code]....
The above code triggers an Exception if the count = 1. It executes the code next to imeBands.Count > 1 which it should not. What would be the correct solution for this code.In the mean time i've added a simple filter function.
I am very new to VB and was thrown into the water with a very big project done in VB.What I am trying to do is this:1. The initial search is for locations within an area of 200 miles.2. If no locations are returned search for locations within 500 miles.Seems easy enough but I cannot seem to figure out how to do part two.If thunder.apps.ddr.franchiseconnect.bll.Current.Settings.Location.hasValue Then'we run this procedure to get the location's value from ZIP db for lat, long assignment
View 13 RepliesI have a javascript src that i need to add to some of the pages in a site.
for example <script type="text/javascript" src="http:abcxyz.com/zzz"></script>
I want to add this conditionally on a .ascx page - if the Request.ServerVariables["SCRIPT_NAME"] ends with certain criteria.
The ascx language is vb, and there is no code behind.
I have some textboxes on a report in VB 2005. There are three "Status Types": A, B and C. I want an expression like this to work on a number of textboxes:
[Code]...
I have two combo boxes: cboRepairCategory (plumbing, landscaping, etc) and cboVendors. I am using Stored Procedures in SQL to store the data from my database and then load them into the combo boxes.The cboRepairCategory will be loaded first. Once the user has selected what type of repair it is I want it to restrict the amount of vendors that can be selected, so instead of saying:CREATE PROCEDURE dbo.up_Fill_Vendor_Combo
AS
SELECT VendorID, CompanyName
FROM Vendors
[code].....
I would select only the vendors that have the RepairType of say Landscaping, so thecboVendor would load now only Vendors with Landscaping instead of all vendors.My question is this: Is this done in SQL in my Stored Procedure or is it done in VB in my functions for my combo boxes. I've never tried this before I am totally lost on it. I have fiddled with the code on both ends but to no avail.
I have a DGV that is bound to an Access DB DataTable. I have added a column in the DB that is either a 0 or a 1. When the program loads, I want to change the backcolor and forecolor of each row based on the value of this column's cell. ie: a 1 makes the row red, a 0 makes the row green. this column would be hidden in the DGV.
Is this possible to do at runtime even though it is bound?
I'm not sure when I would actually do the color swap, formLoad?
Second question, as I iterate through each row of the DataGridView and need to change the value of this column, will this update my DB automatically, or do I need to call an update() after each row?
In Perl (and other languages) a conditional ternary operator can be expressed like this:my $foo = $bar = $buz ? $cat : $dog;Is there a similar operator in VB.NET?
View 2 RepliesI have a master file and a reference file
The outcome i need is a record of matches and also non matches from the reference file
Using a loop and conditional i can find the matches
[Code].....
I would like to set a conditional breakpoint with a string but it doesn't seem to work.
This is the code example:
For Each Elem in Elements
strMyString = Elem.Name
Next Elem
and in the breakpoint condition I wrote: strMyString = "Value"
I want to be able to call forth hundreds of different photos be selecting them from a listbox or something of that nature.
Normally, if I only had a few images, I would amke their visibility false and then use If statements to turn on their visibility once it is selected. However, putting hundreds of images on to a form and then changing their visibility, seems like a pain.
I was wondering if there is a way to call forth each photo within the resources folder when an item is clicked so I don't have to put each one directly on the form.
Quick question, of which the quickest and easiest answer may well be to rearrange related code, but let's see...So I have an If statement (a piece of code which is a part of a full working solution written in C#) rewritten using VB.NET. I am aware the VB.NET IIf(a, b, c) method evaluates both b and a regardless of the trueness of the first evaluation, but this seems to be the case in my standard construct, too:
If (example Is Nothing Or example.Item IsNot compare.Item) Then
'Proceed
End If
[code].....
In the members region I declare _Name and assign it the value "NameA" but how do I assign this value conditionally?The idea is that if in some file there's a value set than that should be the default value and not the hard coded one, if non is set the hard coded one should stick.
#Region "Members"
Private _Name As String = "NameA"
#End Region
#Region "Properties"
[code]....
How can you write a #If statement on a single line?
vb.net
#Const Debug = True #If Debug Then Console.WriteLine("Debug")'I also tried:#If Debug Then : Console.WriteLine("Debug") : #End If'
But that didn't work either?
I want to add BarType conditional formatting for my range !
I have :
sheet.Range("F3").FormatConditions.AddDatabar()
How to add :
MinPoint
MaxPoint
BarColor
???
I tried :
sheet.Range("F3").FormatConditions(1).MinPoint = New ConditionValue(ConditionValueType.LowestValue, "0")
But It gives Error : ConditionalValue is not defined.. ??
I have following imports :
Imports Excel = Microsoft.Office.Interop.Excel
Is there a way to conditionally format an Excel Chart? For example I have a bar graph. Currently I have the bars a purple color. I would like to turn a certain bar red if it meets certain criteria. Is there anyway to do this?
View 1 RepliesThis is a bit of an odd one. Last week, this code worked as expected. This week, it does not. Example:
[Code]...
I want to display an image if 2 conditions are met. The data item is not null. The value of the data item is greater than 0 Markup
<img id="Img1" runat="server" visible='<%#IIF( DataBinder.Eval(Container.DataItem, "amount") is DBNull.Value Or DataBinder.Eval(Container.DataItem, "amount") = 0, False, True)%>' src="/Images/check.png" />
Error message: Operator '=' is not defined for type 'DBNull' and type 'Integer'.
Description: An unhandled exception occurred during the execution of the current web request. Please review the stack trace for more information about the error and where it originated in the code.
Exception Details: System.InvalidCastException: Operator '=' is not defined for type 'DBNull' and type 'Integer'.
I have a column 'A' in worksheet 'two' and another column 'B' in worksheet 'one' !I want to copy the conditional formatting of Column A in two to Column B in one !Basically, I want to copy everything from Column A in two to Column B in one except the data
View 1 RepliesI created a sql query to check if the mobile number is registered or not. If its registered, it will send the new pin code to the customer and if its not, the customer will get a message that "This number is not registered or you are not authorized to this"... something like that... Sending of new code is already working. I just dont know how to make it as conditional statement like PHP. After you query on PHP, you can just set a variable and make a conditional statement..Here is my script in vb.net:
Private Sub CheSMS()
Dim SQLServer As String = My.Settings.SQLServer
Dim conn As SqlConnection[code]......