请试着用VB写如下代码题目实现两码流水码由01开始,若到99後改为A1~A9,B1~B9,C1~C9…..到Z9

来源：学生作业帮编辑：作业帮分类：综合作业时间：2024/05/18 16:01:20

请试着用VB写如下代码题目实现两码流水码由01开始,若到99後改为A1~A9,B1~B9,C1~C9…..到Z9
实现两码流水码,由01开始,若到99後改为A1~A9,B1~B9,C1~C9…..到Z9後改为1A~9A,1B~9B,1C~9C以此类推,需扣除英文字I&O

Dim s1 As String,s2 As String,i As Integer,j As Integer
s1 = "0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ"
s2 = "123456789"
For i = 1 To Len(s1)
For j = 1 To Len(s2)
Print Mid(s1,i,1) & Mid(s2,j,1)
Next j
Next i
再问：实现两码流水码，由01开始, 若到99後改为A1~A9,B1~B9,C1~C9….. 到Z9後改为1A~9A,1B~9B,1C~9C以此类推,需扣除英文字I&O
再答： Dim s1 As String, s2 As String, i As Integer, j As Integer s1 = "0123456789ABCDEFGHJKLMNPQRSTUVWXYZ" s2 = "123456789" For i = 1 To Len(s1) For j = 1 To Len(s2) Print Mid(s1, i, 1) & Mid(s2, j, 1) Next j Next i For i = 1 To Len(s2) For j = 11 To Len(s1) Print Mid(s2, i, 1) & Mid(s1, j, 1) Next j Next i
再问：你这样的话输出里面是没有10,20,30.。。。。
再答：这个有点乱啊，需要10 20 30 ，那么要不要 A0 B0 C0 呢？

Exce中 A1到A9与B1到B9单元格对应,C1到C9与D1到D9单元格对应,B列与D列循环相加结果为11时,求A C excel公式 C1=A1/(B1+B2+B3+B4+B5+B6+B7+B8+B9)*B1 求C2到C9的值 EXCEL求教,假如说,A1到A2是1,A3到A5是2,A6到A9是3,然后B1到B9是1到9.我现在想求,以A列为条件 Excel中如何设定一个浮动系数C2：如：A1＝100 ,A2＝B2*C2 A3＝B3*C3……直到 A9＝B9*C9 [(a1+a9）×9÷2]/[(b1+b9)×9÷2]怎么得到下一步? 这几个吉他和铉怎么按!B9 G9 A9 B9 D9 C9! 我想实现这个功能：如果C9的值=1,9,17,将sheet2的A1:B3复制到sheet1的A12:B14,如果C9的值输入到C2.如果C1=A1,显示B1.C1=A2,显示B2.C1=A3,显示B3以此类推. excel转置问题如下两列 A A1 B B1 C C1 D D1 如何转成 A A1 B B1 C C1 D D1 Excel中,A1＝1,B1＝2,C1＝SUM（A1：B1）,把C1单元格的公式复制到C2,则C2单元格的公式是 A1、B1、C1、D1四个单元格的数字,要求如下： excel中,C1=A1*B1,小数点后面四舍五入保留两位,公式怎么写