level 4
qq597353
楼主
要学习本教程,请先参考下面的教程:
安**asic4android 和 Android SDK
Hello world - 安装Android 模拟器
在这个教程里面我们要使用设计器来建立layout. 这个layout包括一个文本框和一个按钮.
用户需要猜一个随机的数字. 用户在文本框里面输入数字并通过点按钮提交猜的数字.
然后系统会通过"toast"信息来给用户提示其输入的数字比系统选择的数字大还是小.
- 建立一个新工程并保存它.
-选择菜单来打开设计器.
设计器有两部分组成.一部分是"控制面板", "控制面板"是IDE 的一部分,它包含所有的属性和选项:

另外一部分是运行在模拟器上的"可视"元件:

正如其名,可视化面板可以显示layout,并允许你移动和改变views的大小.
在可视化面板上改变layout 的话,会同时改变控制面板上的保存的值.
由于所有的数据都保存在控制面板上,因此我们不用担心模拟器崩溃或者被关掉.当你下一次连接上时,layo ut 会自动重新显示.
首先要连上设备.请点Tools - Connect.
这一步需要几秒钟时间. 请注意IDE 会一直保持这个连接直到IDE 被关闭,关闭设计器并不断开这个连接.
使用 Add View menu 菜单来增加一个 Button, 一个 EditText 和一个 Label.
并按下图来设置相应的属性和位置:

改变 Activity的 Drawable 属性为 GradientDrawable来取得过渡色效果.
小贴士 : 当你在小的显示器工作时,你会发现点了 "Top Most"(在控制面板右上角)勾选后会感觉非常方便 .这样控制面板就会显示在最上方而不会被模拟器挡住.
保存这个layout,并命名为 Layout1.
layout是一个非常重要的概念 ,因为其在你的代码和设计之间建立了完全的分界.
layout被保存成一个文件,扩展名为".bal".每个工程可以有好几个这样的文件,除非你显式的载入 一个layout文件,否则不会在你工程中造成任何影响.
一旦你保存了一个layout, 它会自动的被加入"File manager". 你可以在 IDE右面的"Files"面板里面看见它.
我们将要使用button的 click 事件.
每个 view 都有一个EventName的值. 在设计器里面是属性, 当在程序中添加view 时,会作为一个参数传递到Initialize过程中.
为了使用一个事件,你应该使用下面的格式写一个子程序(其实很简单):
Sub <EventName>_<Event> (event parameters).
在设计器里,EventName属性默认为view的名字.
如果我们要通过按钮的EventName的值来调用按钮的click 的事件的话,我们应该按照下面的格式写:
Sub Button1_Click
So here is the complete code:
Code:
Sub Process_Globals
End Sub
Sub Globals
Dim MyNumber As Int
Dim EditText1 As EditText'will hold a reference to the view added by the designer
End Sub
Sub Activity_Create(FirstTime As Boolean)
Activity.LoadLayout("Layout1") 'Load the layout file.
MyNumber = Rnd(1, 100) 'Choose a random number between 1 to 99
End Sub
Sub Button1_Click
If EditText1.Text > MyNumber Then
ToastMessageShow("My number is smaller.", False)
Else If EditText1.Text < MyNumber Then
2013年02月02日 11点02分
1
安**asic4android 和 Android SDK
Hello world - 安装Android 模拟器
在这个教程里面我们要使用设计器来建立layout. 这个layout包括一个文本框和一个按钮.
用户需要猜一个随机的数字. 用户在文本框里面输入数字并通过点按钮提交猜的数字.
然后系统会通过"toast"信息来给用户提示其输入的数字比系统选择的数字大还是小.
- 建立一个新工程并保存它.
-选择菜单来打开设计器.
设计器有两部分组成.一部分是"控制面板", "控制面板"是IDE 的一部分,它包含所有的属性和选项:

另外一部分是运行在模拟器上的"可视"元件:
正如其名,可视化面板可以显示layout,并允许你移动和改变views的大小.在可视化面板上改变layout 的话,会同时改变控制面板上的保存的值.
由于所有的数据都保存在控制面板上,因此我们不用担心模拟器崩溃或者被关掉.当你下一次连接上时,layo ut 会自动重新显示.
首先要连上设备.请点Tools - Connect.
这一步需要几秒钟时间. 请注意IDE 会一直保持这个连接直到IDE 被关闭,关闭设计器并不断开这个连接.
使用 Add View menu 菜单来增加一个 Button, 一个 EditText 和一个 Label.
并按下图来设置相应的属性和位置:

改变 Activity的 Drawable 属性为 GradientDrawable来取得过渡色效果.小贴士 : 当你在小的显示器工作时,你会发现点了 "Top Most"(在控制面板右上角)勾选后会感觉非常方便 .这样控制面板就会显示在最上方而不会被模拟器挡住.
保存这个layout,并命名为 Layout1.
layout是一个非常重要的概念 ,因为其在你的代码和设计之间建立了完全的分界.
layout被保存成一个文件,扩展名为".bal".每个工程可以有好几个这样的文件,除非你显式的载入 一个layout文件,否则不会在你工程中造成任何影响.
一旦你保存了一个layout, 它会自动的被加入"File manager". 你可以在 IDE右面的"Files"面板里面看见它.
我们将要使用button的 click 事件.
每个 view 都有一个EventName的值. 在设计器里面是属性, 当在程序中添加view 时,会作为一个参数传递到Initialize过程中.
为了使用一个事件,你应该使用下面的格式写一个子程序(其实很简单):
Sub <EventName>_<Event> (event parameters).
在设计器里,EventName属性默认为view的名字.
如果我们要通过按钮的EventName的值来调用按钮的click 的事件的话,我们应该按照下面的格式写:
Sub Button1_Click
So here is the complete code:
Code:
Sub Process_Globals
End Sub
Sub Globals
Dim MyNumber As Int
Dim EditText1 As EditText'will hold a reference to the view added by the designer
End Sub
Sub Activity_Create(FirstTime As Boolean)
Activity.LoadLayout("Layout1") 'Load the layout file.
MyNumber = Rnd(1, 100) 'Choose a random number between 1 to 99
End Sub
Sub Button1_Click
If EditText1.Text > MyNumber Then
ToastMessageShow("My number is smaller.", False)
Else If EditText1.Text < MyNumber Then


