weixin_44307254的博客

原创 vb中的类

原创 vb控件的默认属性

VB控件的默认属性指这个控件使用时只写出对象名，省略属性名时代表的某个属性。 即通常我们使用属性值时应使用如下格式：对象名.属性名=属性值，如果使用某个对象的属性值时如下格式：对象=属性值 ，这个对象的该属性就是默认属性。常用控件的默认属性有：label --caption ; frame-- caption; form–caption;textbox–text ; listbox–text; combobox–text;commanon–value; optionbutton–value; checkb

原创 keypreview

keypreview属性值为：True：窗体先接收键盘事件，然后是活动控件接收事件False：缺省值，活动控件接收键盘事件，而窗体不接收

原创 窗体中的public和标准模块中的public

我在VB书上发现了以下语句： “全局变量必须用Public或Global语句声明，全局变量是指在整个工程中都可以使用的变量，它通常在公用的标准模块中使用 Public 进行声明； 如果在窗体中使用Public关键字声明的变量，在当前窗体处于已加载的情况下，在其他窗体中也可以使用，方法是窗体名.变量名...

原创 在vb中怎样使用函数ParamArray

ParamArray 用于过程最后的一个参数，表示该参数是包含任意个数元素的数组（Variant 类型）'ParamArray 不能与 ByVal、ByRef或 Optional 一起使用。Private Sub Command1_Click()Dim d1 As Long, d2 As Longd1 = My1(5, 1, 2) '计算 5*(1+2)d2 = My1(5, 1, 2, 3, 4) '计算 5*(1+2+3+4)End SubPrivate Function My1(a As

原创 vb中filecopy

FileCopy(“源文件名”,“目标文件名”)两个参数都是必选的,且都包含路径。在VB中filecopy函数可以直接调用。而CopyFile函数则不能要先定义filesystemobject变量，然后才能用。有过copyFile比fileCopy的功能有所不同。FileCopy是单个文件的copy,目标文件名可以和源文件名不同，也就是说Copy文件时可以重新命名。CopyFile是把一个目录下的所有文件copy到另一个目录下，不过不copy目录，要copy目录的话，要用copyFolder.例如

原创 vb中日期用数字表示法解析

VB中合法的日期型常量用数字符号 (#) 扩起来。月份在前，中间是日期，最后是年份。例如，#January 1, 1993# 。日期型变量或常量也可以用一个双精度浮点数表示，其中整数部分表示从1899-12-30到该时间的天数（1899-12-30以前的日期则用负数表示），小数部分则是从午夜起到该时间所经过的秒数占全天时间的比例。比如当前时间是2012-5-5 17:35:50，用数字表示就是41034.7332175926，其中41034表示2012-5-5和1899-12-30相差41034天。0.

原创 2020-09-29

Private m As IntegerPrivate mm As Integer, ss As IntegerPrivate mms As String, sss As StringPrivate Sub Command1_Click()Timer1.Enabled = True Timer1.Interval = 500Label1.Caption = mms & ":" & sssEnd SubPrivate Sub Command2_Click()Timer.

原创 产生随机六位数

Private Sub Command1_Click() Timer1.Enabled = True End SubPrivate Sub Command2_Click() Timer1.Enabled = False Label1.Caption = "恭喜" & Text1.Text & "中奖！" End SubPrivate Sub Form_Load() Timer1.Enabled = False Randomize Timer1.

原创 快捷菜单

Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single) If Button = 2 Then PopupMenu mnuxt, 4 End If End Sub

原创 菜单的编写

Private Sub mnuquit_Click()EndEnd SubPrivate Sub mnutx_jx_pt_Click() Shape1.Visible = True Shape1.Shape = 0 mnuxt_ysy.Enabled = True mnuxt_yser.Enabled = True End SubPrivate Sub mnutx_ty_Click()Shape1.Visible = TrueShape1.Shape = 2mn.

原创 菜单操作（数制的转换，复选框）

