下列程序的功能是：当x＜50时，y=0.8×x；当50≤x≤100时，y=0.7×x；当x＞100时，没有意义。请填空。
Private Sub Command1_Click()
Dim x AS Single
x=InputBox("请输入x的值!")
(14)
Case Is＜50
　　y=0.8*x
　Case 50 To 100
　　y=0.7*K
(15)
Print"输入的数据出界!"
End Select
Print x，y
End Sub

[背景材料]

某施工单位受建设单位的委托承担了某20层大厦的玻璃幕墙施工任务，并签订了施工合同，合同工期为70天，建设单位要求施工单位开工之前提交施工方案，施工单位组织有关人员编写了施工方案并提交建设单位，在施工前进行了设计、技术交底工作。

在施工过程中，采取了如下的施工方法和措施：

(1)在立柱和支座接触面之间加防腐隔离刚性垫片；

(2)立柱在预装、初步定位和自检合格后，正式焊接牢固；

(3)横梁两端与立柱连接处用铆钉铆接后，嵌入密封胶密封；

(4)打胶时先打横向胶，后打竖向胶；竖向胶缝宜自下而上进行，胶注满后，应检查是否有气泡等；

(5)幕墙钢龙骨架进行二次防腐处理后应进行自检，合格后，进入下一道工序；

(6)幕墙上端封口设置挡水板，防止雨水渗入室内。

[问题]

施工过程中采取的施工方法和措施中的不妥之处有哪些？请指出来，并改正。