vb中输出两个上下颠倒的星号三角形

Answer 1

Private Sub Command1_Click()

  For i = 1 To 8

    For j = 1 To 9 - i

      Print " ";

    Next j

    For j = 1 To 2 * i - 1

      Print "*";

    Next j

    For j = 1 To 10

      Print " ";

    Next j

    For j = 1 To 2 * (9 - i) - 1

      Print "*";

    Next j

    Print

  Next i

Print

End Sub

Answer 2

病情分析：
你好，这个检查结果说明是没有霉菌和滴虫感染的，如果其他的项目也是正常的就不需要担心的。
指导意见：
你的情况应该看看其他的项目如脓球，白细胞等，如果这些有阳性的表现，就是细菌感染的，如果都是阴性的，这样可以除外阴道炎的表现的。

病情分析：
你好，你的白带常规检查说明没有霉菌和滴虫的。
指导意见：
你不要过于担心，你的情况说明不是霉菌性阴道炎和滴虫性阴道炎。