大约有 800 项符合查询结果(耗时:0.0083秒) [XML]
手机蓝牙控制台灯:HC-05 开关、无级调光、定时关灯(附 .aia 源码与单片机...
...备.AfterPicking() {
if 蓝牙客户端1.Connect(列表选择器_设备.Selection) {
微数据库1.StoreValue("lastDevice", 列表选择器_设备.Selection)
标签_连接状态.Text = "已连接"
} else {
标签_连接状态.Text = "连接失败:确认台灯已上电并且已经...
App Inventor 2 JDY-34双模蓝牙模块配置与通信教程 · App Inventor 2 中文网
...功耗蓝牙)
使用 BluetoothLE 扩展
通过Service/Characteristic读写
适合低功耗场景
AT指令配置
通过串口发送AT指令配置模块(需要在未连接状态发送):
指令
功能
示例
...
App Inventor 2 串口通信教程 - USB串口与蓝牙串口 · App Inventor 2 中文网
...选择器1.AfterPicking() {
if 蓝牙客户端1.Connect(列表选择器1.Selection) {
标签_状态.Text = "已连接:" + 列表选择器1.Selection
} else {
标签_状态.Text = "连接失败!"
}
}
断开连接积木
when 按钮_断开.Click() {
蓝牙...
App Inventor 2 蓝牙遥控教程 - 经典蓝牙与BLE控制智能硬件 · App Inventor 2 中文网
...选择器1.AfterPicking() {
if 蓝牙客户端1.Connect(列表选择器1.Selection) {
标签_状态.Text = "已连接:" + 列表选择器1.Selection
蓝牙客户端1.Secure = true
} else {
标签_状态.Text = "连接失败,请重试"
}
}
说明:
蓝牙客户端1.Addres...
App Inventor 2 台球游戏制作教程 · App Inventor 2 中文网
...i = 1 to length(球X) {
for j = i + 1 to length(球X) {
var dx = select(球X, j) - select(球X, i)
var dy = select(球Y, j) - select(球Y, i)
var 距离 = sqrt(dx ^ 2 + dy ^ 2)
if 距离 < 2 * 球半径 and 距离 > 0 {
listreplace(球VX, i, select(球VX, j))
...
App Inventor 2 SQLite数据库教程 - 本地数据存储与查询 · App Inventor 2 中文网
...数据
when 按钮_查询全部.Click {
SQLite1.QuerySQL("SELECT * FROM users ORDER BY created_at DESC")
}
when SQLite1.OnResult(结果) {
// 结果是列表,每项是一个字典
var 显示 = ""
var i = 1
while i 0 {
var item = 列表第1项(结果)
var 学生ID ...
App Inventor 2 TableView与SQLite数据展示教程 · App Inventor 2 中文网
...w.AppInventor.setWebViewString("ERROR:"+e.message); }
}
},100);
function selectRow(i){
window.AppInventor.setWebViewString("SELECT:"+i);
}
App Inventor积木块
when Screen1.Initialize() {
Web浏览器1.HomeUrl = "file:///android_asset/table_view.html"
SQLite1.Open...
声音库 · App Inventor 2 中文网
...声音
就点击播放按钮。
when 列表显示框_声音.AfterPicking(selection) {
当前标题 = selection
当前声音 = 微数据库1.GetValue(selection, "")
标签_状态.Text = join("已选:", selection)
}
when 按钮_播放.Click() {
if isempty(当前声音) {
标签_状态....
读书会 · App Inventor 2 中文网
..._书籍.AfterPicking() {
云数据库1.GetValue(列表选择器_书籍.Selection, [])
标签_状态.Text = join("正在读取《", 列表选择器_书籍.Selection, "》")
}
when 云数据库1.GotValue(tag, value) {
if tag = 列表选择器_书籍.Selection {
列表显示框_评论.Element...
石头剪刀布 · App Inventor 2 中文网
...0], [0, 0, 0]]
}
procedure 显示矩阵() {
标签_矩阵第1行.Text = select(转移矩阵, 1)
标签_矩阵第2行.Text = select(转移矩阵, 2)
标签_矩阵第3行.Text = select(转移矩阵, 3)
}
注意:转移矩阵 是一个列表的列表,select(转移矩阵, 1) 取出来的是...
