广东专升本vb程序设计

给我充50话费，帮你做了。。。。就应用来说，当然VB更适用一些。联系请看用户名

Private Sub Command1_Click() Dim i As Long i = Len(Val(TText)) If i= 1 Then msgbox "输入的是" & i & "位数" ElseIf i = n Then msgbox "输入的是" & i & "位数" End IfEnd SubPrivate Sub Command1_Click() Dim i As Long i = Len(Val(TText)) Select Case i Case 1 msgbox "输入的是" & i & "位数" Case n msgbox "输入的是" & i & "位数" End SelectEnd Sub

分数这么少，你想谁会回答你？！你到底有没有用过VB？！这么简单的题都不会？！

重庆专升本的计算机考试是纯笔试的，举个例子------计算出1到100的立方根，将结果存于外存，文件名为root 。-------用自己熟悉的语言编写程序--------我也是重庆专升本的，它的编程题一般都不难，只要编程的格式规范，循环控制不出差错应该问题不大，批卷子时的答案要求是：数据说明；循环控制以及处理；输出；程序风格；这是以前我们的老师说的。应该是快考试了，去年是4月17日考的，祝你考个好成绩！呵呵！