السلام عليكم
كيف أستطيع اني أعرف هل الجسمين مصطدمين ام لا في اللعبة (ثلاثية الابعاد)
أرجو الرد بسرعة يا شباب
وشكرا
كيف أستطيع اني أعرف هل الجسمين مصطدمين ام لا في اللعبة (ثلاثية الابعاد)
أرجو الرد بسرعة يا شباب
وشكرا
Public Function Ctime(Time As Single) As String Dim H As Single, M As Single, S As Single, X(2) As String H = Int(Time) M = Int(3600 * (Time - H) / 60) S = Int(((3600 * Time) - ((H * 3600) + (M * 60)))) If H < 10 Then X(0) = "0" If M < 10 Then X(1) = "0" If S < 10 Then X(2) = "0" Ctime = X(0) & Str(H) & " :" & X(1) & Str(M) & " : " & X(2) & S End Function
تعليق