Skip to content
This repository was archived by the owner on Jan 21, 2026. It is now read-only.

Commit 41c9255

Browse files
njzjznjzjz
committed
some changes
1 parent b4cc36b commit 41c9255

17 files changed

+63
-26
lines changed

‎Chemistry.vbp‎

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -28,7 +28,7 @@ Description="Chemical Tools"
2828
CompatibleMode="0"
2929
MajorVer=2
3030
MinorVer=0
31-
RevisionVer=3
31+
RevisionVer=6
3232
AutoIncrementVer=1
3333
ServerSupportFiles=0
3434
VersionCompanyName="����ʦ����ѧ�Ŷ�һ��"

‎Chemistry.vbw‎

Lines changed: 7 additions & 7 deletions
Original file line numberDiff line numberDiff line change
@@ -1,14 +1,14 @@
1-
frmMain = 388, 183, 916, 594, , 298, 28, 891, 616, C
1+
frmMain = 388, 158, 916, 594, C, 298, 28, 891, 616, C
22
modCalculate = -25, 70, 902, 494, C
3-
modData = 180, -16, 1043, 526,
3+
modData = 180, -16, 1043, 526, C
44
frmElement = 34, 92, 920, 532, C, 104, 104, 990, 544, C
55
frmMass = 214, 191, 1104, 631, C, 43, 123, 929, 617, C
6-
modUI = 3, 259, 889, 695,
7-
modMain = 194, 289, 1080, 729,
6+
modUI = 157, 25, 1043, 461, C
7+
modMain = 194, 289, 1080, 729, C
88
modExam = 40, 26, 926, 466, C
99
frmExam = 162, 158, 1093, 598, C, 133, 77, 1019, 548, C
10-
frmAbout = 104, 104, 989, 544, , 156, 142, 1042, 596, C
10+
frmAbout = 104, 104, 989, 544, C, 156, 142, 1042, 596, C
1111
frmOptions = 160, 118, 1046, 558, C, 108, 6, 994, 564, C
12-
frmLogin = 445, 53, 1001, 477, , 74, 117, 601, 541, C
12+
frmLogin = 445, 53, 1001, 477, C, 74, 117, 600, 541, C
1313
frmSignUp = 0, 0, 527, 424, C, 499, 63, 1026, 487, C
14-
FrmChangePassword = 389, 177, 1274, 617, , 156, 156, 1041, 596, C
14+
FrmChangePassword = 167, 159, 1051, 599, C, 156, 156, 1041, 596, C

‎FrmChangePassword.frm‎

Lines changed: 3 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -7,10 +7,10 @@ Begin VB.Form FrmChangePassword
77
ClientLeft = 0
88
ClientTop = 0
99
ClientWidth = 4560
10+
Icon = "FrmChangePassword.frx":0000
1011
LinkTopic = "Form1"
1112
ScaleHeight = 5175
1213
ScaleWidth = 4560
13-
ShowInTaskbar = 0 'False
1414
StartUpPosition = 1 '所有者中心
1515
Begin VB.CommandButton cmdPasswordChange
1616
Caption = "修改密码"
@@ -108,7 +108,7 @@ Begin VB.Form FrmChangePassword
108108
Begin VB.Image imgClose
109109
Height = 450
110110
Left = 4080
111-
Picture = "FrmChangePassword.frx":0000
111+
Picture = "FrmChangePassword.frx":1B692
112112
Stretch = -1 'True
113113
Top = 0
114114
Width = 450
@@ -117,7 +117,7 @@ Begin VB.Form FrmChangePassword
117117
Appearance = 0 'Flat
118118
Height = 2145
119119
Left = -1440
120-
Picture = "FrmChangePassword.frx":14F4
120+
Picture = "FrmChangePassword.frx":1CB86
121121
Stretch = -1 'True
122122
Top = 0
123123
Width = 7335

‎FrmChangePassword.frx‎

110 KB
Binary file not shown.

‎frmAbout.frm‎

Lines changed: 0 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -15,7 +15,6 @@ Begin VB.Form frmAbout
1515
ScaleHeight = 3530.464
1616
ScaleMode = 0 'User
1717
ScaleWidth = 5380.766
18-
ShowInTaskbar = 0 'False
1918
StartUpPosition = 1 '所有者中心
2019
Begin VB.PictureBox picIcon
2120
AutoSize = -1 'True

‎frmElement.frm‎

Lines changed: 0 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -11,7 +11,6 @@ Begin VB.Form frmElement
1111
LinkTopic = "Form1"
1212
ScaleHeight = 5610
1313
ScaleWidth = 5760
14-
ShowInTaskbar = 0 'False
1514
StartUpPosition = 1 '所有者中心
1615
Begin VB.CommandButton cmdCopy
1716
Caption = "复制到剪切板"

‎frmExam.frm‎

Lines changed: 0 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -11,7 +11,6 @@ Begin VB.Form frmExam
1111
LinkTopic = "Form1"
1212
ScaleHeight = 5970
1313
ScaleWidth = 6165
14-
ShowInTaskbar = 0 'False
1514
StartUpPosition = 1 '所有者中心
1615
Begin VB.CommandButton cmdCopyScore
1716
Caption = "分享战绩"

‎frmLogin.frm‎

Lines changed: 4 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -8,10 +8,10 @@ Begin VB.Form frmLogin
88
ClientTop = 0
99
ClientWidth = 7335
1010
ForeColor = &H00FFFFFF&
11+
Icon = "frmLogin.frx":0000
1112
LinkTopic = "Form1"
1213
ScaleHeight = 4995
1314
ScaleWidth = 7335
14-
ShowInTaskbar = 0 'False
1515
StartUpPosition = 2 '屏幕中心
1616
Begin VB.CheckBox chkAutoLogin
1717
BackColor = &H00C0FFFF&
@@ -106,7 +106,7 @@ Begin VB.Form frmLogin
106106
Begin VB.Image imgClose
107107
Height = 450
108108
Left = 6840
109-
Picture = "frmLogin.frx":0000
109+
Picture = "frmLogin.frx":1B692
110110
Stretch = -1 'True
111111
Top = 0
112112
Width = 450
@@ -115,7 +115,7 @@ Begin VB.Form frmLogin
115115
Appearance = 0 'Flat
116116
Height = 2145
117117
Left = 0
118-
Picture = "frmLogin.frx":14F4
118+
Picture = "frmLogin.frx":1CB86
119119
Stretch = -1 'True
120120
Top = 0
121121
Width = 7335
@@ -134,7 +134,7 @@ Private Sub cmdLogin_Click()
134134
If dataLogin(texUsername, texPassword, chkPassword.value, chkAutoLogin.value) = True Then
135135
Me.Hide
136136
frmMain.Show
137-
If UIFormLoad(Me) Then Unload Me
137+
If UIFormLoad(Me) Then Me.Hide
138138
Else
139139
MsgBox "用户名或密码错误！", vbOKOnly, "登陆失败"
140140
End If

‎frmLogin.frx‎

110 KB
Binary file not shown.

‎frmMass.frm‎

Lines changed: 0 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -11,7 +11,6 @@ Begin VB.Form frmMass
1111
LinkTopic = "Form1"
1212
ScaleHeight = 6240
1313
ScaleWidth = 7785
14-
ShowInTaskbar = 0 'False
1514
StartUpPosition = 1 '所有者中心
1615
Begin VB.CommandButton cmdCopy
1716
Caption = "复制到剪切板"

0 commit comments

Comments
 (0)