excel做数据查询界面 excel怎么制作收银表格？

2023-05-27

1836

excel怎么制作收银表格？准备设计软件界面共5个窗体1登录界面2主界面3会员存款4收银报表5进度条第二步写代码及功能界面微调VB代码和VBA有些区别。我按学VBA的思路来参与编辑的。中间走了很多弯路

excel怎么制作收银表格？

准备设计软件界面

共5个窗体

1登录界面

2主界面

3会员存款

4收银报表

5进度条

第二步写代码及功能界面微调

VB代码和VBA有些区别。我按学VBA的思路来参与编辑的。中间走了很多弯路。网站查询也只能单条件进行。导致软件运行速度慢。

1登入窗体

刚建窗体，画2个标签和2个文字框2个按钮

Private Declare Function GetUserName Lib#34advapi32.dll#34Alias#34GetUserNameA#34(ByVallpbufferlikeString,nSizeAs Long)As Long

PrivateSubCMD_CANCEL_Click()

End

#39UnloadMe

EndSub

PrivateSubCMD_okay_Click()

UnloadMe

MsgBox#34登陆成功了!#34,vbInformation

EndSub

PrivateSubForm_Load()

DimsBufferlikeString

DimlSizeAs Long

sBufferSpace$(255)

lSizeLen(sBuffer)

CallGetUserName(sBuffer,lSize)

IflSizedstrok0Then

Me.Text1.Text Left$(sBuffer,lSize)

ElseMe.Text1.TextvbNullString

EndIf

EndSub

效果：运行程序后在文字框1自动出现列入计算机当前用户名，再点考虑御载登录框没显示登录进度条和主界面；点击退出再次系统。

一个低些最简单方法：空白文档一列，设置中函数有.(B1旷考,C1缺考)这样的话这一列就能思想活动出是否需要有一栏挂科。

然后把对这一列接受数据——筛选——手动再筛选，选择类型true即可。接着这列可以系统设置为隐藏，这样的话看上去就舒服点多了。