答：只想要结果画面吗？抓屏行吗？把窗体的状态截成图片。 按键盘上的Print Screen键，是截全屏幕的，与Alt组合，只抓当前窗口的。 然后在word里粘贴。
答：Shell "explorer c:\my documents\" Shell "*****\word.exe X:\XXX\XXX.doc"
答：可能是复制时的不完整。 Private Sub Label4_Click() 对应是 End Sub 而他下面就是 Function isfat(ByVal BMI As Double) As String 很明显少了 Private Sub Label4_Click() 至 End Sub 之间的代码。 如果单是为了是面的能运行 可以改成（1） Private Sub Label4_Click() label4.Caption = isfat(BMI) End Sub Function isfat(ByVal BMI As Double) As String Select Case BMI Case 0 To 18.4 isfat = "你应该多吃点有营养的东西。" Case 18.5 To 23.9 isfat = "恭喜你，你的体重很标准。" Case 24 To 26.9 isfat = "你需要注意饮食，记得运动。" Case Is > 27 isfat = "你的健康已经亮起红灯，开始减肥吧！" Case Else isfat = "你的BMI太奇怪了！！" End Select End Function 改成（二） Private Sub Label4_Click() label4.Caption = isfat(BMI) Select Case BMI Case 0 To 18.4 isfat = "你应该多吃点有营养的东西。" Case 18.5 To 23.9 isfat = "恭喜你，你的体重很标准。" Case 24 To 26.9 isfat = "你需要注意饮食，记得运动。" Case Is > 27 isfat = "你的健康已经亮起红灯，开始减肥吧！" Case Else isfat = "你的BMI太奇怪了！！" End Select End sub
答：Option Explicit Dim lj As String Dim i Private Sub Command1_Click() lj = Trim(Text1.Text) i = Shell(lj, 1) End Sub
答：if A+B>C and B+C>A and C+A>B then L=-1 else L=0 -1=true , 0=false
答：io命名空间 ? ? ? ? ? ? ? ? ? ?//文建流对象 ? ? ? ? ? ?FileStream fs = new FileStream("demo.txt", FileMode.Create); ? ? ? ? ? //写入对象 ? ? ? ? ? StreamWriter sw = new StreamWriter(fs); ? ? ? ? ? ?sw.Write(txtSave.Text); ? //你要写入的文本框名 ? ? ? ? ? ?sw.Close(); ? ? ? ? ? ?fs.Close(); 你的问题就是在于WriteLine()关键字上~呵呵~！！！ Write就是写入所有的咯 还有读取你应该会把~~有问题内线！！ <br/>
答：必须有后台程序或服务程序，系统时间可以用time系统变量获得，运行一个程序可以用shell"路径"来实现，关闭么……如果是有窗口的标准程序还可以用findwindow()来寻找该程序，然后用postmessage()函数来结束掉他，用进程管理的方式我就不知道了