-
Upstairs is not good, because hide is just hidden, and if you want to turn it off completely, you have to uninstall it.
Therefore, it should be written like this:
private sub command1_click()unload form1
end sub
This will allow you to close form1
-
private sub command1_click()unload form1
end sub
In form2, end should be used in closing events
-
D bar b is wrong, ture is wrong, the topic is really tricky.
I've tested d right.
-
Oh, it should be "true.""
So, a b is not right.
C is a string, D is right.
-
If it's a single choice, I'm sure D is correct, because I've seen something like that in programming textbooks. I'm not sure about anything else.
But can you tell me why it's bright? I think so.
-
Brothers should be b!
How do you take VB and try it! Just get it.
-
With a slight modification, you can use the backspace key to delete data!
private sub form_load()= 0
end sub
private sub text1_keypress(keyascii as integer)
if keyascii <>8 then
a = len(
k = val(
if a mod 3 = k + 1) *2) mod 3 then= &
len(end if
a = len(
if a > 0 then
if a mod 15 = 0 and k = 0 then= k + 1
len(else if a mod 17 = 15 and k > 0 then
k + 1len(end if
end if
end if
end if
end sub
If you meet your requirements, there will be 2 spaces for every 15 characters.
-
It can be a little complicated, but it definitely works.
private sub command1_click()dim s as string
s = text1
text1 =
dim a() as string
redim a(1 to len(s)) as stringfor i = 1 to len(s)
a(i) =mid(s, i, 1)
text1 = text1 + a(i)
if i mod 2 = 0 then text1 = text1 +
nextend sub
-
private sub command1_click()t = timer
dodoevents
loop until timer > t + 3 '3 seconds, unit: seconds, you can change it yourself, for example, you can have a decimal point!
Your ** process! )
end sub
-
private declare sub sleep lib "kernel32" (byval dwmilliseconds as long)'API Declarations.
private sub command1 click()sleep (3000)'milliseconds3000, i.e. 3 secondscall mysub' to run functions and procedures.
end sub
private sub mysub()
msgbox "Run with a 3 second delay"
end sub
-
Let the button execute the event? What do you mean......
Do you use a timer?
-
The control is not registered, run regsvr32 to register the control.
awesome means super, super, super... Colloquially. It's like you've suddenly seen an alien!! >>>More
That.. May like you. You may also want to help her with the G number. >>>More
Personal secret - Zhang Liangying.
Feel that happiness is all around you. >>>More
Off topic: If you see only one deduction, it can only mean that your financial software is junk or your accountant is lazy. >>>More
There are a lot of people like this, and you shouldn't be overly upset. >>>More