当前位置:三九宝宝网 → 宝宝教育 → 教学论文 → 正文

怎么用易语言写一个从excel中抽名字的程序

更新:01-06 整理:39baobao.com
字体:

[c语言编程指针数组作为函数参数]#include #include int main() { void sort1(char **p1); void print(char **p2); static char *name[]={"zhang","wang","li","zhao","abe"}; sort1(name); print(name); return 0; }...+阅读

.版本 2

.支持库 eDB

.支持库 spec

.子程序 _按钮1_被单击

.局部变量 a, 整数型

置随机数种子 ()

a = 取随机数 (1, 记录集.记录数量)

调试输出 (a)

编辑框1.内容 = 名字文本 [a]

.子程序 __启动窗口_创建完毕

.局部变量 连接文本, 文本型

.局部变量 文件地址, 文本型

.局部变量 SQL语句, 文本型

.局部变量 循环次数, 整数型

文件地址 = 取运行目录 () + “\名字.xls”

.如果 (数据库连接.连接 (“Driver={Microsoft Excel Driver (*.xls)};DriverId=790;Dbq=” + 文件地址 + “;DefaultDir=” + 文件地址 + “;”) = 真)

输出调试文本 (“链接成功!”)

.如果真 (记录集.置连接 (数据库连接) = 假)

返回 ()

.如果真结束

SQL语句 = “select * from [Sheet1$]”

记录集.打开 (SQL语句, #SQL语句)

循环次数 = 记录集.记录数量

重定义数组 (文本变量, 假, 记录集.记录数量)

.计次循环首 (循环次数, )

记录集.读文本 (0, 文本变量 [1])

加入成员 (名字文本, 文本变量 [1])

记录集.到下一条 ()

.计次循环尾 ()

输出调试文本 (“读入并显示成功!”)

.否则

输出调试文本 (数据库连接.最后错误)

.如果结束

本文地址:https://www.39baobao.com/show/29_24058.html

以上内容来自互联网,请自行判断内容的正确性。若本站收录的信息无意侵犯了贵司版权,请联系我们,我们会及时处理和回复,谢谢.

以下为关联文档:

c语言数组作为函数参数怎样写如果一个函数的目的是要产生一个新的数组,那么最好的做法是在调用函数前就生成好这个数组,然后把这个数组作为参数传给函数,在函数中修改这个数组的值. 像你这种做法,在sum函数...

求用汇编语言写 2个32位有符号数乘法的程序我承认程序不是我写的~是小文写的~不过分数我代领了~哈哈哈哈哈 assume cs:code,ds:data data segment NA dw 0F321H,09AFCH NB dw 08818H,0301DH ;-------第一个字是等待相...

汇编语言有符号乘法指令汇编语言有符号乘法指令大全 MOV(MOVE) 传送指令P28 PUSH 入栈指令P32 POP 出栈指令P33 XCHG(eXCHanG) 交换指令P34 XLAT(TRANSLATE) 换码指令P34 LEA (Load Effective Addr...

朋友之间的祝福语言天给你温暖,地给你温馨,我给你祝福。祝你运气像雨点一样密集!烦恼像流云一样飞去,忧愁像恐龙一样灭绝,幸福像蜂蜜一样甜美。 如果我有一棵快乐草,我想将它给你,我希望你快乐;如果我...

求易语言的取进程ID的源码谢谢高手.版本 2 .支持库 eAPI .子程序 取PID, 整数型 .参数 进程名, 文本型 .局部变量 n, 整数型 数组 = 取系统进程列表 () 成员 = 取数组成员数 (数组) .计次循环首 (成员, n) .如果真 (数组...

语言怎么随机抽取自定义的名字.程序集 窗口程序集1.程序集变量 名字组, 文本型, , "0".子程序 __启动窗口_创建完毕名字组 = { “赵1”, “赵2”, “赵3”, “赵4”, “赵5”, “赵6”, “赵7”, “赵8” }置随机数种...

语言谁帮我制作一个随机抽选名字或数字的源码把姓名或数字 逐个放到一个一维数组中 然后置随机种子取随机数,然后根据这个随机数 将数组中的值 取出 放到你要显示的组件中(如编辑框)。 .版本 2 .程序集 窗口程序集1 .程序...

关于易语言获取QQ昵称的方法急求。。.版本 2 .子程序 取QQ名称, 文本型, 公开 .参数 QQ号, 文本型 .局部变量 文本, 文本型 .局部变量 分割, 文本型, , "0" 文本 = 到文本 (HTTP.读文件 (“ ” + QQ号)) 分割 = 分割文本 (文...

您好请问易语言如何取QQ昵称复制以下代码到易语言,界面控件加一个按钮即可,把下面代码的Q号改成你要获取的,就可以了,代码需要用到精益模块,我是用精益模块5.83版本,你可以去下载 .版本 2 .程序集 窗口程序集...