You are closing your file in the load(). Your file is closed when you try to update it in Adder. Tim
Remember the KISS principle:
Keep It Simple, Stupid! 8-)
I used this with a form that had a listbox that diplays all the permutations. This code does not remove dupes. (string "ABA" will return "ABA" twice) Code is not case sensitive.
this is in a bas module:
Option Explicit
Type Letters
Letter As String * 1
InUse As...
just a wild guess (without in-depth study) , but I'd say the # signs are what is giving you the problem. # is a reserved character. Tim
Remember the KISS principle:
Keep It Simple, Stupid! 8-)
Sure!
Sub cmdSubmit_Click()
'add new thing
frmOtherForm.Combo1.AddItem Me.txtNewThing.Text
'select new thing
frmOtherForm.Combo1.ListIndex = _
frmOtherForm.Combo1.NewIndex
End Sub Tim
Remember the KISS principle:
Keep It Simple, Stupid! 8-)
You don't say what kind of DB it is, or how you are "Viewing" the data. If it is a SQL Server DB & you are using the SQL Server Manager (can't think of the exact name of it), the mngr program won't show data for "Text" fields. Try getting a rs and see if you get values back...
Look in the Templates that come with VB. Search for
"Treeview Listview Splitter.frm" Tim
Remember the KISS principle:
Keep It Simple, Stupid! 8-)
Not a control, but a form, "Mover ListBox.frm". Ships with VB. Mines in VB98/Templates/Controls Tim
Remember the KISS principle:
Keep It Simple, Stupid! 8-)
without seeing the code, one can't even guess, unless you count "Programmer Error"! Tim
Remember the KISS principle:
Keep It Simple, Stupid! 8-)
Not sure, don't have time right now to check it out, but I seem to recall getting an error on movenext to eof = true with forward-only rs. Maybe make it a static rs? (Your code looks fine to me) Tim
Remember the KISS principle:
Keep It Simple, Stupid! 8-)
Only way I can think of is to use mouse over, find out which list item it's over, & put the entire text line in the tooltiptext. Tim
Remember the KISS principle:
Keep It Simple, Stupid! 8-)
As far as I know, the only limits on the # of lines would be by setting the MaxChar prop.(or the max chars a textbox can hold). Tim
Remember the KISS principle:
Keep It Simple, Stupid! 8-)
Add a .bas module, 2 forms to a project. add 3 command buttons & a list box to form1.
Command1 creates 3 new form2s.
Command2 lists the .Tag property (this would be your ID, or you could use the Key property of the collection) for each form in the collection
Command 3 gets rid of the collection...
Do Until EOF(1)
Line Input #1, str
If Left(str,1) = "J" then 'or whatever
'Do processing
end if
Loop Tim
Remember the KISS principle:
Keep It Simple, Stupid! 8-)
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.