Ok i know what problem is
because the "dicer"!

if dicer is 1~5 int then will be may textbox1.text content change
because it's another Conditional judgment


so


if $dbclick = 8 then
  dicer = 0 <------Random content(text) is 1 to 5
  Form3.TextBox1.text = ("if you click me again i will be sudo rm -rf /* your 
computer!!!")
  Form3.Show
End if <-------- $dbclick = 8 Conditional judgment end
if dicer = 1 then<-------- start another Conditional judgment
.....


=============================================================
i try

if $dbclick = 8 then
print "hello"


when i click 8 time console is printed HELLO
but the textbox1.text it's still No expectations of the content(text)

and i deleted
else
 goto just_keep_moveing

 it's doesn't work...



On 07/14/2015 03:14 PM, tsukuba GIMP user wrote:
> No i make a mistay Mistakes not $dbclick += 1 still not working is

I think it may actually be working. You just cannot see that it is, because the 
code after the "just_keep_moveing" label is 
resetting the value of TextBox1.text.

After performing the "If $dbclick = 8" test the program drops through and 
executes the "just_keep_moveing" code no matter what 
the value of dbclick is. Depending on what the "just_keep_moveing" code is 
supposed to do, you may need to move it to *inside* 
the Else block.

You could either set a breakpoint at or just before the Else and examine the 
value of TextBox1.text, or place a 'Print "hello"' 
statement just after "If $dbclick = 8 then" to see if "hello" is printed to the 
IDE console. If it is, then the "If $dbclick = 
8" test *is* working and you need to rethink the program's logic.


Lee
__________


------------------------------------------------------------------------------
Don't Limit Your Business. Reach for the Cloud.
GigeNET's Cloud Solutions provide you with the tools and support that
you need to offload your IT needs and focus on growing your business.
Configured For All Businesses. Start Your Cloud Today.
https://www.gigenetcloud.com/
_______________________________________________
Gambas-user mailing list
Gambas-user@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/gambas-user
------------------------------------------------------------------------------
Don't Limit Your Business. Reach for the Cloud.
GigeNET's Cloud Solutions provide you with the tools and support that
you need to offload your IT needs and focus on growing your business.
Configured For All Businesses. Start Your Cloud Today.
https://www.gigenetcloud.com/
_______________________________________________
Gambas-user mailing list
Gambas-user@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/gambas-user
------------------------------------------------------------------------------
Don't Limit Your Business. Reach for the Cloud.
GigeNET's Cloud Solutions provide you with the tools and support that
you need to offload your IT needs and focus on growing your business.
Configured For All Businesses. Start Your Cloud Today.
https://www.gigenetcloud.com/
_______________________________________________
Gambas-user mailing list
Gambas-user@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/gambas-user

Reply via email to