for怎么和loop玩？

2004-08-10 05:18:39 310 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

Oracle——循环（LOOP、WHILE、FOR）循环控制用于重复执行一系列语句循环控制语句包括： LOOP、EXIT 和 EXIT WHEN、END LOOP 循环控制的三种类型： LOOP - 基本循环 WHILE - 根据条件循环 FOR - 固定次数的循环 create table T_TEST ( id number(5), num number(10) ); LOOP 语法 LOOP ... 阅读详情

FOR ll_row = 1 to ll_rowcount

This.InsertItemLast(handle, &

ids_info.GetItemString(ll_row, &

music_title'), 2)

LOOP

上面的代码对吗？

...全文

RU.EXE实用指南：从基础操作到高级调试技巧本文是RU.EXE（RW Everything）的实用指南，详细介绍了这款硬件调试工具从基础操作到高级技巧的全过程。文章阐述了RU.EXE作为直接读写硬件寄存器、内存和PCI配置空间的强大工具，如何帮助硬件工程师和开发人员高效进行底层系统调试与故障排查，并强调了安全操作的重要性。阅读详情

piml

PowerBuilder 1,111 成员 66,454 内容

+ 关注 + 加入社区

切换为时间正序

piml 2004-08-12

打赏
举报

哎

疏漏

cxwsoftware 2004-08-12

打赏
举报

使用for ...next
没有for ...loop的说法!

duckqiu 2004-08-12

打赏
举报

for....next,这点和VB是一样的。

老板卤两个蛋蛋 2004-08-11

打赏
举报

for .......
.....
......
end for

也得行

兔子-顾问 2004-08-11

打赏
举报

呵呵，没见过。翻译好发上来大家学习一下

piml 2004-08-11

打赏
举报

各位可知道
上面的代码我是从pb9的帮助中贴的阿
Using DataWindow information to populate a TreeView
就是这里面的

shijizhi 2004-08-11

打赏
举报

刚试了一下，无法编译通过，肯定是个BUG

鸡翅多 2004-08-11

打赏
举报

估计是pb9写帮助的人的笔误
我看了确实是loop，呵呵
原文如下:
Using DataWindow information to populate a TreeView
A useful implementation of the TreeView control is to populate it with information that you retrieve from a DataWindow. To do this your application must:

Declare and instantiate a DataStore and assign a DataWindow object
Retrieve information as needed
Use the retrieved information to populate the TreeView
Destroy the DataStore instance when you have finished

Because a TreeView can display different types of information at different levels, you will probably define additional DataWindows, one for each level. Those DataWindows usually refer to different but related tables. When an item is expanded, the item becomes a retrieval argument for getting child items.

Populating the first level
This example populates a TreeView with a list of composers. The second level of the TreeView displays music by each composer. In the database there are two tables: composer names and music titles (with composer name as a foreign key).

This example declares two DataStore instance variables for the window containing the TreeView control:

datastore ids_data, ids_info

This example uses the TreeView control's Constructor event to:

Instantiate the DataStore
Associate it with a DataWindow and retrieve information
Use the retrieved data to populate the root level of the TreeView:

//Constructor event for tv_1treeviewitem tvi1, tvi2long ll_lev1, ll_lev2, ll_rowcount, ll_row//Create instance variable datastoreids_data = CREATE datastoreids_data.DataObject = "d_composers"ids_data.SetTransObject(SQLCA)ll_rowcount = ids_data.Retrieve()//Create the first level of the TreeViewtvi1.PictureIndex = 1tvi1.Children = TRUE//Populate the TreeView with//data retrieved from the datastoreFOR ll_row = 1 to ll_rowcount tvi1.Label = ids_data.GetItemString(ll_row, & 'name') This.InsertItemLast(0, tvi1)NEXT

Populating the second level
When the user expands a root level item, the ItemPopulate event occurs. This script for the event:

Instantiates a second DataStore
Its DataWindow uses the composer name as a retrieval argument for the music titles table.

Inserts music titles as child items for the selected composer
The handle argument of ItemPopulate will be the parent of the new items:

//就在这段,呵呵
//ItemPopulate event for tv_1
TreeViewItem tvi1, tvi2
long ll_row, ll_rowcount
//Create instance variable
datastoreids_info = CREATE datastore
ids_info.DataObject = "d_music"
ids_info.SetTransObject(SQLCA)
//Use the label of the item being populated
// as the retrieval argument
This.GetItem(handle, tvi1)
ll_rowcount = ids_info.Retrieve(tvi1.Label)
//Use information retrieved from the database
//to populate the expanded item
FOR ll_row = 1 to ll_rowcount
This.InsertItemLast(handle, &
ids_info.GetItemString(ll_row, &
music_title'), 2)
LOOP

Destroying DataStore instances
When the window containing the TreeView control closes, this example destroys the DataStore instances:

//Close event for w_treeviewDESTROY ids_dataDESTROY ids_info

10975037 2004-08-10

打赏
举报

FOR ll_row = 1 to ll_rowcount 后面可以加step 是增加的步长

This.InsertItemLast(handle, &

ids_info.GetItemString(ll_row, &

music_title'), 2)

next
------------------------------------------------------
do untill 条件
loop
-------------------------------------------------
do while 条件
loop

haisha 2004-08-10

打赏
举报

不是 for ... loop 是 for ... next

for怎么和loop玩？

相关推荐