Convert To DO UNTIL LOOP Unfortunately It Does Not Work Properly
Aug 17, 2009I tried so many times to convert this to DO UNTIL LOOP unfortunately it does not work properly can you help me?
Heres: the code
CODE:
I tried so many times to convert this to DO UNTIL LOOP unfortunately it does not work properly can you help me?
Heres: the code
CODE:
My VB app will not work properly on a Windows 7 64 bit PC.When I launched it on the Win7 PC it will open up OK but when I open a crystal report, the form page comes up ok but the report is missing.Then I get a pop up window asking me for a user name an PW:
[Code]...
But I am facing problem Incase of vb .net .I am not able to add Ocx Control what should I do,
View 3 RepliesI am using a backgroundworker to start ffmpeg and trying to use a progressbar.ProgressBar1.Value = e.ProgressPercentage does not seem to work probably because the way ffmpeg uses standard error to report progress. I think i could use the output text to do the trick. the output.Seems stream 0 codec frame rate differs from container frame rate: 1000.00 (1000/1) -> 29.92 (359/12) [code]
View 1 RepliesI need to check if a label starts with a certain text, but it wont work!Here is the code I have:
Dim str1 As String = Label1.Text
Dim value As String = "abc123"
If str1.StartsWith(value) Then
'do something
end if
May I also add that the label i'm checking (the text inside it) has no spaces, i don't know if that makes any difference.
i've got a problem here whereby my ctype doesn't work.firstly, to replicate my case briefly, i've created an extension of control class
[code]...
father.getheight 'compiler writes: Panel class doesn't support getheight, but I've already converted it to a Control with CType!end sub of course if i dim father as Control it works perfectly, but in my case father may be other objects as well that aren't controls so I had to dim father as a general object, is there a fix so i could properly convert father into a Control object?
I'm using the IsBusy property to determine when a backgroundworker has completed. In the RunWorkerCompleted event I assing the result of the RunWorkerCompletedEventArgs to a public variable within the module where the backgroundworker events reside. The trouble is, the IsBusy property occasionally becomes true before the public variable gets assigned the value of the RunWorkerCompletedEventArgs. I experimented with putting a Threading.Thread.Sleep(10) after the IsBusy property becomes true and it seems to fix the problem. But it really doesn't seem right that I should have to do this. What is wrong here? I have placed the backgroundworker events in a component that is instantiated from the windows form, instead of placing the background worker events within the code of the form itself.
Here is my code;
Function SendAndWait(ByVal IntegerArray() As Integer) As String
Component.BackgroundWorker.CancelAsync()
Do While Component.BackgroundWorker.IsBusy
[code]....
I'm working through a programming project, which should be quite easy but im stuck right at the start (relatively new to VB). I have a textbox (named textbox1) and a checkbox next to it. I want the checkbox to be ticked (.checked) when ever the value in the textbox is between 1 and 100, the checkbox to not be ticked when theres nothing in there, and for it not to be ticked when the value is < 1 and > 100. Figured a case statement would be the easiest. (this piece of code is just a validation check, basically in the real thing the user would have to enter in a value between 1 and a given number, and need to tell the user if that value is valid).
Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
Select Case TextBox1.Text
Case Is = ""
[code]....
But what happens is, if I enter in the value 1 in the textbox, the checkbox becomes ticked, as it should. It tick with any values between 2 and 99 (any number not starting with 1) but the checkbox becomes ticked again when the value is 100. For any other range, say 1 to 70, the checkbox would be ticked if the value in the textbox is 1 to 7, or any number starting with 1 or 7, but not 8 or 9, or any number starting with 8 or 9.
I found a class that saves column order and column width for a list view but i cant get it to work properly.
Public Class cListviewHelper
Private Declare Function ListViewiColumnOrder Lib "user32" Alias "SendMessageA" (ByVal hwnd As Integer, ByVal Msg As Integer, ByVal wParam As Integer, ByRef lParam As Integer) As Integer[code].....
It saves the right number of columns but not in the order they are.It always saves them like this in the registry "0,1,2,3,4,5,6"
My project requires that a windows service checks up a table on a sql database(MDF) and if product existence is 0 then sends an email to some mail address and keep checking every 24 hrs.Now Im able to send mail messages but what Im not able is to make the service itself to work or at least make sure that is working.I do the following(correct me if I do something wrong or missing a step):
1. create a new project and choose windows service
2. add a timer and set to 4000 ms just to test not wait the 24 hrs lol
3. then open its event timer_elapsed and put some code on it, like a msgbox that would keep spamming every 4 secs just to test
4. at the event onstart I enable the timer by: timer1.enabled=true
5. at the event onstop I disable the timer by: timer1.enabled=false
6. right click then choose add installer
7. in the newer installed with the two objects:
a. serviceinstaller1 set its properties to: displayname: myservice and servicename: myservice
b. serviceprocessinstaller1 set account property to LocalSystem
8. build the project and install it by opening the VS console and type: "installutil c:path blah blahservice.exe" then hit enter
9. all successfull installed open the pc manager and run the service from the list and this should be the deal
Now my real problem is that by following those steps my service is sucessfully builded, installed, and started but after the 4 seconds no msg pops up so this leads me to think that is not doing anything or I did something wrong in the steps above. Is there another way to test if this service is working else than the msgbox or the log entry? Plus, Im working on my home pc which is a xp OS. I tried the same at college pcs wich are win7 and when I did install by the console it returned an error weird but in my home pc it doesnt(and I have to present my project at college at college and tomorrow
i just want to know how i can make this program run proberly. if you import a file in the listbox and you wanne start it whit the process.start methode it won't work. here is my code:
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
OpenFileDialog1.ShowDialog()
[code]....
My question is how can i make the process.start work properly and will the program start the file?
I wrote a program which is editing data from database. I used few tutorials (I`m beginer) and everything is working fine(I can make changes in datagrid). but when I`m trying to save changes made in dataset(e.g. save added record) I can not to that (there are no changes in my access database, but inly in datagrid)what is interesting when I delete record - changes are saved and record is deleted from db. where is my mistake? what is wrong? maybe some tips what can I improve in this small program?
[Code]...
i add this values to listbox
6
7
15
6
[code]....
but in button function when i press the key is shows me this:
15
5
6
6
[code]....
code:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
ListBox1.Sorted = True
End Sub
i am still new to using session state, i want to convert page name into and integer according to a database table a function then compares "X" and "Y" to check if a user have the right to view this page..i know this is not the best way of managing website security, but it is like "training on how to use the session".[code]
View 1 RepliesThis program is to display the monthly payment and amortization table for three mortgage loans with the same loan amount, but three different interest rates and terms.The ArrayIndex is not looping properly.The first loan displays correctly, but the other two only display the monthly payment and not the amortization table.[code]I originally had the For...Next loop in the DisplayAmortizationTable() sub with the Do Until loop nested in it. My instructor had me move the loop to the Main() sub, but it did not help.
View 4 RepliesI'm having a problem with this code:
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
clave = Request.QueryString("cve")
If clave = Nothing Then
[code].....
I have this xaml:
<Canvas Width="75" Height="75">
<Button x:Name="button" Background="Olive" Canvas.Left="0" Canvas.Top="0" Width="75" Height="75" Click="button_Click"/>
[code].....
For some reason, it seems that the outer block doesn't seem to update recursively, as I expected it to. I want the loops to add all directories within "C:UsersDrise"to the array internaldirs(). Any advice on the correct way to do this, as it seems I'm doing it improperly?
Static internaldirs() As String
internaldirs.add("C:UsersDrise")
For Each internaldir As String In internaldirs
[code]....
I have a user control with an embeded DataGridView. I exposed the Columns property so that the columns collection could be edited in the visual designer:
View 2 RepliesI'm trying to make a program of mine into a multithreaded application, but I've hit a pair of snags that I documented in the following code. I can expand this stub into a more efficient version of my existing application.
[Code]...
this is my code
Private Sub WebBrowser1_DocumentCompleted(ByVal sender As System.Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs) Handles WebBrowser1.DocumentCompleted
TextBox1.Text = ""
TextBox1.Text = WebBrowser1.DocumentText
Call baby()
End Sub
[Code]...
I'm trying to set the tab order on my form and no matter what I do, it doesn't relearn the new tab position after I change the index. It almost seems like the form is locked.
View 1 RepliesI am currently using double data types. The problem I am encountering is that sometimes the user will have to input a value of 0 in the required text box and this creates an error. My question is what data type will allow the user to input 0 and allow the mathematical functions to work properly. Decimals maybe?
View 8 RepliesSo I made this neat little clock program in smallbasic and i downloaded visual studio 2008/visual basic 2010 yada yada.I clicked on graduate, made a folder under my documents to dump the stuff, finished installing, and then opened the project in VB.The SmallBasicLibrary couldn't be found
Such components as the GraphicsWindow wasn't converted to VB or something (probably because the library wasn't found).I followed Microsoft's instructions but I don't know what happened.
I have found a lot of articles about Reflection and know how to create a class. I'm practicing how to work properly with the reflection to create a module/plugin-based application.So I found a simple example which is working great, but it isn't dynamic enough, 'cause it is hard-coded. I need to read all the .dll's from the application.startuppath & "modules" & *.dll and get there names (without the .dll).Code is was testing for practice returns the form (I know that this is not the correct way to call the dll dynamically):
vb.net
Imports System.Reflection Public Class Form1 Private Sub cmdOK_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdOK.Click Dim assemblylink As [Assembly] assemblylink = [Assembly].LoadFrom(Application.StartupPath & "/" & "LoginAssembly.dll") Dim LoginFrm As Form LoginFrm = assemblylink.CreateInstance("LoginAssembly.Login") LoginFrm.Show() End Sub
I am trying to convert "-10,00" from a string into a currency using the Swedish culture. Here is my code:
ByVal ci As System.Globalization.CultureInfo("sv-SE")
Convert.ToDecimal("-10,00").ToString("C", ci)
The output from the above code is: -1.000,00 kr, which is wrong. It should be -10,00 kr. Is there anything wrong with my approach?
The solution is to pass the cultureInfo into the ToDecimal function as a second parameter.
ByVal ci As System.Globalization.CultureInfo("sv-SE")
Convert.ToDecimal("-10,00", ci).ToString("C", ci)
I though that I know this one... This simple For loop:
[code]...
VB.NET While 1 = 1
Dim localRecv As New StreamReader(localClient.GetStream)
Dim aString As String = localRecv.ReadLine
localRecv.Peek()
MsgBox(aString)
End While
Basically "aString" will keep updating if new data arrives to the server. This way does work, and keeps MsgBoxing every time I get new data, but I don't wanna use While, I need something else, because It won't run any other code, just keeps looping that. :/
I can use the below code snippet to clear the text from each textbox on a form.
For Each ctl As Control In Me.Controls
If TypeOf ctl Is TextBox Then
ctl.Text = ""
End If
Next
But if I want to use it to ensure that all radiobuttons in a group of radio buttons are unchecked then it doesn't work i.e.
For Each ctl As Control In Me.Controls
If TypeOf ctl Is RadioButton Then
ctl.checked = false
End If
Next
I'm assuming it is because the checked property is not common to all controls.
I am calling a Fortran dll from vb.net. It works when I call it it one time only. When I put that in a loop, it works for the first time and second time it quits the program. How can I run this in a loop?
View 4 Replies