Try passing the values to a global sub
Public Sub AddToSize(ThisText As TextBox)
ThisText.Width = ThisText.Width + 75
End Sub
Private Sub Text1_Change()
AddToSize Text1
End Sub
These commands will connect your controls
Private Sub Dir1_Change()
File1.Path = Dir1.Path
End Sub
Private Sub Drive1_Change()
Dir1.Path = Drive1.Drive
End Sub
Private Sub File1_Click()
File1.Path = Dir1.Path
End Sub
I don't know if I am understanding you correctly but I do know that if you wish to use two different data sets in one form for report or display, you need two data controls
Use this routine to pass controls and editing them.
Public Sub ChangeToCapital(ThisText As Textbox)
'This sub will change whatever text box is passed
'to it.
ThisText.Text = UCase(ThisText.Text)
End Sub
Private Sub Text1_LostFocus()
'Pass this text box name to the global procedure
'called...
I'm thinking that you wish to validate before you allow access to save. Use the Validate procedure for this. The following is an example...
Private Sub txtMovieNumber_Validate(Cancel As Boolean)
If Len(txtMovieNumber) > 4 Then
ErrorMessage = "The movie number cannot contain more than 4...
Using the package development wizard, you will be given the option of creating the dependant files necessary for you application to run.
This involves outside components not be a part of your application but may be necessary to run with your application such as ms chart or other components...
The flex grid is best for use of different displays. But you must under stand the grid. VB doesn't do it for you.
Suggest the book, "VB 6.0" if you don't have one.
Try this link:
http://msdn.microsoft.com/library/en-us/mshflx98/html/vbprocolrowpropertiesx.asp
You might want to use a flex grid.
It would go something lik this >
With rndVideo
For rowNumber = 1 To TotalRecords - 1
Get #1, rowNumber, rndVideo
Grid.Row = rowNumber
For colNumber = 1 To 6
Select Case colNumber
Case 1...
Select the form and then the datagrid in design.
Right click the datagrid, select the properties.
Select the Columns tab.
In this display you will find a list box containing the column array beginning with 0.
Select this column and asign a title by typing ColumnTitle in the Caption field.
Asign...
You might try to reinstall your VB. MS keeps track of each object resident to VB and Added. If you do not have a license then the installation will be discontinued.
Also, don't forget to erase any directories which are not deleted by the automatic process.
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.