炮轰牛排
炮轰牛排
耐心的去面对任何一个人,解决任何一个问题
关注数: 6
粉丝数: 92
发帖数: 3,414
关注贴吧数: 12
小风吹着,小烟抽着,小太阳晒着,大家都上房顶感受下吧。
有谁注意到天气预报了。
我绝对是愤青,干、日、本我觉不退缩。
还爆图呢,日本都欺负到头上了。 对日本已经忍无可忍了。
好像差一点就升级。
求紫荆关堵车信息。
爆了照,你不可能跟我走啊。还是进来看看对你们有帮助的吧、 Private Sub Command1_Click() If Shape1.Visible = True Then Shape1.Visible = False Shape2.Visible = True ElseIf Shape2.Visible = True Then Shape2.Visible = False Shape3.Visible = True Else Shape3.Visible = False Shape1.Visible = True End If End Sub Private Sub Command2_Click() End End Sub Private Sub Form_Load() Shape2.Visible = False Shape3.Visible = False End Sub
好累的一天 Private Sub Command1_Click() Dim x As Integer: Dim y As Integer Dim z As Integer: Dim i As Integer Dim f As Integer x = InputBox("请输入1-10之间的整数", "输入", "") If x < 1 Or x > 10 Then x = InputBox("请输入1-10之间的整数", "输入", "") End If y = InputBox("请输入1-10之间的整数", "输入", "") ''''''''' If y < 1 Or y > 10 Then y = InputBox("请输入1-10之间的整数", "输入", "") End If '''''''''''''''''''''''''''''''''''''''''''''''''''''' z = x * y i = InputBox("请输入乘积", "答案", "") If z = i Then Print i ElseIf z <> i Then f = MsgBox("输入有误是否重新输入", 36, " 提示") If f = 6 Then i = InputBox("请输入乘积", "答案", "") If z = i Then Print i Else End End If ElseIf f = 7 Then End End If End If End Sub ''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' Private Sub Command1_Click() a = InputBox("请输入需要缴纳的税金额", "税金计算器") If (a - 3500) < 1500 Then Print (a - 3500) * (3 / 100) ElseIf 1500 <= (a - 3500) < 4500 Then Print (a - 3500) * (10 / 100) - 105 ElseIf 4500 <= (a - 3500) < 9000 Then Print (a - 3500) * (20 / 100) - 555 ElseIf 9000 <= (a - 3500) < 35000 Then Print (a - 3500) * (25 / 100) - 1005 ElseIf 35000 <= (a - 3500) < 55000 Then Print (a - 3500) * (30 / 100) - 2755 ElseIf 55000 <= (a - 3500) < 80000 Then Print (a - 3500) * (35 / 100) - 5505 ElseIf (a - 3500) > 80000 Then Print (a - 3500) * (45 / 100) - 13505 End If End Sub
没事笑一笑
学个软件真费劲,有没有同行啊
贴吧越玩越么意思了,整天不是爆照就是别的。 期待来点跟咱们生活有关系的可以么
一场秋雨一场凉啊,今天好冷啊
快出来看啊,出彩虹了! 最佳角度:粮局那里往东看
年轻就是好。。。。。。 看一中捏点小姑娘,长的捏么美
年轻就是好啊,看一中这点小姑娘,捏叫一个美啊
出来扎到,要冒泡
『易县贴吧』帮大哥,帮大姐在线互助
这是跟么个意思、
这么多爆滴,什么日子啊
昨天我生日,没人陪着过
快升了,努力啊
求解答,高手速度进
起床了,上班了。 等到4点也没碰到鬼
山东出差住的宾馆,全了!
心情很烦躁
怎么没人捏,都上坟去里
认识个女滴,晚上十二点出去抓鬼
一中放假了,没媳妇地速度来一中宿舍后门。
本年年,谁还穿着红内.裤,红腰带捏
有七月十五生日滴么
贴吧发泄处! 请用10个以内滴字来描述!
真他妈欠揍! 开一破车,把车停在我们街道口,挡着车过不去,让他挪车还你妈说我们不对,真捏吗以为丙街人好欺负啊!停一次轰一次、
找个地方喝点酒
你对爸妈说过:“我爱你”么?
感冒了真难受,昨天8点就睡觉了.....
往下看,很精彩、 北京力王科技易县分公司现在招人喽: 招5名客服, 年龄23—30左右, 会一点电脑,以前最好做过销售的, 会开车的优先, 联系电话:13403364537
早上起来发现自己感冒了
求客服 能说会道滴
网友.别说沟就是美不美、
丙街停电楼。 丙街停电楼。
求偶遇。广场求偶遇
晚上YY 聊天喽
卖咯百事回来,刚起整迷糊么,看见一穿黑色超短裙滴美女,我醒咧
饿咧,怎么还不下班捏
我想帮我姐找个工作。以前在北京干过销售. 有什么好的。真心的来
没劲,无聊,一中宿舍后求偶遇
还有4点就升级了
男人离了女人真就不行,女人在哪里!
都哪里停电了,丙街就没停。
下雨 等待中
据说今天有雨! 等待中
易县贴吧相亲大会求吧主成全我吧! 搞一次聚会滴有没有。 搞一个对象滴有没有。 搞一个酒友滴有没有。
无聊.微会儿 一起摇一摇
易县滴大哥大嫂们,大叔大婶们!进来帮一下。 找一个叫马化龙的人,男滴,
急急急! 紫荆关的班车现在通了么?
下这么大雨之前,政府在干什么? 汶川地震,青海玉树,加上前几天得大雨,这些虽是天灾,但只要我们提前做好准备,还会有这么多人死么?我想不透的是,气象局都是干嘛吃的?政府那时候在干什么?你不知道紫荆关那天都是山,容易发生事故么?希望有关人员能重视起来!中国人是多,但那都是命啊!
首页
1
2
3
4
5
下一页