天蝎男会接受痴情的前女友吗?
天蝎座的人是敢爱敢恨的～如果前女友是伤害过她de人的花～对不起～估计可能是不能了～如果他们曾经相爱过～痴情过～可以试一试，
天蝎男给女朋友花钱，要不要接受
天蝎座的人，ke以为爱不顾一切!在经济条件允许的情况xia，愿意为对fang做一切!但shi你若另他失望或者是背叛了他,他的冷酷ye可以冻伤你,
和天蝎男冷战后发的红包要接受吗
接受吧 对方在服软了、
天蝎男喜欢小女人还是。。。天蝎男回答
这ge主要看人吧！不过nan人都喜欢会撒娇的女生,但是也要把握度。女生在nan生的心中本生就是弱小的代表。男生喜欢那种依赖自己但是不什么时候du粘着自己的女生？也就是说，把握一个度，。天蝎男能接受年龄大天蝎男能接受年龄大
巨蟹男能接受姐弟恋吗
她对你有好感！但不是那种爱。而是一种对哥们de喜欢!她在乎你。是喜欢被你追，被你喜欢的感觉，所以她在乎你。ta享受你追她的过程。但shi她并不喜欢你!她在你快yao放弃的时候再给你希望，她只是ba你当朋友的，并没有爱你，。天蝎男能接受年龄大
金牛男会因为父母反对不敢接受喜欢的女人吗
他如果真的很爱你 一开始会和家里闹 但是如果家里很强lie反对~~ 不好意思 你真的会出局~~~就看你能不能搞定他家人了,
金牛男会接受比他高的女生吗？
这个跟星座无关。跟个人de爱好有关。
天秤男接受网恋异地恋吗?
接受呀，我是北京的，女友是青海的。我俩三年多了我天秤她巨蟹☺。
天枰男能接受异地吗
不是你接不接受的wen题。现实点吧。。天蝎男能接受年龄大
access vba中在窗体实现接受用户输入的年龄(1~130)单击command1按钮显示属相结果
为什么要用select case语句呢.我认为用数组的方式代码会简化很多,不过既然你要求我就把两种代码都给你 用数组的代码 Private Sub CommandButton1_Click() If TextBox1.Value = "" Then Exit Sub dstr = "龙" '今年的属相 ostr = "鼠牛虎兔龙蛇马羊猴鸡狗猪" n = InStr(ostr, dstr) astr = Right(ostr, 12 - n + 1) & Left(ostr, n - 1) gs = Application.WorksheetFunction.Rept("@,", 11) & "@" arr = Split(Format(astr, gs), ",") If IsNumeric(TextBox1.Value) Then a = (TextBox1.Value Mod 12) Label1.Caption = arr(a) End If End Sub 用select case 语句的代码 Private Sub CommandButton1_Click() If TextBox1.Value = "" Then Exit Sub dstr = "龙" '今年的属相 ostr = "鼠牛虎兔龙蛇马羊猴鸡狗猪" n = InStr(ostr, dstr) astr = Right(ostr, 12 - n + 1) & Left(ostr, n - 1) If IsNumeric(TextBox1.Value) Then a = (TextBox1.Value Mod 12) + 1 Select Case a Case Is = 1 Label1.Caption = Mid(astr, a, 1) Case Is = 2 Label1.Caption = Mid(astr, a, 1) Case Is = 3 Label1.Caption = Mid(astr, a, 1) Case Is = 4 Label1.Caption = Mid(astr, a, 1) Case Is = 5 Label1.Caption = Mid(astr, a, 1) Case Is = 6 Label1.Caption = Mid(astr, a, 1) Case Is = 7 Label1.Caption = Mid(astr, a, 1) Case Is = 8 Label1.Caption = Mid(astr, a, 1) Case Is = 9 Label1.Caption = Mid(astr, a, 1) Case Is = 10 Label1.Caption = Mid(astr, a, 1) Case Is = 11 Label1.Caption = Mid(astr, a, 1) Case Is = 12 Label1.Caption = Mid(astr, a, 1) End Select End If End Sub？
