User Profile

Geoff · Apr 28 '07, 01:33 PM

I'd do this with ascii characters for each letter, similar to what was said earlier with between "a" and "z".

This is proabably over complicating the problem quite a bit, but it works, it keeps the letters in the case they were found in as well ^^

Code:

    Dim strText As String, strLeft As String, strRight As String
    Dim intA As Integer
    strText = Text1.Text

...

Geoff · Apr 28 '07, 01:13 PM

From what you've said I'm guessing that you're wanting to change the form(s) so they're in windowstate maximized. In the form properties there is an option near the bottom of the list "Window state" with 3 options, normal, minimised, and maximised. Changing this changes how the form loads in form load. Hope this helps.

Geoff.

Geoff · Mar 23 '07, 11:46 PM

I'm not sure about this as I've not got access to Visual Basic at the moment, but ' is the symbol to start a comment, so where ever a ' is in the line of code it's converted into commenting instead. This would explain why you're getting the problem you are.

If this is the reason, then there is no way around it as far as I know.

If it isnt then there is a simple solution for any number you desire,

Code:

Private Sub Form_Load()

...

Geoff · Mar 19 '07, 06:02 PM

For problem 1:
Database control
Use a Data control and connect it to the database, then with the text box select the data properties on the control and put them as required.
Form - From
Have the code on the form where you want the values to display be like:

Code:

Form1.Text1.Text = Form2.Text1.Text

That will made a text box on form 1 have the same caption as a text box on form 2.

For problem 2:...

Geoff · Mar 2 '07, 11:47 PM

If you don't understand college work why come here? I'm sure if you get a time alone with your tutor they'd be more than happy to guide you through the problems you have. If you don't do the work your self then you're not worthy of the qualification you get at the end of the course, if you get a qualification....

Geoff · Mar 2 '07, 11:40 PM

For it to work over the entire array there is many ways you could do it.

One of the preferd ways would be doing a loop.

Code:

Dim intA as Integer
For intA = 1 to 10
   If receptor.Option1(intA).Value = True Then
      Check1(intA).Enabled = False
      Check1(intA).Value = 0
      frmexposurepaths.Text2(intA).Enabled = False
   Else
      Check1(intA).Enabled = True

...

Geoff · Mar 1 '07, 11:11 PM

It depends how you're giving your client the application. If it's already on the system you're just giving them access to it then you could have a secret file, which is deleted upon installation - and can't be reinstalled unless the file is there.

If it's on a CD then you'd need some kind of CD Key... which :S I'm not sure it's possible to make it work with out a connection to the internet during installation.

Like......

Geoff · Mar 1 '07, 05:18 PM

Code:

Private Sub File1_Click()

    Kill (File1.Path & "\" & File1.FileName)

End Sub

Private Sub Dir1_Change()

   File1.Path = Dir1.Path

End Sub

Private Sub Drive1_Change()

   Dir1.Path = Drive1.Drive

End Sub

With that code you'll need a Drive Dir and File tools so you can view any file / folder on the...

Geoff · Feb 28 '07, 11:32 PM

I'm not sure if this is what your meaning, but are you using the Data control to link the application and database?

If you are, then can't you just do...

Code:

Form1.Caption = Data1.RecordSource

Geoff · Feb 28 '07, 11:24 PM

What version of Visual Basic are you running in?

Here is some code you may want to try for Visual Basic 6,0

Code:

List1.AddItem Text1.Text
List1.AddItem Text2.Text
List1.AddItem Text3.Text

Put those in the section for the object you run to do the task, it should work.

Geoff · Feb 28 '07, 11:17 PM

On the object that you click to do the action simly type:

Code:

Label1.Visible = True

Label1 is the default name for a label in Visual Basic, if you've changed it to something else, then you'd have to chance it in the code as well.

Geoff · Feb 28 '07, 12:16 AM

I've just been messing in Vb as I thought this sounded like an interesting application to make. I found it quite easy to make with use of a calendar control.

I had the user input their date of birth in numeric format, then the calendar view zoomed to the date, and a label had the day found printed in it.

I would post my code here for it, but it'd be embarracing as it's probably a really long winded way as there is like...

Geoff · Feb 27 '07, 01:04 PM

Well, my program is linked to an Access database which has 3 tables. The program all works perfectly on another system. I've had this problem with each application I've moved from computer a to computer b. On computer b each of the applications work flawlessly.

I don't really see how telling you what my applications do could help the problem being fixed, as it occurs with any application trying to connect to an access database that's...

Geoff · Feb 26 '07, 08:03 PM

Alright I've just downloaded and ran MDAC 2,8 which from what I can see is the latest version from the microsft site. I installed it and it said that it's not needed to be installed as it's already installed and works perfectly. So I'm guessing that's not the problem. Is there any other things that may help me with this?

Thanks,
Geoff.

Geoff · Feb 26 '07, 07:55 PM

On the data control I've set it to the correct database which is the exact one used on the other computer, it's in the correct folder, when I set the database it let's all that, but then when I try to get a table from the database it doesn't work.

I'll try updating the MDAC from Microsoft. If that doesn't work, then I'll post again.

Thanks for the rapid responce.

Geoff....

User Profile

Profile Sidebar

Leave a comment:

Leave a comment:

Leave a comment:

Leave a comment:

Card game in VB

Leave a comment:

Leave a comment:

Leave a comment:

Leave a comment:

Leave a comment:

Leave a comment:

Leave a comment:

Leave a comment:

Leave a comment:

Leave a comment:

Leave a comment:

Couldn't find an installable ISAM.