Option ExplicitPrivate Sub clear_Click()Text1.Text = ""Octv.Checked = FalseDecv.Checked = FalseHexv.Checked = Falseclear.Checked = Falsequit.Checked = FalseLabel4.Caption = ""Label5.Caption = ""Label6.Caption = ""End SubPrivate Sub Decv_Click(

原创 蟒蛇作品

#PythonDraw.pyimport turtleturtle.setup(650,350,200,200)turtle.penup()turtle.fd(-250)turtle.pendown()turtle.pensize(25)turtle.pencolor("purple")turtle.seth(-40)for i in range(4): turtle.c...

原创 转换温度

#TempConvert.pyTempStr =input("请输入带有符号的温度值 :")if TempStr[-1] in ['F', 'f']: C =(eval(TempStr[0:-1]) - 32)/1.8 print("转换后温度是{:.2f}c".format(C))elif TempStr[-1] in ['C', 'c']: F =1.8*eval...

原创 画五角形

from turtle import *color(‘red’,‘red’)begin_fill()for i in range(5):fd(200)rt(144)end_fill()done

原创 画一组正切圆

import turtleturtle.pensize(2)turtle.circle(10)turtle.circle(40)turtle.circle(80)turtle.circle(160)

原创 计算圆的面积

r=25area =3.1415 * r * rprint(area)print('{:.2f}'.format(area))1963.43750000000021963.44

原创 指定公历年份和月份，并显示相应的日历

#天数的获取def getMonthDays(y,m): if m in {1,3,5,7,8,10,12}: return 31 elif m in {4,6,9,11}: return 30 elif m == 2: if y % 4==0 and y % 100 != 0 or y % 400 == 0: ...

原创 文件的读写

#文件的写f.write(str)fowritelines(strlist)#文件的读f.read()f.readline()f.readlines()#文件的读写过程f=open("my.txt","w')f.writelines（["apple\n","pie\n"])f.close()f=open("my.txt","r")f.readlines()f.close...

原创 多个带名参数

def func_test3(**kwargs): for key, val in kwargs.items(): print("%s=%s"%(key,val))print("===func_test3")func_test3(myname="Tom", sep="comma", age=23)===func_test3myname=Tomsep=com...

原创 匿名函数lambda

num = [10,20,40,80,160]lst = [2,4,6,8,10]def mul3(a): return a*3print (list(map(mul3,num)))def atob(a, b): return a + 1.0/bprint (list(map(atob, num, lst)))print (list(map(lambda a:a*3...

原创 map()函数的使用技巧

num = [10,20,40,80,160]lst = [2,4,6,8,10]def mul3(a): return a*3print (list(map(mul3,num)))def atob(a, b): return a + 1.0/bprint (list(map(atob, num, lst)))[30, 60, 120, 240, 480][10....

原创 函数的调用

def sum_list(alist): sum_temp = 0 for i in alist: sum_temp += i return sum_tempprint(sum_list) #查看函数对象sum_listmy_list = [23, 45, 67, 89, 100]my_sum = sum_list(my_list)prin...

原创 4乘积的列表

4乘积的列表（10分）题目内容：给定一个包含若干个整数的列表alist，要求返回输出列表blist，blist中的元素为除与alist对应位置上的元素之外其余各元素的乘积。输入格式:共一行，列表中的元素以空格隔开。输出格式：共一行，为一个列表。输入样例：1 2 3输出样例：[6, 3, 2]（注：原列表的1，对应输出6=23，原列表的2，对应输出3=13，原列表的3，对应输出...

原创 3 0的组合

题目内容：给定一个包含若干个整数（可能存在重复整数）的列表，判断其中是否存在三个元素a,b,c，使得a+b+c=0？找出所有满足条件且不重复的这样的三个数的组合。输入格式:共一行，列表中元素以空格隔开。输出格式：共一行，为不重复组合的个数，不存在这样的组合就输出0输入样例：-1 0 1 2 -1输出样例：2（注：两个组合是-1，-1，2和-1，0，1）a=sorted(map...

原创 2回文字符串

题目内容：给定一个字符串，判断它是否是回文字符串（即类似于peep, 12321这样的对称字符串），如果是输出True，不是则输出False。判断过程中假定只考虑字母和数字字符，而且忽略字母的大小写和其它符号（如空格、标点符号等）。输入格式:共一行，为一个字符串。输出格式：共一行，为True或False。输入样例：love e vol;输出样例：Truea=input()...

原创 1两组数的差异

题目内容：给出两组相同数量的整数，求这两组整数的差异估算，即：对应数差值平方之和。第一组为a1, a2…an第二组为b1, b2…bn求 (a1-b1)2+(a2-b2)2+…+(an-bn)^2输入格式:两行，每行是一组整数，用空格隔开。输出格式：一个整数。输入样例：1 21 2输出样例：0a=list(map(int,input().split()))b=lis...

原创 迭代循环

for n in range(5): print(n)01234alist = ['a',123,True]for v in alist: print(v)a123Trueadic = {'name':'Tom','age':18,'gender':'Male'}for k in adic: print(k,adic[k])name Tom...

原创 多重循环

for i in range(1,10000): n=i step=0 while n!=1: if n%2==0: n=n//2 else: n=n*3+1 step +=1 else: print(i,"traped",step,"steps"...

原创 循环语句中break,continue的区别

n=5while n>0: n=n-1 if n<2: break print(n)else: print("end") 4 3 2n=5while n>0: n=n-1 if n<2: continue print(n)else: print("end")...

原创 合并并去重

#输入两个列表alist和blist，要求列表中的每个元素都为正整数且不超过10；#合并alist和blist，并将重复的元素去掉后输出一个新的列表clistalist=list(map(int,input().split()))blist=list(map(int,input().split()))clist=list(set(alist+blist))print(sorted(cli...

原创 字符串左移

s=str(input())n=int(input())if(n>len(s)): n-=len(s)s=s[n:]+s[:n]

原创 输入并运行成功打印三角形的程序

n= int(input())for i in range(n): line = " "*(n-1-i) + "@"*(2*i+1) print(line)

原创 输入并运行成功计算函数的程序

x = float(input())a = 2b = -45c = 13y = a*x**2 + b*x + cprint(x,y)

原创 #输入某年某月某日，判断这一天是这一年的第几天？

#输入某年某月某日，判断这一天是这一年的第几天？import datetimedtstr="20181206"dt = datetime.datetime.strptime(dtstr,"%Y%m%d")another_dtstr = dtstr[:4] + '0101'another_dt = datetime.datetime.strptime(another_dtstr, "%Y...

原创 归并排序

# merge_sort(lst)# 归并排序def merge_sort(lst): if len(lst) <=1: return lst middle = int(len(lst) / 2) left = merge_sort(lst[:middle]) right = merge_sort(lst[middle:]) me...

原创 归并排序

# merge_sort(lst)# 归并排序def merge_sort(lst): if len(lst) <=1: return lst middle = int(len(lst) / 2) left = merge_sort(lst[:middle]) right = merge_sort(lst[middle:]) me...

原创 归并排序

# merge_sort(lst)# 归并排序def merge_sort(lst): if len(lst) <=1: return lst middle = int(len(lst) / 2) left = merge_sort(lst[:middle]) right = merge_sort(lst[middle:]) me...

原创 猜数字游戏

猜数字游戏import randomsecret = random.randint(1,100)print('''猜数游戏！我想了一个１－１００的整数，你最多可以猜６次，看看能猜出来吗？''')tries = 1while tries <= 6: guess = int(input("1-100的整数，第%d次猜，请输入：" %(tries,))) if gu...

原创 归并排序

#merge sort#归并排序import randomdef merge_sort(data_list): if len(data_list) <= 1: return data_list middle = int(len(data_list) / 2) left = merge_sort(data_list[:middle]) r...