sub

第6课:郭盛华课程_VB编程之TextBox控件的使用方法

做~自己de王妃 提交于 2019-12-20 01:19:50
主讲老师:郭盛华 TextBox控件: 文本框,与Label不同的是,这个支持用户输入文字内容。 主要使用的属性: Text:文本框显示的内容 Multiline:是否多行显示 ScrollBars:不显示、显示垂直、显示水平、同时显示垂直或水平滚动条。 实例一: Private Sub Text1_Change() Label1.Caption = Text1.Text End Sub 当用户输入时,内容自动输出到窗体 具体请看视频教程:微博@郭盛华老师 来源: CSDN 作者: 郭盛华 链接: https://blog.csdn.net/qq_42257049/article/details/103610279

[每日一讲] Python系列:字符串(上)

爷,独闯天下 提交于 2019-12-19 09:58:59
字符串作为人类最常处理的内容,在计算中决定了其占有重要的地位。在 Python 中,字符串的操作和处理往往需要根据实际问题,结合其他操作才可以完成目标。在复杂世界仅仅是字符串 API 还无法完成工作。故本章仅先贴出 str 对象的内容,给出一个印象认识。 通过安装的 python 环境,并运行 ipython,查看帮助文档内容如下: In [9]: help(str) Help on class str in module builtins: class str(object) | str(object='') -> str | str(bytes_or_buffer[, encoding[, errors]]) -> str | | Create a new string object from the given object. If encoding or | errors is specified, then the object must expose a data buffer | that will be decoded using the given encoding and error handler. | Otherwise, returns the result of object.__str__() (if defined) | or repr(object

LeetCode 25. Reverse Nodes in k-Group

烂漫一生 提交于 2019-12-19 09:47:46
题目描述(困难难度) 将一个链表,每 k 个倒置,最后一组不足 k 个就不倒置。 解法一 迭代 关于单链表倒置,我们在 第 2 题 就讨论过。有了单链表倒置,这道题无非就是用一个循环,每次将 k 个结点取下来,倒置后再接回去,然后再取 k 个,以此循环,到了最后一组如果不足 k 个,不做处理,直接返回头结点就可以了。所以关键就是,指针指来指去,大家不晕掉就好,我做了图示,大家参考一下。 为了将头结点也一般化,我们创建一个 dummy 结点,然后整个过程主要运用三个指针, tail 指针表示已经倒置后的链表的尾部,subhead 指针表示要进行倒置的子链表,toNull 指针为了将子链表从原来链表中取下来。 一个 while 循环,让 toNull 指针走 k - 1 步使其指向子链表的尾部。中间的 if 语句就是判断当前节点数够不够 k 个了,不够的话直接返回结果就可以了。 将子链表指向 null ,脱离出来。并且用 temp 保存下一个结点的位置。 然后调用倒置函数,将子链表倒置。 接下来四步分别是,新链表接到 tail(注意下边的图 tail 是更新后的位置,之前 tail 在 dummy 的位置) 的后边;更新 tail 到新链表的尾部,也就是之前的 subhead (下图 subhead 也是更新后的位置,之前的位置参见上边的图);sub_head 更新到 temp 的位置

【机房收费系统】添加或删除用户

这一生的挚爱 提交于 2019-12-19 00:16:52
添加和删除用户长窗体不算很难。画一个流程图逻辑就清楚了。 先看流程图部分: 添加按钮里面还嵌套一个添加用户的窗体 窗体展示:窗体特别简洁,值得注意的是combouserlevel控件,它是不可以手动输入的 禁止combouserlevel输入的代码:keyascii=0 Rem:禁止combouserlevel输入 Private Sub Combouserlevel_KeyPress(KeyAscii As Integer) KeyAscii = 0 End Sub 对于combouserlevel选择不同的用户级别,显示不同的信息 。查询的是user_info表 Rem:选择不同的用户级别,显示不同的信息 Private Sub Combouserlevel_click() Dim txtsql As String Dim mrcus As ADODB.Recordset Dim msgtext As String txtsql = "select *from user_info where level='" & Trim(combouserlevel.Text) & "'" Set mrcus = executeSQL(txtsql, msgtext) If mrcus.EOF Then MsgBox "没有数据!", vbOKOnly + vbExclamation,

【机房收费系统】注册

纵然是瞬间 提交于 2019-12-19 00:15:18
在敲注册长窗体之前,我先点的exe程序,把逻辑搞清楚以后,就容易上手了 流程图:(好丑,将就看) 窗体显示: 判断金额: 充值金额不能低于余额。连接basic_info txtsql = "select * from basicdata_info" Set mrcba = executeSQL(txtsql, msgtext) If Val(txtcash.Text) < Val(txtbalance.Text) Then MsgBox "充值金额不能低于余额!", vbOKOnly + vbExclamation, "警告" txtcash.Text = "" txtcash.SetFocus Exit Sub End If 判断基本信息:存盘 '判断卡号 If Not testtxt(txtcardno.Text) Then MsgBox "卡号为空,请输入卡号!", vbOKOnly + vbExclamation, "警告" txtcardno.SetFocus Exit Sub End If If Not IsNumeric(txtcardno.Text) Then MsgBox "卡号请输入数字!", vbOKOnly + vbExclamation, "警告" txtcardno.Text = "" txtcardno.SetFocus Exit Sub End If

正则爬取猫眼电影榜单信息

扶醉桌前 提交于 2019-12-18 17:59:42
预期效果 代码实现 import requests from requests.exceptions import RequestException import re import json def get_one_page(url): try: response = requests.get(url, headers={ 'User-Agent': 'Mozilla/5.0 (Windows NT 6.1; rv:57.0) Gecko/20100101 Firefox/57.0'} ) if response.status_code == 200: return response.text return None except RequestException: return None def parse_one_page(html): pattern = re.compile('<dd>.*?</dd>', re.S) results = re.findall(pattern, html) for result in results: sub_pattern = re.compile( '<dd>.*?board-index.*?>(\d+)</i>.*?data-src="(.*?)".*?name"><a.*?>(.*?)</a>.*?star">(.*?)</p>.*

JavaScript基础入门12 - 面向对象编程

别说谁变了你拦得住时间么 提交于 2019-12-18 13:36:44
目录 JavaScript 面向对象编程 前言 构造函数创建对象 instanceof constructor 返回值 原型对象 关于对象的属性查找 in hasOwnProperty() JS当中实现继承 类式继承 实现类式继承 - 原型链继承 实现类式继承 - 借用构造函数 实现类式继承 - 组合继承 实现类式继承 - 寄生组合继承 类式继承 -- ES6 class 使用原型继承 原型继承 与原型链继承的关系 拷贝继承 拷贝函数 对象间的拷贝继承 使用构造函数的拷贝组合继承 JavaScript 面向对象编程 前言 面向对象编程(Object Oriented Programming,缩写为 OOP)是目前主流的编程范式。它将真实世界各种复杂的关系,抽象为一个个对象,然后由对象之间的分工与合作,完成对真实世界的模拟。 每一个对象都是功能中心,具有明确分工,可以完成接受信息、处理数据、发出信息等任务。对象可以复用,通过继承机制还可以定制。因此,面向对象编程具有灵活、代码可复用、高度模块化等特点,容易维护和开发,比起由一系列函数或指令组成的传统的过程式编程(procedural programming),更适合多人合作的大型软件项目。 那么,“对象”(object)到底是什么?我们从两个层次来理解。 (1)对象是单个实物的抽象。 一本书、一辆汽车、一个人都可以是对象,一个数据库

使用MySql管理层次结构的数据

与世无争的帅哥 提交于 2019-12-18 09:49:13
【推荐】2019 Java 开发者跳槽指南.pdf(吐血整理) >>> 概述 我们知道,关系数据库的表更适合扁平的列表,而不是像 XML 那样可以直管的保存具有父子关系的层次结构数据。 首先定义一下我们讨论的层次结构,是这样的一组数据,每个条目只能有一个父条目,可以有零个或多个子条目(唯一的例外是根条目,它没有父条目)。许多依赖数据库的应用都会遇到层次结构的数据,例如论坛或邮件列表的线索、企业的组织结构图、内容管理系统或商城的分类目录等等。我们如下数据作为示例: Mike Hillyer 考虑了两种不同的模型——邻接表(Adjacency List)和嵌套集(Nested Set)来实现这个层次结构。 邻接表(Adjacency List)模型 我们可以很直观的使用下面的方式来保存如图所示的结构。 创建名为 distributions 的表: CREATE TABLE distributions ( id INT NOT NULL AUTO_INCREMENT, name VARCHAR(32) NOT NULL, parent INT NULL DEFAULT NULL, PRIMARY KEY (id) ) ENGINE = InnoDB DEFAULT CHARACTER SET = utf8; 插入数据: INSERT INTO distributions VALUES

mysql操作篇二

一笑奈何 提交于 2019-12-16 20:22:03
SELECT sname,age,scope from stu_info where sname='cc'; update stu_info set scope=60 where sno=3; select * from stu_info order by scope DESC; ----ASC默认的,从小到大 DESC从大到小 select sname 姓名,scope 成绩 from stu_info s; select * from stu_info where birthday is null; select * from stu_info where birthday='2017-6-1'; select * from stu_info order by scope desc limit 0,1; ---0是起始行,1是截取的行数 ,限制查询行数 select * from person; drop table person; create table person ( id varchar(18) primary key, sname varchar(20) not null, age int, address varchar(30) ) ----第一范式 数据都是最小单位,列不可分割 第二范式 主键 第三范式 外键必须建在主键上 ---不一定单独一个字段为主键

Makefile中wildcard notdir patsubst 的介绍 ------ 转载

最后都变了- 提交于 2019-12-15 22:32:44
转载自: https://www.cnblogs.com/haoxing990/p/4629454.html 在Makefile规则中,通配符会被自动展开。但在变量的定义和函数引用时,通配符将失效。这种情况下如果需要通配符有效,就需要使用函数“wildcard”,它的用法是:$(wildcard PATTERN...) 。在Makefile中,它被展开为已经存在的、使用空格分开的、匹配此模式的所有文件列表。如果不存在任何符合此模式的文件,函数会忽略模式字符并返回空。需要注意的是:这种情况下规则中通配符的展开和上一小节匹配通配符的区别。 一般我们可以使用“$(wildcard *.c)”来获取工作目录下的所有的.c文件列表。复杂一些用法;可以使用“$(patsubst %.c,%.o,$(wildcard *.c))”,首先使用“wildcard”函数获取工作目录下的.c文件列表;之后将列表中所有文件名的后缀.c替换为.o。这样我们就可以得到在当前目录可生成的.o文件列表。因此在一个目录下可以使用如下内容的Makefile来将工作目录下的所有的.c文件进行编译并最后连接成为一个可执行文件: #sample Makefile objects := $(patsubst %.c,%.o,$(wildcard *.c)) foo : $(objects) cc -o foo $