ah. stupid. stupid. stupid.
Me.Height = Me.Height + ..... etc.
Thanks for the info.
Little questionn left. It there a way to slow down the sliding less then 1? I mean:
Private Sub Timer1_Timer()
Timer1.Interval = 1 '<-- Is there a way to make the scrolling more slow?
Me.height =...
Hi,
I am trying to slide, make the form bigger, with a button. but each time it freezes. can someone help me out?
This is one of the codes I tried.
Option Explicit
Private Sub Form_Load()
Timer1.Enabled = False
End Sub
Private Sub Command1_Click()
Timer1.Enabled =...
Thanks guys. Works fine.
One question remains. How do I make onlythe first letter Capital and the rest LCase?
Greetings J. Radjesh Klauke (Netherlands)
Hi,
How do I change the text in the ComboBox from Capital to non-capital?
The ComboBox is filled on Form_Load()
Do Until rs.EOF
Combo1.AddItem rs!TEST
rs.MoveNext
Loop
Greetings J. Radjesh Klauke (Netherlands)
Didn't work. But I think I gave to little info.
There are also 2 textboxes filled with data from the recordset.
This is the full code:
Private Sub Combo1_Click()
List1.Clear
Set rs = New Recordset
rs.Open "SELECT * FROM POSTCODE WHERE GEMEENTE = '" & Combo1.Text & "'", cn...
Hi,
Got a small problem (I hope)
Can Anyone tell me how to remove or hide double items from a listbox?
This is what I already have:
Private Sub Combo1_Click()
List1.Clear
Set rs = New Recordset
rs.Open "SELECT DISTINCT * FROM POSTCODE WHERE GEMEENTE = '" & Combo1.Text & "'", cn...
I always "hard-code" the App.Path. It's not the best way, but I never encountered problems 'cause my setup makes sure that the user cannot change the installationpath. If the user relocates the folder... then he's in trouble... ;)
Thanx Hypetia...
Perhaps i have to read more carefull the next time.. hihihi. Do you know where to find some kind of help or more samples working with SMXP?
Thanks for the reply Hypetia. The first thing i already used. It works fine.
I tried your code without any result. To bad.
this is the code I already had:
.Add "mnuExtra", "options", , "Change Skin" '(31)
.Add "options", "mSkin1", smiCheckBox, "Aisi", , , , smiChecked '(32)...
On the Click_Event() send a msg to a TextFile/ MsgBox/TextBox whatever. Just a simple example:
Private Sub Command1_Click()
' write to msgbox
msgBox "You clicked CommandButton 1"
' write to textbox
Text1.Text = "You clicked Command 1 & vbCrlf
Text1.Text = ""
' write...
Hi,
I hope someone has used or is using SmartMenuXP en could help me out.
I have a menu with several captions. When I click on a caption the checkbox gets checked... So far so good...
What I want is; When I click on another caption I want the 1st caption to be unchecked... an so on...
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.