Create cursor 任课表 (序号 I, 班级 V(15))改成
Create cursor 任课表 (序号 I, 年级 V(10), 班级 V(15))
Update 任课表 set 序号 = Val(Chrtranc(Leftc(班级,1), '一二三四五六', '123456'))*1000 ;
+ Val(StrExtract(班级,'（','）'))
Update 任课表 set 班级 = Transform(班级+Space(2), '@R XX年级XXXXX班')改成
程序代码：Update 任课表 set ;
年级 = Leftc(班级,1)+'年级', ;
班级 = StrExtract(班级,[（],[）],1,4)+'班', ;
序号 = Val(Chrtranc(年级, '一二三四五六', '123456'))*1000 ;
+ Val(StrExtract(班级,[（],[）]))早说要分开年级和班级，也不至于写那么些脱裤子放屁的字符串提取代码了，现在这段代码已经变成了垃圾代码
[此贴子已经被作者于2025-4-17 17:23编辑过]
这家伙很懒，啥也没留下
